lei: exit code in oneshot mode

waitpid() in DESTROY ends up setting $? for the exit status,
thus we must reap IPC children before calling CORE::exit.

This fixes t/lei-oneshot.t with TEST_RUN_MODE=0

1 files changed, 5 insertions, 0 deletions

diff --git a/lib/PublicInbox/LEI.pm b/lib/PublicInbox/LEI.pm
index f3edfe82..97ae2c41 100644
--- a/lib/PublicInbox/LEI.pm
+++ b/lib/PublicInbox/LEI.pm
@@ -249,6 +249,11 @@ sub x_it ($$) {
         if (my $sock = $self->{sock}) {
                 send($sock, "x_it $code", MSG_EOR);
         } elsif (!($code & 127)) { # oneshot, ignore signals
+                # don't want to end up using $? from child processes
+                for my $f (qw(lxs l2m)) {
+                        my $wq = delete $self->{$f} or next;
+                        $wq->DESTROY;
+                }
                 $quit->($code >> 8);
         }
 }