diff options
author | David Dyck <david.dyck@fluke.com> | 2001-10-01 05:17:36 -0700 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-09 12:23:27 +0000 |
commit | 835f8a63f39ee0b6fcc61424cf4e964d4562ffbb (patch) | |
tree | 39ea37c0788c398408eb1a0ae766472a64e9ef3d /installperl | |
parent | 3a0827a6d3b6f58ae9951a917a4f12158650c772 (diff) | |
download | perl-835f8a63f39ee0b6fcc61424cf4e964d4562ffbb.tar.gz |
[ID 20011001.009] /usr/bin/perl (in addition to /usr/local/bin/perl)
Message-Id: <200110011917.MAA11879@dd.tc.fluke.com>
p4raw-id: //depot/perl@12377
Diffstat (limited to 'installperl')
-rwxr-xr-x | installperl | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/installperl b/installperl index 86d9c2c630..fb16bab0be 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 } ) || |