From e5590311007f9d126e61510d42228303fdf94e54 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Sun, 7 Jul 2019 03:49:19 +0000 Subject: daemon: use POSIX and WNOHANG more idiomatically No point in uglifying our code since we need the POSIX module in many places, anyways. --- lib/PublicInbox/Daemon.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/PublicInbox/Daemon.pm b/lib/PublicInbox/Daemon.pm index 2046a7f5..6cb3a0ca 100644 --- a/lib/PublicInbox/Daemon.pm +++ b/lib/PublicInbox/Daemon.pm @@ -8,6 +8,7 @@ use warnings; use Getopt::Long qw/:config gnu_getopt no_ignore_case auto_abbrev/; use IO::Handle; use IO::Socket; +use POSIX qw(WNOHANG); use Socket qw(IPPROTO_TCP SOL_SOCKET); sub SO_ACCEPTFILTER () { 0x1000 } use Cwd qw/abs_path/; @@ -15,7 +16,6 @@ STDOUT->autoflush(1); STDERR->autoflush(1); use PublicInbox::DS qw(now); require PublicInbox::EvCleanup; -require POSIX; require PublicInbox::Listener; require PublicInbox::ParentPipe; my @CMD; @@ -437,7 +437,7 @@ sub upgrade_aborted ($) { sub reap_children () { while (1) { - my $p = waitpid(-1, &POSIX::WNOHANG) or return; + my $p = waitpid(-1, WNOHANG) or return; if (defined $reexec_pid && $p == $reexec_pid) { upgrade_aborted($p); } elsif (defined(my $id = delete $pids{$p})) { -- cgit v1.2.3-24-ge0c7