diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-03-24 15:36:59 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-03-24 15:36:59 +0000 |
commit | ee9645ee5c60ee5bdce25de9c6a85c5e6a5d3baf (patch) | |
tree | 2af5bb5e53943b60b704b89d1a0fd4eb7c7f8c8e /lib/Iurt/Process.pm | |
parent | 1b4611bb481bb90dae60f9927f24be01f39a00a1 (diff) | |
download | iurt-ee9645ee5c60ee5bdce25de9c6a85c5e6a5d3baf.tar iurt-ee9645ee5c60ee5bdce25de9c6a85c5e6a5d3baf.tar.gz iurt-ee9645ee5c60ee5bdce25de9c6a85c5e6a5d3baf.tar.bz2 iurt-ee9645ee5c60ee5bdce25de9c6a85c5e6a5d3baf.tar.xz iurt-ee9645ee5c60ee5bdce25de9c6a85c5e6a5d3baf.zip |
(clean) drop unused arg
Diffstat (limited to 'lib/Iurt/Process.pm')
-rw-r--r-- | lib/Iurt/Process.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Iurt/Process.pm b/lib/Iurt/Process.pm index f53c5e0..90c16df 100644 --- a/lib/Iurt/Process.pm +++ b/lib/Iurt/Process.pm @@ -309,11 +309,11 @@ sub perform_command { sub clean_process { my ($run, $match, $verbose) = @_; - return clean($run, $match, "pgrep -u root -f", "$sudo pkill -9 -u root -f", $verbose); + return clean($match, "pgrep -u root -f", "$sudo pkill -9 -u root -f", $verbose); } sub clean { - my ($_run, $var, $cmd, $kill_cmd, $_verbose) = @_; + my ($var, $cmd, $kill_cmd, $_verbose) = @_; plog('DEBUG', "clean command $var"); $var or die "FATAL: no command given\n."; |