From: Andy Dougherty <doughera@lafayette.edu>
Date: Wed, 8 Jul 1998 12:18:32 +0000 (-0400)
Subject: don't try to hardlink perldiag.pod; that is no longer not needed
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e8ea61279d90dbe95701603e650f92b4b079fb6a;p=p5sagit%2Fp5-mst-13.2.git

don't try to hardlink perldiag.pod; that is no longer not needed
	Message-Id: <Pine.SUN.3.96.980708120844.23053D-100000@newton.phys>
	Subject: Re: pelr installation attempts hard links between file systems

p4raw-id: //depot/perl@1386
---

diff --git a/installperl b/installperl
index 44e5d1b..7b2a935 100755
--- a/installperl
+++ b/installperl
@@ -50,8 +50,14 @@ if ($scr_ext) { @scripts = map { "$_$scr_ext" } @scripts; }
 
 @pods = (<pod/*.pod>);
 
+# Specify here any .pm files that are actually architecture-dependent.
+# (Those included with XS extensions under ext/ are automatically
+# added later.)
+# Now that the default privlib has the full perl version number included,
+# we no longer have to play the trick of sticking version-specific .pm 
+# files under the archlib directory.
 %archpms = (
-    Config => 1, FileHandle => 1, overload => 1,
+    Config => 1, 
 );
 
 if ($^O eq 'dos') {
@@ -318,15 +324,6 @@ if (! $versiononly || !($installprivlib =~ m/\Q$]/)) {
 	copy_if_diff($file, "${installprivlib}/${file}");
     }
 
-    # Link perldiag.pod into archlib
-    my ($from, $to) = ("${installprivlib}/pod/perldiag.pod",
-		       "${installarchlib}/pod/perldiag.pod");
-    $packlist->{$to} = { from => $from, type => 'link' };
-    if (compare($from, $to) || $nonono) {
-	mkpath("${installarchlib}/pod", 1, 0777);
-	unlink($to);
-	link($from, $to) if ($^O ne 'dos');
-    }
 }
 
 # Check to make sure there aren't other perls around in installer's