From d8494bc2873592795e462cced9237a6cc3558047 Mon Sep 17 00:00:00 2001 From: Arnaud Patard Date: Tue, 3 Jul 2012 12:37:50 +0000 Subject: - fix perform_command return value in case of error. --- lib/Iurt/Process.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib') 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; } -- cgit v1.2.1