sbotools2

Maintenance fork of the original sbotools version 2
Log | Files | Refs | README

commit 678ca13d54c3b70206f2f74aaa35500ecee850ee
parent 00d0f5bc0c9efcdb04aa6df88ff0afb4451b9f24
Author: Andreas Guldstrand <andreas.guldstrand@gmail.com>
Date:   Tue, 15 Dec 2015 10:12:14 +0100

If system()s return value is not 0, we need to bitshift it

Diffstat:
Mt/travis.t | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/travis.t b/t/travis.t @@ -25,7 +25,7 @@ sub run { my $cmd = shift @{ $args{cmd} }; my @cmd = ('sudo', $^X, "-I$lib", "$path/$cmd", @{ $args{cmd} }); my $exit = $args{exit}; - my ($output, $return) = capture_merged { system(@cmd) }; + my ($output, $return) = capture_merged { system(@cmd) and $? >> 8; }; return $output if $return == $exit; return "Command $cmd ($path/$cmd) exited with $return instead of $exit"; }