track spec change: &run -> &shell

Raku · Sep 5, 2011 · 143c569 · 143c569
1 parent ab15f81
commit 143c569
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/S02-magicals/env.t b/S02-magicals/env.t
@@ -55,7 +55,7 @@ my $tempfile = "temp-ex-output." ~ $*PID ~ "." ~ 1000.rand;
 
 my $command = qq!$*EXECUTABLE_NAME -e "\%*ENV.perl.say" $redir $tempfile!;
 diag $command;
-run $command;
+shell $command;
 
 my $child_env = slurp $tempfile;
 my %child_env = eval $child_env;
@@ -86,7 +86,7 @@ ok(!%*ENV.exists('PUGS_ROCKS'), 'We can remove keys from %*ENV');
 
 $command = qq!$*EXECUTABLE_NAME -e "\%*ENV.perl.say" $redir $tempfile!;
 diag $command;
-run $command;
+shell $command;
 
 $child_env = slurp $tempfile;
 %child_env = eval $child_env;

diff --git a/packages/Test/Util.pm b/packages/Test/Util.pm
@@ -96,7 +96,7 @@ sub get_out( Str $code, Str $input?, :@args) is export {
         $cmd ~= $fnbase ~ '.code'  if $code.defined;
         $cmd ~= " @actual_args.join(' ') < $fnbase.in > $fnbase.out 2> $fnbase.err";
 #        diag("Command line: $cmd");
-        %out<status> = run( $cmd );
+        %out<status> = shell( $cmd );
         %out<out> = slurp "$fnbase.out";
         %out<err> = slurp "$fnbase.err";