diff options
| author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2016-08-09 15:54:32 +0100 |
|---|---|---|
| committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2016-08-09 15:54:32 +0100 |
| commit | d54b913b776dc3a9adcba8270395b6b02874dd22 (patch) | |
| tree | 4a8806459d735ac95e38be3165b473e1f3e3954a /t | |
| parent | use the new deliveries comparator (diff) | |
| download | Sietima-d54b913b776dc3a9adcba8270395b6b02874dd22.tar.gz Sietima-d54b913b776dc3a9adcba8270395b6b02874dd22.tar.bz2 Sietima-d54b913b776dc3a9adcba8270395b6b02874dd22.zip | |
Use postderef for hash k/v slice
Diffstat (limited to 't')
| -rw-r--r-- | t/lib/Test/Sietima/MailStore.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/Test/Sietima/MailStore.pm b/t/lib/Test/Sietima/MailStore.pm index 78b76f3..ff4064c 100644 --- a/t/lib/Test/Sietima/MailStore.pm +++ b/t/lib/Test/Sietima/MailStore.pm @@ -34,7 +34,7 @@ sub retrieve_by_tags { for my $m ($self->_mails->@*) { next unless all { $m->{tags}{$_} } @tags; push @ret, { - %{$m}{id}, + $m->%{id}, mail => Email::MIME->new($m->{mail}) }; } |