shell now returns a Proc::Status object that bools.

tadzik · Oct 29, 2013 · 9f2591b · 9f2591b
1 parent 08e09b0
commit 9f2591b
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/lib/Panda/Builder.pm b/lib/Panda/Builder.pm
@@ -87,7 +87,7 @@ method build($where) {
                 say "Compiling $file to {compsuffix}";
                 shell "$*EXECUTABLE_NAME --target={compsuffix} "
                     ~ "--output=$dest $file"
-                    and fail "Failed building $file";
+                        or fail "Failed building $file";
             }
             1;
         }

diff --git a/lib/Panda/Fetcher.pm b/lib/Panda/Fetcher.pm
@@ -19,7 +19,7 @@ method fetch($from, $to) {
 
 sub git-fetch($from, $to) {
     shell "git clone -q $from \"$to\""
-          and fail "Failed cloning git repository '$from'";
+        or fail "Failed cloning git repository '$from'";
     return True;
 }
 

diff --git a/lib/Panda/Tester.pm b/lib/Panda/Tester.pm
@@ -6,7 +6,7 @@ method test($where, :$prove-command = 'prove') {
         if 't'.IO ~~ :d {
             withp6lib {
                 my $c = "$prove-command -e $*EXECUTABLE_NAME -r t/";
-                shell $c and fail "Tests failed";
+                shell $c or fail "Tests failed";
             }
         }
     };