In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/fe0fb48b9e1689ad6e74e0516047f20e411bc3b4?hp=b3d3f340c96cb99839ea33b8b7e9dd55bdbdfeab>

- Log -----------------------------------------------------------------
commit fe0fb48b9e1689ad6e74e0516047f20e411bc3b4
Author: Nicholas Clark <[email protected]>
Date:   Sat Sep 26 21:21:30 2009 +0100

    TestInit at the command line should treat tests in cpan/ the same as in ext/
-----------------------------------------------------------------------

Summary of changes:
 TestInit.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/TestInit.pm b/TestInit.pm
index 73bd8cf..7eec5b4 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[\\/][^\\/]+)[\//](.*\.t)$!$2!) {
+    if ($0 =~ s!^((?:ext|cpan)[\\/][^\\/]+)[\//](.*\.t)$!$2!) {
        # Looks like a test in ext.
        chdir $1 or die "Can't chdir '$1': $!";
        new_inc(@up_2_t);

--
Perl5 Master Repository

Reply via email to