X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FExtUtils%2FInstall.pm;h=6a5c1847accc5aa67a0d797857d18eb6770d81d3;hb=2bd2b9e04a68ec86766c4219cf4da7f0d3168395;hp=992d178659861bc64e3d3fadd57e59b29a04b34f;hpb=354f3b563e416c45738a8a6587f56819e7000baa;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/ExtUtils/Install.pm b/lib/ExtUtils/Install.pm
index 992d178..6a5c184 100644
--- a/lib/ExtUtils/Install.pm
+++ b/lib/ExtUtils/Install.pm
@@ -81,10 +81,13 @@ sub install {
 	#there are any files in arch. So we depend on having ./blib/arch
 	#hardcoded here.
 	my $targetroot = $hash{$source};
-	if ($source eq "./blib/lib" and
-	    exists $hash{"./blib/arch"} and
-	    directory_not_empty("./blib/arch")) {
-	    $targetroot = $hash{"./blib/arch"};
+	if ($source eq "blib/lib" and
+	    exists $hash{"blib/arch"} and
+	    directory_not_empty("blib/arch")) {
+	    $targetroot = $hash{"blib/arch"};
+            print "Files found in blib/arch --> Installing files in " 
+	        . "blib/lib into architecture dependend library tree!\n"
+		; #if $verbose>1;
 	}
 	chdir($source) or next;
 	find(sub {