diff options
author | Arnaud Patard <rtp@mageia.org> | 2012-07-03 12:37:50 +0000 |
---|---|---|
committer | Arnaud Patard <rtp@mageia.org> | 2012-07-03 12:37:50 +0000 |
commit | d8494bc2873592795e462cced9237a6cc3558047 (patch) | |
tree | 0332f7785f1b5d6f3f245dee12e8fb553da4f563 | |
parent | f72fe535d06f617d0a4bbbd809f9682bfcbc3daa (diff) | |
download | iurt-d8494bc2873592795e462cced9237a6cc3558047.tar iurt-d8494bc2873592795e462cced9237a6cc3558047.tar.gz iurt-d8494bc2873592795e462cced9237a6cc3558047.tar.bz2 iurt-d8494bc2873592795e462cced9237a6cc3558047.tar.xz iurt-d8494bc2873592795e462cced9237a6cc3558047.zip |
- fix perform_command return value in case of error.
-rw-r--r-- | lib/Iurt/Process.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Iurt/Process.pm b/lib/Iurt/Process.pm index e94a04c..3ad858d 100644 --- a/lib/Iurt/Process.pm +++ b/lib/Iurt/Process.pm @@ -154,7 +154,6 @@ sub handle_command_error { dump_cache_par($run); die "FATAL: $opt{error}."; } - return 0; } sub handle_wait_regexp { @@ -330,6 +329,7 @@ sub perform_command { if (!$call_ret || $kill || $err || $opt{error_regexp} && $fulloutput =~ /$opt{error_regexp}/) { my $msg = "ERROR: call_ret=$call_ret kill=$kill err=$err ($opt{error_regexp})"; handle_command_error($run, $config, $cache, $msg, $comment, $fulloutput, %opt); + return 0; } 1; } |