X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=installperl;h=07b1e5562782a45022e09c114965a2bb209274a8;hb=7025f710301089a3f0e734f3192916a373b2e2e9;hp=53468a9139e909b5139cd63077fd6ab80150a636;hpb=91a06757ac3b925b7c0c6afbf3f1378bd4051754;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/installperl b/installperl
index 53468a9..07b1e55 100755
--- a/installperl
+++ b/installperl
@@ -243,6 +243,7 @@ if (! $versiononly || !($installprivlib =~ m/\Q$]/)) {
 		       "${installarchlib}/pod/perldiag.pod");
     if (compare($from, $to) || $nonono) {
 	mkpath("${installarchlib}/pod", 1, 0777);
+	unlink($to);
 	link($from, $to);
     }
 }
@@ -414,7 +415,7 @@ sub installlib {
     }
 
     if (-f $_) {
-	if (/\.al$/ || /\.ix$/) {
+	if (/\.(?:al|ix)$/ && !($dir =~ m[^auto/(.*)$] && $archpms{$1})) {
 	    $installlib = $installprivlib;
 	    #We're installing *.al and *.ix files into $installprivlib,
 	    #but we have to delete old *.al and *.ix files from the 5.000