X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=lib%2FPublicInbox%2FDS.pm;h=301ec0570e5afad3831a4ca283a8ab26fbaec116;hb=bdfa98ba4a0458613c10d21c090d65400e2a5297;hp=17c640f4c1aac251460e09309dd320fb1bffd1fa;hpb=d6674af04cb74a4efd513d938bed8bf7ab2838eb;p=public-inbox.git diff --git a/lib/PublicInbox/DS.pm b/lib/PublicInbox/DS.pm index 17c640f4..301ec057 100644 --- a/lib/PublicInbox/DS.pm +++ b/lib/PublicInbox/DS.pm @@ -39,8 +39,8 @@ use Errno qw(EAGAIN EINVAL); use Carp qw(croak confess carp); require File::Spec; -my $nextq = []; # queue for next_tick -my $WaitPids = []; # list of [ pid, callback, callback_arg ] +my $nextq; # queue for next_tick +my $WaitPids; # list of [ pid, callback, callback_arg ] my $reap_timer; our ( %DescriptorMap, # fd (num) -> PublicInbox::DS object @@ -69,6 +69,7 @@ Reset all state =cut sub Reset { %DescriptorMap = (); + $nextq = []; $WaitPids = []; $reap_timer = undef; @ToClose = ();