From 2a21c44486d05ca8bdd9ae5994c23a5fdc81d55f Mon Sep 17 00:00:00 2001 From: "Jerry D. Hedden" Date: Mon, 25 Aug 2008 06:47:24 -0400 Subject: [PATCH] Add cygperl*.dll to packlist From: "Jerry D. Hedden" Message-ID: <1ff86f510808250747s1e0c42demb2d4ac8dc5d33925@mail.gmail.com> p4raw-id: //depot/perl@34226 --- installperl | 20 ++++++++++++++++---- 1 file changed, 16 insertions(+), 4 deletions(-) diff --git a/installperl b/installperl index b014f80..e496b06 100755 --- a/installperl +++ b/installperl @@ -365,12 +365,24 @@ if ($Is_VMS) { # We did core file selection during build map { s|^$coredir/||i; } @corefiles = <$coredir/*.*>; } elsif ($Is_Cygwin) { # On Cygwin symlink it to CORE to make Makefile happy + @corefiles = <*.h libperl*.* perl*$Config{lib_ext}>; my $coredll = "$installarchlib/CORE/$libperl"; + safe_unlink($coredll); ( $Config{'d_link'} eq 'define' && - eval { CORE::link "$installbin/$libperl", $coredll } ) || - eval { symlink "$installbin/$libperl", $coredll } || - copy("$installbin/$libperl", $coredll); - @corefiles = <*.h libperl*.* perl*$Config{lib_ext}>; + eval { + CORE::link("$installbin/$libperl", $coredll); + $packlist->{$coredll} = { from => "$installbin/$libperl", + type => 'link' }; + } + ) || + eval { + symlink("$installbin/$libperl", $coredll); + $packlist->{$coredll} = { from => "$installbin/$libperl", + type => 'link' }; + } || + ( copy("$installbin/$libperl", $coredll) && + push(@corefiles, $coredll) + ) } else { # [als] hard-coded 'libperl' name... not good! @corefiles = <*.h libperl*.* perl*$Config{lib_ext}>; -- 2.7.4