diff options
author | Piotr Roszatycki <piotr.roszatycki@gmail.com> | 2014-01-11 20:13:19 +0000 |
---|---|---|
committer | Piotr Roszatycki <piotr.roszatycki@gmail.com> | 2014-01-11 20:13:19 +0000 |
commit | 232d8f2cae54a66db3e497c70effcd01b1569379 (patch) | |
tree | 4aa50592adb88e9737ba30abf333cf6b5daf82aa /t | |
parent | 3dd72ded7f043a4f6973781fe594722e2e95f491 (diff) | |
download | uri-232d8f2cae54a66db3e497c70effcd01b1569379.tar.gz |
Use $ENV{TMPDIR} if defined
Diffstat (limited to 't')
-rw-r--r-- | t/old-base.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/old-base.t b/t/old-base.t index 677d511..31086f5 100644 --- a/t/old-base.t +++ b/t/old-base.t @@ -654,7 +654,7 @@ sub newlocal_test { ($^O eq 'qnx' ? '/usr/bin/fullpath -t' : ($^O eq 'VMS' ? 'show default' : (-e '/bin/pwd' ? '/bin/pwd' : 'pwd')))); - my $tmpdir = ($^O eq 'MSWin32' ? $ENV{TEMP} : '/tmp'); + my $tmpdir = ($^O eq 'MSWin32' ? $ENV{TEMP} : $ENV{TMPDIR} || '/tmp'); if ( $^O eq 'qnx' ) { $tmpdir = `/usr/bin/fullpath -t $tmpdir`; chomp $tmpdir; |