diff options
| -rw-r--r-- | TestInit.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/TestInit.pm b/TestInit.pm index e7609dae5d..814c99c399 100644 --- a/TestInit.pm +++ b/TestInit.pm @@ -60,7 +60,7 @@ sub import { # 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|dist|cpan)[\\/][^\\/]+)[\//](.*\.t)$!$2!) { + if ($0 =~ s!^((?:ext|dist|cpan)[\\/][^\\/]+)[\\/](.*\.t)$!$2!) { # Looks like a test in ext. $chdir = $1; @INC = @up_2_t; |