Change 18938: File::Spec::Unix method should be called on $self

Change 18938 by pudge@pudge-mobile on 2003/03/12 03:15:26

	File::Spec::Unix method should be called on $self

Affected files ...

... //depot/maint-5.8/macperl/lib/File/Spec/Unix.pm#4 edit

Differences ...

==== //depot/maint-5.8/macperl/lib/File/Spec/Unix.pm#4 (text) ====
Index: macperl/lib/File/Spec/Unix.pm
--- macperl/lib/File/Spec/Unix.pm#3~18901~	Mon Mar 10 20:00:40 2003
+++ macperl/lib/File/Spec/Unix.pm	Tue Mar 11 19:15:26 2003
@@ -88,7 +88,7 @@
 
 sub catfile {
     my $self = shift;
-    my $file = File::Spec->canonpath(pop @_);
+    my $file = $self->canonpath(pop @_);
     return $file unless @_;
     my $dir = $self->catdir(@_);
     $dir .= "/" unless substr($dir,-1) eq "/";
End of Patch.