From 75154e05332cae23502bb5b503fe5c797bdf6526 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Tue, 29 Jan 2019 03:37:24 +0000 Subject: t/check-www-inbox: don't follow mboxes They can be extremely large with no limit, so can lead to OOM errors. --- t/check-www-inbox.perl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 't/check-www-inbox.perl') diff --git a/t/check-www-inbox.perl b/t/check-www-inbox.perl index 933362a7..0a6d61bb 100644 --- a/t/check-www-inbox.perl +++ b/t/check-www-inbox.perl @@ -175,7 +175,7 @@ sub worker_loop { my $s; # blocking foreach my $l (@links, "DONE\t$u") { - next if $l eq ''; + next if $l eq '' || $l =~ /\.mbox(?:\.gz)\z/; do { $s = $done_wr->send($l, MSG_EOR); } while (!defined $s && $!{EINTR}); -- cgit v1.2.3-24-ge0c7