X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=TestInit.pm;h=8513955ab73d4756d4f6da1a4dbbdf47d1165a5d;hb=d2d1d4de13bedc11af82b2ca4fd580671530195c;hp=7eec5b47106afda8de5c0d48f57bfc4fa7d5a2e3;hpb=fe0fb48b9e1689ad6e74e0516047f20e411bc3b4;p=p5sagit%2Fp5-mst-13.2.git diff --git a/TestInit.pm b/TestInit.pm index 7eec5b4..8513955 100644 --- a/TestInit.pm +++ b/TestInit.pm @@ -59,7 +59,7 @@ if (-f 't/TEST' && -f 'MANIFEST' && -d 'lib' && -d 'ext') { # We're being run from the top level. Try to change directory, and set # things up correctly. This is a 90% solution, but for hand-running tests, # that's good enough - if ($0 =~ s!^((?:ext|cpan)[\\/][^\\/]+)[\//](.*\.t)$!$2!) { + if ($0 =~ s!^((?:ext|dist|cpan)[\\/][^\\/]+)[\//](.*\.t)$!$2!) { # Looks like a test in ext. chdir $1 or die "Can't chdir '$1': $!"; new_inc(@up_2_t);