diff options
author | Andreas König <a.koenig@mind.de> | 2001-05-05 20:23:28 +0200 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-05 18:32:15 +0000 |
commit | d38b618adccc72975870768057165000623f0d37 (patch) | |
tree | 078a8d5ca31b1825159d2131bbad46d2a4da57f1 /x2p/s2p.PL | |
parent | 96e821d57e0ce06bdcf42060deb9cea0b0589546 (diff) | |
download | perl-d38b618adccc72975870768057165000623f0d37.tar.gz |
Re: bleadperl make install fails due to "psed"
Message-ID: <m3u22zg3y7.fsf@ak-71.mind.de>
p4raw-id: //depot/perl@10000
Diffstat (limited to 'x2p/s2p.PL')
-rw-r--r-- | x2p/s2p.PL | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/x2p/s2p.PL b/x2p/s2p.PL index d215781dae..a24a2e2fe8 100644 --- a/x2p/s2p.PL +++ b/x2p/s2p.PL @@ -1960,5 +1960,14 @@ way you wish, provided you do not restrict others from doing the same. close OUT or die "Can't close $file: $!"; chmod 0755, $file or die "Can't reset permissions for $file: $!\n"; +unlink 'psed'; +print "Linking s2p to psed.\n"; +if (defined $Config{d_link}) { + link 's2p', 'psed'; +} else { + unshift @INC, '../lib'; + require File::Copy; + File::Copy::syscopy('s2p', 'psed'); +} exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':'; chdir $origdir; |