Change 31776 by [EMAIL PROTECTED] on 2007/08/31 22:42:43
Subject: [EMAIL PROTECTED] CPANPLUS extract.pm fixes for VMS.
From: "John E. Malmberg" <[EMAIL PROTECTED]>
Date: Fri, 31 Aug 2007 00:21:52 -0500
Message-id: <[EMAIL PROTECTED]>
catdir was used where catfile was meant.
Affected files ...
... //depot/perl/lib/CPANPLUS/Internals/Extract.pm#2 edit
Differences ...
==== //depot/perl/lib/CPANPLUS/Internals/Extract.pm#2 (text) ====
Index: perl/lib/CPANPLUS/Internals/Extract.pm
--- perl/lib/CPANPLUS/Internals/Extract.pm#1~30883~ 2007-04-10
00:42:33.000000000 -0700
+++ perl/lib/CPANPLUS/Internals/Extract.pm 2007-08-31 15:42:43.000000000
-0700
@@ -183,7 +183,7 @@
# @{$ae->files};
for my $file ( @{$ae->files} ) {
- my $path = File::Spec->rel2abs( File::Spec->catdir($to, $file) );
+ my $path = File::Spec->rel2abs( File::Spec->catfile($to, $file) );
$self->_mode_plus_w( file => $path );
}
End of Patch.
