diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-05-06 15:37:30 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-05-06 15:37:30 +0000 |
| commit | 605986241de3d828e4de2beec37dc9ecc5aaa260 (patch) | |
| tree | 4e4c7758c4d45004e25d2c72a576e251302cd58b /lib/File/Spec/Cygwin.pm | |
| parent | 86d86cadad68b71393e3371f0e467c29982578f9 (diff) | |
| download | perl-605986241de3d828e4de2beec37dc9ecc5aaa260.tar.gz | |
Upgrade to PathTools 3.07
p4raw-id: //depot/perl@24407
Diffstat (limited to 'lib/File/Spec/Cygwin.pm')
| -rw-r--r-- | lib/File/Spec/Cygwin.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/File/Spec/Cygwin.pm b/lib/File/Spec/Cygwin.pm index e01e03537a..19a2937c6b 100644 --- a/lib/File/Spec/Cygwin.pm +++ b/lib/File/Spec/Cygwin.pm @@ -76,8 +76,7 @@ variables are tainted, they are not used. my $tmpdir; sub tmpdir { return $tmpdir if defined $tmpdir; - my $self = shift; - $tmpdir = $self->_tmpdir( $ENV{TMPDIR}, "/tmp", 'C:/temp' ); + $tmpdir = $_[0]->_tmpdir( $ENV{TMPDIR}, "/tmp", 'C:/temp' ); } =back |