diff options
author | dakkar <dakkar@thenautilus.net> | 2020-01-25 16:25:20 +0000 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2020-01-25 16:25:20 +0000 |
commit | e55f4624cf43a7da5e67706d2759a38298b327e7 (patch) | |
tree | 22cca5121fe86413984d71339a5db70142ea8cd6 /lib/MaildirIndexer/Index/ByRef.rakumod | |
parent | say where things went wrong (diff) | |
download | MaildirIndexer-e55f4624cf43a7da5e67706d2759a38298b327e7.tar.gz MaildirIndexer-e55f4624cf43a7da5e67706d2759a38298b327e7.tar.bz2 MaildirIndexer-e55f4624cf43a7da5e67706d2759a38298b327e7.zip |
Revert "fewer temporary variables"
This reverts commit 314ee051c170c33d2c912b6750f916b73f9cb507.
I think that the bug with LEAVE messes up return values inside
Log::Timeline as well
Diffstat (limited to 'lib/MaildirIndexer/Index/ByRef.rakumod')
-rw-r--r-- | lib/MaildirIndexer/Index/ByRef.rakumod | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lib/MaildirIndexer/Index/ByRef.rakumod b/lib/MaildirIndexer/Index/ByRef.rakumod index 3a5ebdb..6e5b7f5 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,10 +36,11 @@ method del-path(IO:D $file, Str:D $mailbox --> Nil) { } method mailbox-for-email(MaildirIndexer::Email:D $email --> Str) { - MaildirIndexer::LogTimelineSchema::Index::Find.log: :class('ByRef'), { + my Str $result; + MaildirIndexer::LogTimelineSchema::Index::Find.log: :class('ByRef'), -> { for |$email.refs() -> $ref { - with %!mailboxes-for-id{$ref} { return .keys.sort.[0] } + with %!mailboxes-for-id{$ref} { $result = .keys.sort.[0] } } - return Nil; } + return $result; } |