diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-17 02:38:51 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-03-17 02:38:51 +0000 |
commit | 8c99d73ee7ce90de2561496f683f3850d1269e1d (patch) | |
tree | a21438cb6df6e0f9bd32b60e76c325dc77c63886 /lib | |
parent | c0e79ee675a176431bd9b70e680da3356d8e2dbd (diff) | |
download | perl-8c99d73ee7ce90de2561496f683f3850d1269e1d.tar.gz |
integrate cfgperl contents into mainline
p4raw-id: //depot/perl@5767
Diffstat (limited to 'lib')
-rw-r--r-- | lib/CGI.pm | 2 | ||||
-rw-r--r-- | lib/ExtUtils/Mksymlists.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/CGI.pm b/lib/CGI.pm index a81ac07909..3e032578b2 100644 --- a/lib/CGI.pm +++ b/lib/CGI.pm @@ -3280,7 +3280,7 @@ my ($vol) = $MAC ? MacPerl::Volumes() =~ /:(.*)/ : ""; unless ($TMPDIRECTORY) { @TEMP=("${SL}usr${SL}tmp","${SL}var${SL}tmp", "C:${SL}temp","${SL}tmp","${SL}temp", - "${vol}${SL}Temporary Items", + "${vol}${SL}Temporary Items","${SL}sys\$scratch", "${SL}WWW_ROOT"); unshift(@TEMP,$ENV{'TMPDIR'}) if exists $ENV{'TMPDIR'}; diff --git a/lib/ExtUtils/Mksymlists.pm b/lib/ExtUtils/Mksymlists.pm index 1ba5bcd234..c8f41c74bc 100644 --- a/lib/ExtUtils/Mksymlists.pm +++ b/lib/ExtUtils/Mksymlists.pm @@ -157,7 +157,7 @@ sub _write_vms { require Config; # a reminder for once we do $^O require ExtUtils::XSSymSet; - my($isvax) = $Config::Config{'arch'} =~ /VAX/i; + my($isvax) = $Config::Config{'archname'} =~ /VAX/i; my($set) = new ExtUtils::XSSymSet; my($sym); |