diff options
Diffstat (limited to 'lib/Sietima.pm')
-rw-r--r-- | lib/Sietima.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Sietima.pm b/lib/Sietima.pm index 704d4f8..48b90c5 100644 --- a/lib/Sietima.pm +++ b/lib/Sietima.pm @@ -1,5 +1,5 @@ package Sietima; -use 5.020; +use 5.024; use Moo; use Types::Standard qw(ArrayRef Object FileHandle Maybe); use Type::Params qw(compile); @@ -70,7 +70,7 @@ sub munge_mail { from => $self->return_path, to => [ map { $_->address } - @{$self->subscribers_to_send_to($incoming_mail)}, + $self->subscribers_to_send_to($incoming_mail)->@* ], }); } @@ -80,7 +80,7 @@ sub send_message { my ($self,$outgoing_message) = $check->(@_); my $envelope = $outgoing_message->envelope; - if ($envelope->{to} && @{$envelope->{to}}) { + if ($envelope->{to} && $envelope->{to}->@*) { $self->transport->send( $outgoing_message->mail, $envelope, |