PERFORCE change 13154 for review

Change 13154 by pudge@pudge-mobile on 2001/11/21 03:16:55

	Remove comments.

Affected files ...

.... //depot/maint-5.6/macperl/lib/File/Spec/Mac.pm#4 edit

Differences ...

==== //depot/maint-5.6/macperl/lib/File/Spec/Mac.pm#4 (text) ====
Index: perl/lib/File/Spec/Mac.pm
--- perl/lib/File/Spec/Mac.pm.~1~	Tue Nov 20 20:30:06 2001
+++ perl/lib/File/Spec/Mac.pm	Tue Nov 20 20:30:06 2001
@@ -667,8 +667,8 @@
     my $base_dirs = ($self->splitpath( $base ))[1] ;
 
     # Now, remove all leading components that are the same
-    my @pathchunks = $self->splitdir( $path_dirs ); # expected: ('')
-    my @basechunks = $self->splitdir( $base_dirs ); # expected: (d1, d2)
+    my @pathchunks = $self->splitdir( $path_dirs );
+    my @basechunks = $self->splitdir( $base_dirs );
 	
     while ( @pathchunks &&
 	    @basechunks &&
End of Patch.