diff options
| author | Gerrit P. Haase <gp@familiehaase.de> | 2002-01-27 23:30:41 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-01-27 22:36:08 +0000 |
| commit | b53432e421f16fabc5e5530a1e2ce8c38d941676 (patch) | |
| tree | 385555d9e411d81aab96e2b608779032e1a61d67 /installperl | |
| parent | 9034b73c39ba035933bec3984d6d794720dc58e1 (diff) | |
| download | perl-b53432e421f16fabc5e5530a1e2ce8c38d941676.tar.gz | |
Bleadperl on Cygwin today
Message-ID: <462007239437.20020127223041@familiehaase.de>
p4raw-id: //depot/perl@14453
Diffstat (limited to 'installperl')
| -rwxr-xr-x | installperl | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/installperl b/installperl index c18fd6ad25..c4cab78e0c 100755 --- a/installperl +++ b/installperl @@ -234,7 +234,9 @@ if (($Is_W32 and ! $Is_NetWare) or $Is_Cygwin) { if ($Is_Cygwin) { $perldll = $libperl; - $perldll =~ s/(\..*)?$/.$dlext/; + my $v_e_r_s = $ver; $v_e_r_s =~ tr/./_/; + $perldll =~ s/(\..*)?$/$v_e_r_s.$dlext/; + $perldll =~ s/^lib/cyg/; if ($Config{useshrplib} eq 'true') { # install ld2 and perlld as well foreach ('ld2', 'perlld') { @@ -242,6 +244,18 @@ if (($Is_W32 and ! $Is_NetWare) or $Is_Cygwin) { copy("$_", "$installbin/$_"); chmod(0755, "$installbin/$_"); }; + { + open (LD2, "$installbin/ld2"); + print LD2 "#!/bin/sh\n#\n# ld wrapper, passes all args to perlld;\n#\n" + . "for trythis in $installbin/perl\ndo\n if [ -x \$trythis ]\n" + . " then\n \$trythis $installbin/perlld \"\$\@\"\n" + . " exit \$?\n fi\ndone\n# hard luck!\necho i see no perl" + . " executable around there\necho perl is required to build " + . "dynamic libraries\necho look if the path to perl in /bin/ld2" + . " is correct\nexit 1\n"; + close LD2; + }; + chmod(0755, "$installbin/ld2"); }; } else { $perldll = 'perl57.' . $dlext; |