summaryrefslogtreecommitdiff
path: root/t/harness
diff options
context:
space:
mode:
authorSteve Hay <SteveHay@planit.com>2009-02-12 10:46:32 +0000
committerSteve Hay <SteveHay@planit.com>2009-02-12 10:49:24 +0000
commite469bedac84e3190c05f3a44d15fca15dea0b5d7 (patch)
tree819334a275630c1a803e2bec36f6c21f0cfe9639 /t/harness
parent32d85a01d8a0c63b0bda39908dac74ae5bd5fcbd (diff)
downloadperl-e469bedac84e3190c05f3a44d15fca15dea0b5d7.tar.gz
win32/ext doesn't exist any more, so no need to look there for tests
Diffstat (limited to 't/harness')
-rw-r--r--t/harness3
1 files changed, 1 insertions, 2 deletions
diff --git a/t/harness b/t/harness
index b19bf7fd80..b087cc5b15 100644
--- a/t/harness
+++ b/t/harness
@@ -188,9 +188,8 @@ if (@ARGV) {
my $mani = File::Spec->catfile(File::Spec->updir, "MANIFEST");
if (open(MANI, $mani)) {
my @manitests = ();
- my $ext_pat = $^O eq 'MSWin32' ? '(?:win32/)?ext' : 'ext';
while (<MANI>) { # similar code in t/TEST
- if (m!^($ext_pat/(\S+)/+(?:[^/\s]+\.t|test\.pl)|lib/\S+?(?:\.t|test\.pl))\s!) {
+ if (m!^(ext/(\S+)/+(?:[^/\s]+\.t|test\.pl)|lib/\S+?(?:\.t|test\.pl))\s!) {
my ($test, $extension) = ($1, $2);
if (defined $extension) {
$extension =~ s!/t$!!;