X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/4b2ec4957be2ed3a01f0988d6c21ef52d25c5c7a..d37d8ed3e7f38ecc5e707af8622a55f8b9333e07:/configpm diff --git a/configpm b/configpm index 9defbe4..86abd6d 100755 --- a/configpm +++ b/configpm @@ -60,7 +60,7 @@ $in_v = 0; while (<>) { next if m:^#!/bin/sh:; - # Catch CONFIGDOTSH=true and PERL_VERSION=n line from Configure. + # Catch PERL_CONFIG_SH=true and PERL_VERSION=n line from Configure. s/^(\w+)=(true|\d+)\s*$/$1='$2'\n/; my ($k,$v) = ($1,$2); # grandfather PATCHLEVEL and SUBVERSION and CONFIG @@ -71,7 +71,7 @@ while (<>) { elsif ($k eq 'PERL_SUBVERSION') { push @v_others, "SUBVERSION='$v'\n"; } - elsif ($k eq 'CONFIGDOTSH') { + elsif ($k eq 'PERL_CONFIG_SH') { push @v_others, "CONFIG='$v'\n"; } } @@ -148,13 +148,13 @@ sub FETCH { } elsif ($_[1] =~ /^((?:cc|ld)flags|libs(?:wanted)?)_nolargefiles/) { # These are purely virtual, they do not exist, but need to # be computed on demand for largefile-incapable extensions. - my $key = "${1}_largefiles"; + my $key = "${1}_uselargefiles"; $value = $Config{$1}; my $withlargefiles = $Config{$key}; if ($key =~ /^(?:cc|ld)flags_/) { $value =~ s/\Q$withlargefiles\E\b//; } elsif ($key =~ /^libs/) { - my @lflibswanted = split(' ', $Config{libswanted_largefiles}); + my @lflibswanted = split(' ', $Config{libswanted_uselargefiles}); if (@lflibswanted) { my %lflibswanted; @lflibswanted{@lflibswanted} = (); @@ -274,6 +274,7 @@ if ($OS2::is_aout) { $preconfig{$_} = $v eq 'undef' ? undef : $v; } } +$preconfig{d_fork} = undef unless $OS2::can_fork; # Some funny cases can't sub TIEHASH { bless {%preconfig} } ENDOFSET } else { @@ -418,7 +419,7 @@ EOF print CONFIG <