From 314ee051c170c33d2c912b6750f916b73f9cb507 Mon Sep 17 00:00:00 2001
From: dakkar <dakkar@thenautilus.net>
Date: Sat, 25 Jan 2020 15:35:02 +0000
Subject: fewer temporary variables

we can `return` from an inner block, even when that block is executed
somewhere else: `return` is lexical!
---
 lib/MaildirIndexer/Index/ByRef.rakumod | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

(limited to 'lib/MaildirIndexer/Index/ByRef.rakumod')

diff --git a/lib/MaildirIndexer/Index/ByRef.rakumod b/lib/MaildirIndexer/Index/ByRef.rakumod
index 6e5b7f5..3a5ebdb 100644
--- a/lib/MaildirIndexer/Index/ByRef.rakumod
+++ b/lib/MaildirIndexer/Index/ByRef.rakumod
@@ -13,7 +13,7 @@ method dump() {
 }
 
 method add-mail(MaildirIndexer::Email:D $email, Str:D $mailbox --> Nil) {
-    MaildirIndexer::LogTimelineSchema::Index::Add.log: :class('ByRef'),:$mailbox, -> {
+    MaildirIndexer::LogTimelineSchema::Index::Add.log: :class('ByRef'),:$mailbox, {
         # ignore adding the same file twice, files in maildirs are
         # immutable
         return if %!id-for-file{ $email.path }:exists;
@@ -26,7 +26,7 @@ method add-mail(MaildirIndexer::Email:D $email, Str:D $mailbox --> Nil) {
 }
 
 method del-path(IO:D $file, Str:D $mailbox --> Nil) {
-    MaildirIndexer::LogTimelineSchema::Index::Rm.log: :class('ByRef'),:$mailbox, -> {
+    MaildirIndexer::LogTimelineSchema::Index::Rm.log: :class('ByRef'),:$mailbox, {
         my $id = %!id-for-file{ $file.path }:delete or return;
         with %!mailboxes-for-id{ $id } -> $boxes {
             $boxes{$mailbox}:delete;
@@ -36,11 +36,10 @@ method del-path(IO:D $file, Str:D $mailbox --> Nil) {
 }
 
 method mailbox-for-email(MaildirIndexer::Email:D $email --> Str) {
-    my Str $result;
-    MaildirIndexer::LogTimelineSchema::Index::Find.log: :class('ByRef'), -> {
+    MaildirIndexer::LogTimelineSchema::Index::Find.log: :class('ByRef'), {
         for |$email.refs() -> $ref {
-            with %!mailboxes-for-id{$ref} { $result = .keys.sort.[0] }
+            with %!mailboxes-for-id{$ref} { return .keys.sort.[0] }
         }
+        return Nil;
     }
-    return $result;
 }
-- 
cgit v1.2.3