summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xmdkapplet4
1 files changed, 3 insertions, 1 deletions
diff --git a/mdkapplet b/mdkapplet
index bd6989d4..8a4ad6d9 100755
--- a/mdkapplet
+++ b/mdkapplet
@@ -189,12 +189,14 @@ ugtk2::exit(0);
# Signal management
sub harvester {
my ($_signame, $clean) = @_;
- my $childpid;
+ my ($childpid, @pids);
do {
$childpid = waitpid(-1, &WNOHANG);
+ push @pids, $childpid;
WIFEXITED($?) and refresh_gui(1);
} while $childpid > 0;
return if $clean;
+ return @pids;
}
sub fork_exec {
my $pid = run_program::raw({ detach => 1 }, @_);