From: Nicholas Clark <nick@ccl4.org>
Date: Wed, 25 Mar 2009 20:38:11 +0000 (+0000)
Subject: d002ef56a2861d99 didn't fix the Makefile.PL to reflect the moved test location.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=83c6af602074d4e19919ea41f9f654424df9664f;p=p5sagit%2Fp5-mst-13.2.git

d002ef56a2861d99 didn't fix the Makefile.PL to reflect the moved test location.
---

diff --git a/ext/Module-Pluggable/Makefile.PL b/ext/Module-Pluggable/Makefile.PL
index 0548418..cd05af8 100644
--- a/ext/Module-Pluggable/Makefile.PL
+++ b/ext/Module-Pluggable/Makefile.PL
@@ -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;";