From: Gurusamy Sarathy Date: Tue, 4 Jul 2000 16:14:44 +0000 (+0000) Subject: remove rel2abs prototypes (from Barrie Slaymaker) X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=786b702fd554cca5ea2fbd5fa8b43a3f3d95bf11;p=p5sagit%2Fp5-mst-13.2.git remove rel2abs prototypes (from Barrie Slaymaker) p4raw-id: //depot/perl@6303 --- diff --git a/lib/File/Spec/Mac.pm b/lib/File/Spec/Mac.pm index 4d365cb..9ef55ec 100644 --- a/lib/File/Spec/Mac.pm +++ b/lib/File/Spec/Mac.pm @@ -362,7 +362,7 @@ L for details. =cut -sub rel2abs($;$;) { +sub rel2abs { my ($self,$path,$base ) = @_; if ( ! $self->file_name_is_absolute( $path ) ) { diff --git a/lib/File/Spec/Unix.pm b/lib/File/Spec/Unix.pm index 36036f3..a81c533 100644 --- a/lib/File/Spec/Unix.pm +++ b/lib/File/Spec/Unix.pm @@ -423,7 +423,7 @@ Based on code written by Shigio Yamaguchi. =cut -sub rel2abs($;$;) { +sub rel2abs { my ($self,$path,$base ) = @_; # Clean up $path diff --git a/lib/File/Spec/VMS.pm b/lib/File/Spec/VMS.pm index cc06ca6..c19695d 100644 --- a/lib/File/Spec/VMS.pm +++ b/lib/File/Spec/VMS.pm @@ -451,7 +451,7 @@ Use VMS syntax when converting filespecs. =cut -sub rel2abs($;$;) { +sub rel2abs { my $self = shift ; return vmspath(File::Spec::Unix::rel2abs( $self, @_ )) if ( join( '', @_ ) =~ m{/} ) ; diff --git a/lib/File/Spec/Win32.pm b/lib/File/Spec/Win32.pm index 8510d1f..f5d6cda 100644 --- a/lib/File/Spec/Win32.pm +++ b/lib/File/Spec/Win32.pm @@ -312,7 +312,7 @@ sub abs2rel { } -sub rel2abs($;$;) { +sub rel2abs { my ($self,$path,$base ) = @_; if ( ! $self->file_name_is_absolute( $path ) ) {