summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authordakkar <dakkar@thenautilus.net>2020-01-25 16:12:48 +0000
committerdakkar <dakkar@thenautilus.net>2020-01-25 16:12:48 +0000
commit3e7de25aec48971ed3d736177c066a39515f89b2 (patch)
treeb545ea72adade23f70f26e25c5c543bb1d066708
parentdon't die if the other end closes the socket (diff)
downloadMaildirIndexer-3e7de25aec48971ed3d736177c066a39515f89b2.tar.gz
MaildirIndexer-3e7de25aec48971ed3d736177c066a39515f89b2.tar.bz2
MaildirIndexer-3e7de25aec48971ed3d736177c066a39515f89b2.zip
safer socket input?
-rw-r--r--lib/MaildirIndexer/Parser.rakumod1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/MaildirIndexer/Parser.rakumod b/lib/MaildirIndexer/Parser.rakumod
index 1762e58..7623d17 100644
--- a/lib/MaildirIndexer/Parser.rakumod
+++ b/lib/MaildirIndexer/Parser.rakumod
@@ -95,6 +95,7 @@ multi parse-email(IO::Socket::Async:D $s --> MaildirIndexer::Email) is export {
# instead of 1.2!) than just C<< $string ~~
# /@separators/ >>
$result = parse-email($string) and done;
+ QUIT { done };
}
}
return $result;