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.