diff options
Diffstat (limited to 'lib/JWebmail/Model/ReadMails/Role.pm')
| -rw-r--r-- | lib/JWebmail/Model/ReadMails/Role.pm | 2 |
1 files changed, 1 insertions, 1 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 { |