diff --git a/lib/LedgerSMB/Workflow/Persister/Email.pm b/lib/LedgerSMB/Workflow/Persister/Email.pm
index 0727a8d5d8..f79f788bc2 100644
--- a/lib/LedgerSMB/Workflow/Persister/Email.pm
+++ b/lib/LedgerSMB/Workflow/Persister/Email.pm
@@ -42,7 +42,7 @@ sub _save_email_data {
     my $expansions  = $ctx->param( 'expansions' );
     my $data        = {
         expansions  => ( $expansions ? $json->encode( $expansions ) : undef ),
-        ( map { $_ => $ctx->param( $_ ) }
+        ( map { $_ => scalar $ctx->param( $_ ) }
           qw(from to cc bcc notify subject body) )
     };