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 | 4d2b73df4443bda54985bd41c3299a1338c0c834 (patch) | |
| tree | a21438cb6df6e0f9bd32b60e76c325dc77c63886 /lib/CGI.pm | |
| parent | 969cd28b4072def6fc1e5900130f727729db8976 (diff) | |
| download | perl-4d2b73df4443bda54985bd41c3299a1338c0c834.tar.gz | |
integrate cfgperl contents into mainline
p4raw-id: //depot/perl@5767
Diffstat (limited to 'lib/CGI.pm')
| -rw-r--r-- | lib/CGI.pm | 2 |
1 files changed, 1 insertions, 1 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'}; |