summaryrefslogtreecommitdiff
path: root/lib/JWebmail/Model
diff options
context:
space:
mode:
authorJannis M. Hoffmann <jannis.hoffmann@rwth-aachen.de>2022-05-22 16:31:21 +0200
committerJannis M. Hoffmann <jannis.hoffmann@rwth-aachen.de>2022-05-22 16:31:21 +0200
commitb36eada764601355be4616fb92822ffabdcb1dc8 (patch)
tree5e8f008e2dca88fcfa8250a0b9364f31f9b8eccd /lib/JWebmail/Model
parent1f11775ff8ea42ac1d9c8d1e54628a9e5935d18d (diff)
fixes for lint issues
Diffstat (limited to 'lib/JWebmail/Model')
-rw-r--r--lib/JWebmail/Model/ReadMails/Role.pm2
-rw-r--r--lib/JWebmail/Model/WriteMails.pm4
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 => [