From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.4.2 (2018-09-13) on dcvr.yhbt.net X-Spam-Level: X-Spam-ASN: X-Spam-Status: No, score=-4.0 required=3.0 tests=ALL_TRUSTED,BAYES_00 shortcircuit=no autolearn=ham autolearn_force=no version=3.4.2 Received: from localhost (dcvr.yhbt.net [127.0.0.1]) by dcvr.yhbt.net (Postfix) with ESMTP id 511D31F4B4 for ; Mon, 5 Apr 2021 07:42:34 +0000 (UTC) From: Eric Wong To: spew@80x24.org Subject: [PATCH] wip Date: Mon, 5 Apr 2021 12:42:34 +0500 Message-Id: <20210405074234.22610-1-e@80x24.org> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit List-Id: --- script/lei | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/script/lei b/script/lei index 78a7dab9..5b9b2e34 100755 --- a/script/lei +++ b/script/lei @@ -14,12 +14,9 @@ my $send_cmd = PublicInbox::CmdIPC4->can('send_cmd4') // do { PublicInbox::Spawn->can('send_cmd4'); }; -my %pids; my $sigchld = sub { my $flags = scalar(@_) ? POSIX::WNOHANG() : 0; - for my $pid (keys %pids) { - delete($pids{$pid}) if waitpid($pid, $flags) == $pid; - } + undef while ((waitpid(-1, $flags) // -1) > 0); }; my @parent; my $exec_cmd = sub { @@ -48,7 +45,7 @@ my $exec_cmd = sub { $do_exec->() if scalar(@$fds); # git-credential, pager # parent backgrounds on MUA - POSIX::setsid() > 0 or die "setsid: $!"; + #POSIX::setsid() > 0 or die "setsid: $!"; @parent = ($parent); return; # continue $recv_cmd in background }