Merge pull request ledgersmb#8563 from ehuelsmann/fix/master/email-no…

…-attachments Fix persisting e-mail workflows without attachments
ehuelsmann · Jan 2, 2025 · 90bb096 · 90bb096
2 parents f8f7649 + de2f745
commit 90bb096
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/LedgerSMB/Workflow/Persister/Email.pm b/lib/LedgerSMB/Workflow/Persister/Email.pm
@@ -123,7 +123,7 @@ sub _save_email_data {
             $wf->id, $data->@{qw(from to cc bcc notify subject body expansions)})
             or $log->error($dbh->errstr);
     }
-    for my $att ($ctx->param( '_attachments' )->@*) {
+    for my $att ( ($ctx->param( '_attachments' ) // [])->@* ) {
         if (my $c = tied $att->{content}) {
             $c->persist;
             next;