Test depends also relied on the $*EXECUTABLE being altered

tadzik · Jul 19, 2015 · 7df467b · 7df467b
1 parent a9407b4
commit 7df467b
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/lib/Panda/Bundler.pm b/lib/Panda/Bundler.pm
@@ -82,7 +82,7 @@ method bundle($panda, :$notests, Str :$name, Str :$auth, Str :$ver, Str :$desc)
 
         unless $notests {
             $panda.announce('testing', $bone);
-            unless $_ = $panda.tester.test($dir) {
+            unless $_ = $panda.tester.test($dir, :deps) {
                 die X::Panda.new($bone.name, 'test', $_)
             }
             if %*ENV<PANDA_DEPTRACKER_FILE>.IO.e {

diff --git a/lib/Panda/Tester.pm b/lib/Panda/Tester.pm
@@ -1,7 +1,7 @@
 class Panda::Tester {
 use Panda::Common;
 
-method test($where, :$bone, :$prove-command = $*DISTRO.name eq 'mswin32' ?? 'prove.bat' !! 'prove') {
+method test($where, :$bone, :$prove-command = $*DISTRO.name eq 'mswin32' ?? 'prove.bat' !! 'prove', $deps) {
     indir $where, {
         my Bool $run-default = True;
         if "Build.pm".IO.f {
@@ -21,7 +21,8 @@ method test($where, :$bone, :$prove-command = $*DISTRO.name eq 'mswin32' ?? 'pro
                 my $stdout = '';
                 my $stderr = '';
 
-                my $proc = Proc::Async.new($prove-command, '-e', "$*EXECUTABLE -Ilib", '-r', 't/');
+                my $p6command = $deps ?? "$*EXECUTABLE -MPanda::DepTracker" !! $*EXECUTABLE;
+                my $proc = Proc::Async.new($prove-command, '-e', "$p6command -Ilib", '-r', 't/');
                 $proc.stdout.tap(-> $chunk {
                     print $chunk;
                     $output ~= $chunk;