diff options
author | Eric Wong <e@80x24.org> | 2019-05-08 09:07:36 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2019-05-08 18:16:40 +0000 |
commit | 1a893e4ec99ce438788cf8cfa17279452c3b26b7 (patch) | |
tree | f31b3c96f2cf4a5dcb92239d19ea497a4a877ffc /lib/PublicInbox/DS.pm | |
parent | e229e045a93ef35c335af00cd0e130a6ec6146d4 (diff) | |
download | public-inbox-1a893e4ec99ce438788cf8cfa17279452c3b26b7.tar.gz |
IO::Poll::_poll returns -1, which is "true" to Perl. cf. https://rt.cpan.org/Ticket/Display.html?id=129484
Diffstat (limited to 'lib/PublicInbox/DS.pm')
-rw-r--r-- | lib/PublicInbox/DS.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/PublicInbox/DS.pm b/lib/PublicInbox/DS.pm index ea09fc96..5dd1bb7c 100644 --- a/lib/PublicInbox/DS.pm +++ b/lib/PublicInbox/DS.pm @@ -386,7 +386,7 @@ sub PollEventLoop { } my $count = IO::Poll::_poll($timeout, @poll); - unless ($count) { + unless ($count >= 0) { return unless PostEventLoop(); next; } |