From b29b116f7d3f32a14257a4a55169d8ce11d71267 Mon Sep 17 00:00:00 2001 From: Marcelo Leitner Date: Wed, 20 Feb 2008 18:51:23 +0000 Subject: - Block two too dangerous pkill commands. - Enhance logging for another pkill command. --- lib/Iurt/Process.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'lib/Iurt/Process.pm') diff --git a/lib/Iurt/Process.pm b/lib/Iurt/Process.pm index a15bbc4..9a9128f 100644 --- a/lib/Iurt/Process.pm +++ b/lib/Iurt/Process.pm @@ -315,6 +315,7 @@ sub clean { my $i; while ($ps = `$cmd "$var"`) { + plog('WARN', "Killing: $kill_cmd $var"); system(qq($kill_cmd "$var" &>/dev/null)); sleep 1; $ps =~ s/\n/,/g; -- cgit v1.2.1