tange/parallel
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/parallel.git synced 2024-11-29 09:27:56 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

niceload: When CTRL-C'ing niceload -p, the controlled PID should continue and not be killed.

Browse source
This commit is contained in:
Ole Tange 2013-08-27 10:58:41 +02:00
parent 11cbbf50cc
commit 987f90d929
1 changed files with 8 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/niceload
View file

@ -397,8 +397,14 @@ sub kill_child_TSTP {
sub kill_child_INT { sub kill_child_INT {
my $self = $Global::process; my $self = $Global::process;
::debug("SIGINT received. Killing $self->{'pid'} Exit\n"); ::debug("SIGINT received.\n");
if(not @opt::pid) {
::debug("Killing $self->{'pid'} Exit\n");
kill INT => $self->pgrp(); kill INT => $self->pgrp();
} else {
::debug("Continue pids $self->{'pid'} Exit\n");
kill CONT => $self->pgrp();
}
exit; exit;
} }