remove rel2abs prototypes (from Barrie Slaymaker)
Gurusamy Sarathy [Tue, 4 Jul 2000 16:14:44 +0000 (16:14 +0000)]
p4raw-id: //depot/perl@6303

lib/File/Spec/Mac.pm
lib/File/Spec/Unix.pm
lib/File/Spec/VMS.pm
lib/File/Spec/Win32.pm

index 4d365cb..9ef55ec 100644 (file)
@@ -362,7 +362,7 @@ L</file_name_is_absolute> for details.
 
 =cut
 
-sub rel2abs($;$;) {
+sub rel2abs {
     my ($self,$path,$base ) = @_;
 
     if ( ! $self->file_name_is_absolute( $path ) ) {
index 36036f3..a81c533 100644 (file)
@@ -423,7 +423,7 @@ Based on code written by Shigio Yamaguchi.
 
 =cut
 
-sub rel2abs($;$;) {
+sub rel2abs {
     my ($self,$path,$base ) = @_;
 
     # Clean up $path
index cc06ca6..c19695d 100644 (file)
@@ -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{/} ) ;
index 8510d1f..f5d6cda 100644 (file)
@@ -312,7 +312,7 @@ sub abs2rel {
 }
 
 
-sub rel2abs($;$;) {
+sub rel2abs {
     my ($self,$path,$base ) = @_;
 
     if ( ! $self->file_name_is_absolute( $path ) ) {