Retract #17428, not needed in this version of File::Spec.

p4raw-id: //depot/perl@17444

diff --git a/lib/File/Spec/Unix.pm b/lib/File/Spec/Unix.pm
index c6ca111..87ee505 100644 (file)
--- a/lib/File/Spec/Unix.pm
+++ b/lib/File/Spec/Unix.pm
@@ -141,10 +141,8 @@ is tainted, it is not used.
 my $tmpdir;
 sub tmpdir {
     return $tmpdir if defined $tmpdir;
-    my @dirlist = ( "/tmp" );
-    if ( exists $ENV{TMPDIR} )
+    my @dirlist = ($ENV{TMPDIR}, "/tmp");
     {
-      unshift @dirlist, $ENV{TMPDIR};
        no strict 'refs';
        if (${"\cTAINT"}) { # Check for taint mode on perl >= 5.8.0
             require Scalar::Util;