d002ef56a2861d99 didn't fix the Makefile.PL to reflect the moved test location.
authorNicholas Clark <nick@ccl4.org>
Wed, 25 Mar 2009 20:38:11 +0000 (20:38 +0000)
committerDavid Mitchell <davem@iabyn.com>
Sun, 19 Apr 2009 16:47:15 +0000 (17:47 +0100)
(cherry picked from commit 83c6af602074d4e19919ea41f9f654424df9664f)

ext/Module-Pluggable/Makefile.PL

index 0548418..cd05af8 100644 (file)
@@ -13,13 +13,11 @@ my %dodgy_files = (
 );
 
 my $core = grep { $_ eq 'PERL_CORE=1' } @ARGV;
-my @path = $core ? (File::Spec->updir, File::Spec->updir, File::Spec->updir,
-                   "t", "Module_Pluggable") : ($FindBin::Bin,"t");
 
 my @files;
 unless (grep { lc($^O) eq $_ } qw(vms vos)) {
     foreach my $test (keys %dodgy_files) {
-        my ($file) = (catfile(@path, "lib", $test)=~/^(.*)$/);
+        my ($file) = (catfile($FindBin::Bin, "t", "lib", $test)=~/^(.*)$/);
         if (open(FH, ">$file")) {
             my $name = $dodgy_files{$test};
             print FH "package $name;\nsub new {}\n1;";