X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=installperl;h=fb16bab0be2a031ece164eb20bfdcafbc4a92860;hb=4e1a6d261e266112da00fd82e73dbe2a0631027c;hp=86d9c2c6303a25b0dde32284a551de6135734979;hpb=33bd2d8f0a8d0bccb1393938cc94ab135b31928f;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/installperl b/installperl
index 86d9c2c..fb16bab 100755
--- a/installperl
+++ b/installperl
@@ -425,11 +425,7 @@ if ($Config{installusrbinperl} && $Config{installusrbinperl} eq 'define' &&
 	      (-l $usrbinperl) &&
 	      ((readlink $usrbinperl) eq $expinstperl));
     }
-    if ((! $mainperl_is_instperl) &&
-	(yn("Many scripts expect perl to be installed as $usrbinperl.\n" . 
-	     "Do you wish to have $usrbinperl be the same as\n" .
-	     "$expinstperl? [y] ")))
-    {
+    if (! $mainperl_is_instperl) {
 	unlink($usrbinperl);
 	( $Config{'d_link'} eq 'define' &&
 	  eval { CORE::link $instperl, $usrbinperl } )	||