From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 14 Mar 2003 15:16:18 +0000 (+0000)
Subject: Better pass in the $self for a method.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f4b08ef805b12a9d9ddb9e358f4c72e7c4c5a7a4;p=p5sagit%2Fp5-mst-13.2.git

Better pass in the $self for a method.

p4raw-id: //depot/perl@18982
---

diff --git a/lib/File/Spec/Unix.pm b/lib/File/Spec/Unix.pm
index 3922f21..1b882df 100644
--- a/lib/File/Spec/Unix.pm
+++ b/lib/File/Spec/Unix.pm
@@ -163,7 +163,8 @@ sub _tmpdir {
 
 sub tmpdir {
     return $tmpdir if defined $tmpdir;
-    $tmpdir = _tmpdir( $ENV{TMPDIR}, "/tmp" );
+    my $self = shift;
+    $tmpdir = $self->_tmpdir( $ENV{TMPDIR}, "/tmp" );
 }
 
 =item updir