script/lei: waitpid for git-credential and pager

We need to ensure we reap things we spawn.

1 files changed, 5 insertions, 1 deletions

diff --git a/script/lei b/script/lei
index 78a7dab9..76217ab9 100755
--- a/script/lei
+++ b/script/lei
@@ -52,7 +52,11 @@ my $exec_cmd = sub {
                 @parent = ($parent);
                 return; # continue $recv_cmd in background
         }
-        $do_exec->() if !scalar(@$fds); # MUA reuses all FDs
+        if (scalar(@$fds)) {
+                $pids{$pid} = undef;
+        } else {
+                $do_exec->(); # MUA reuses all FDs
+        }
 };
 
 if ($send_cmd && eval {