about summary refs log tree commit homepage
path: root/t/check-www-inbox.perl
diff options
context:
space:
mode:
authorEric Wong <e@80x24.org>2019-01-29 03:42:48 +0000
committerEric Wong <e@80x24.org>2019-01-29 21:36:02 +0000
commita6f2d5b61e37a49d8278b250d172b497a88c2b45 (patch)
tree00a083c42e47f64a714627355a8de572cb01f049 /t/check-www-inbox.perl
parent75154e05332cae23502bb5b503fe5c797bdf6526 (diff)
downloadpublic-inbox-a6f2d5b61e37a49d8278b250d172b497a88c2b45.tar.gz
WWW::Mechanize keeps an infinitely large stack, which was
leading to OOM errors on my system.
Diffstat (limited to 't/check-www-inbox.perl')
-rw-r--r--t/check-www-inbox.perl1
1 files changed, 1 insertions, 0 deletions
diff --git a/t/check-www-inbox.perl b/t/check-www-inbox.perl
index 0a6d61bb..db292c50 100644
--- a/t/check-www-inbox.perl
+++ b/t/check-www-inbox.perl
@@ -151,6 +151,7 @@ sub worker_loop {
         $SIG{CHLD} = 'DEFAULT';
         my $m = WWW::Mechanize->new(autocheck => 0);
         my $cc = LWP::ConnCache->new;
+        $m->stack_depth(0); # no history
         $m->conn_cache($cc);
         while (1) {
                 $todo_rd->recv(my $u, 65535, 0);