diff options
Diffstat (limited to 'installperl')
| -rwxr-xr-x | installperl | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/installperl b/installperl index 827e30a160..f36b4c0d05 100755 --- a/installperl +++ b/installperl @@ -413,10 +413,14 @@ if (! $versiononly && ! samepath($installbin, '.') && ($^O ne 'dos') && ! $Is_VM if ($archname && ! samepath($installbin, '.') && ($^O ne 'dos') && ! $Is_VMS) { my $archperl = "$perl_verbase$ver-$Config{archname}$exe_ext"; safe_unlink("$installbin/$archperl"); - if ($^O eq 'mpeix' || $^O eq 'vos') { - # MPE and VOS don't support hard links, so use a symlink. + if ($^O eq 'mpeix') { + # MPE doesn't support hard links, so use a symlink. # We don't want another cloned copy. symlink($Config{perlpath}, "$installbin/$archperl"); + } elsif ($^O eq 'vos') { + # VOS doesn't support hard links, so use a symlink. + symlink("$installbin/$perl_verbase$ver$exe_ext", + "$installbin/$archperl"); } else { link("$installbin/$perl_verbase$ver$exe_ext", "$installbin/$archperl"); |