diff options
author | Jannis M. Hoffmann <jannis.hoffmann@rwth-aachen.de> | 2022-05-22 16:31:21 +0200 |
---|---|---|
committer | Jannis M. Hoffmann <jannis.hoffmann@rwth-aachen.de> | 2022-05-22 16:31:21 +0200 |
commit | b36eada764601355be4616fb92822ffabdcb1dc8 (patch) | |
tree | 5e8f008e2dca88fcfa8250a0b9364f31f9b8eccd /lib/JWebmail/Model | |
parent | 1f11775ff8ea42ac1d9c8d1e54628a9e5935d18d (diff) |
fixes for lint issues
Diffstat (limited to 'lib/JWebmail/Model')
-rw-r--r-- | lib/JWebmail/Model/ReadMails/Role.pm | 2 | ||||
-rw-r--r-- | lib/JWebmail/Model/WriteMails.pm | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/lib/JWebmail/Model/ReadMails/Role.pm b/lib/JWebmail/Model/ReadMails/Role.pm index 593672c..1f4390b 100644 --- a/lib/JWebmail/Model/ReadMails/Role.pm +++ b/lib/JWebmail/Model/ReadMails/Role.pm @@ -56,7 +56,7 @@ around @methods => sub { my $succ = eval { @res = $orig->(@_); 1 }; $_[1]->{password} = $safe; die unless $succ; - return wantarray ? @res : $res[$#res]; + return wantarray ? @res : $res[-1]; }; around read_headers_for => sub { diff --git a/lib/JWebmail/Model/WriteMails.pm b/lib/JWebmail/Model/WriteMails.pm index 7a50bcb..f4d09e8 100644 --- a/lib/JWebmail/Model/WriteMails.pm +++ b/lib/JWebmail/Model/WriteMails.pm @@ -24,13 +24,13 @@ sub _build_mail { }, body_str => $mail->{message}, ); - my $attach = Email::MIME->create( + my $attach = $mail->{attach} ? Email::MIME->create( attributes => { content_type => $mail->{attach_type}, encoding => 'base64', }, body => $mail->{attach}->asset->slurp, - ) if $mail->{attach}; + ) : undef; my $email = Email::MIME->create( header_str => [ |