summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-03-17 02:38:51 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-03-17 02:38:51 +0000
commit8c99d73ee7ce90de2561496f683f3850d1269e1d (patch)
treea21438cb6df6e0f9bd32b60e76c325dc77c63886 /lib
parentc0e79ee675a176431bd9b70e680da3356d8e2dbd (diff)
downloadperl-8c99d73ee7ce90de2561496f683f3850d1269e1d.tar.gz
integrate cfgperl contents into mainline
p4raw-id: //depot/perl@5767
Diffstat (limited to 'lib')
-rw-r--r--lib/CGI.pm2
-rw-r--r--lib/ExtUtils/Mksymlists.pm2
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);