fix for EU:MM 6.55_02 failing test,
David Mitchell [Wed, 5 Aug 2009 20:40:55 +0000 (21:40 +0100)]
as suggested by Schwern

lib/ExtUtils/t/00compile.t

index cadfe55..20f7ded 100644 (file)
@@ -21,8 +21,8 @@ chdir "..";
 my $manifest = "MANIFEST";
 open(my $manifest_fh, "<", $manifest) or die "Can't open $manifest: $!";
 my @modules = map { m{^lib/(\S+)}; $1 } 
-              grep { m{^lib/\S+\.pm} } 
-              <$manifest_fh>;
+              grep { m{^lib/ExtUtils/\S*\.pm} } 
+              grep { !m{/t/} } <$manifest_fh>;
 chomp @modules;
 close $manifest_fh;