From d3f14711a3e2419f59e93f408e4854366c3997cb Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Sun, 19 Jun 2016 18:30:22 +0100
Subject: bump perl requirement to 5.24

I can haz postderef!
---
 lib/Sietima.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib/Sietima.pm')

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,
-- 
cgit v1.2.3