diff options
author | Jannis M. Hoffmann <jannis@fehcom.de> | 2022-11-16 23:14:10 +0100 |
---|---|---|
committer | Jannis M. Hoffmann <jannis@fehcom.de> | 2022-11-16 23:14:10 +0100 |
commit | d0ffe11bd365b68d4da252b39d06d99f75d8cacb (patch) | |
tree | 17b852052b6515864d7963b49b2ac3ee2c3df134 /lib/JWebmail/Model/WriteMails.pm | |
parent | a52a7d7c27440a7c2716af033a6113abcaa2bd46 (diff) |
minor cleanup and fixes
Diffstat (limited to 'lib/JWebmail/Model/WriteMails.pm')
-rw-r--r-- | lib/JWebmail/Model/WriteMails.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/JWebmail/Model/WriteMails.pm b/lib/JWebmail/Model/WriteMails.pm index f4d09e8..05c4cd1 100644 --- a/lib/JWebmail/Model/WriteMails.pm +++ b/lib/JWebmail/Model/WriteMails.pm @@ -29,7 +29,7 @@ sub _build_mail { content_type => $mail->{attach_type}, encoding => 'base64', }, - body => $mail->{attach}->asset->slurp, + body => $mail->{attach}->asset->slurp(), ) : undef; my $email = Email::MIME->create( @@ -44,7 +44,7 @@ sub _build_mail { $email->header_str_set(CC => @{$mail->{cc}}) if $mail->{cc}; $email->header_str_set('Reply-To' => $mail->{reply}) if $mail->{reply}; - return $email->as_string; + return $email->as_string(); } @@ -53,7 +53,7 @@ sub _send { open(my $m, '|-', 'sendmail', '-i', @recipients) or die 'Connecting to sendmail failed. Is it in your PATH?'; - $m->print($mime->as_string); + $m->print($mime->as_string()); close($m); return $? >> 8; } |