diff options
Diffstat (limited to 't/harness')
-rw-r--r-- | t/harness | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -187,8 +187,9 @@ if (@ARGV) { # Keep a list of the distinct directory names, and another list of # those which contain a file whose name begins with a 0 - if ($file =~ m! \A (?: \.\. / )? - ( .*? ) # $1 is the directory path name + if ($file =~ m! \A ( (?: \.\. / )? + .*? + ) # $1 is the directory path name / ( [^/]* \. (?: t | pl ) ) # $2 is the test name \z !x) @@ -206,7 +207,7 @@ if (@ARGV) { # directory containing such files should be tested in serial order. # # Add exceptions to the above rule - for (qw(cpan/IO-Zlib/t ext/File-Find/t)) { + for (qw(../cpan/IO-Zlib/t ../ext/File-Find/t)) { $serials{$_} = 1; } |