Author: kane
Date: Wed Nov 14 04:06:03 2007
New Revision: 10239
Modified:
CPANPLUS-Dist-Build/trunk/ (props changed)
CPANPLUS-Dist-Build/trunk/t/inc/conf.pl
Log:
[EMAIL PROTECTED]: kane | 2007-11-14 13:06:01 +0100
* update from cpanplus' t/inc/conf.pl
Modified: CPANPLUS-Dist-Build/trunk/t/inc/conf.pl
==============================================================================
--- CPANPLUS-Dist-Build/trunk/t/inc/conf.pl (original)
+++ CPANPLUS-Dist-Build/trunk/t/inc/conf.pl Wed Nov 14 04:06:03 2007
@@ -132,7 +132,7 @@
### directory, rmtree it
if( -d $path ) {
- $file =~ s/\.dir//i if $^O eq 'VMS';
+ $file =~ s/\.dir$//i if $^O eq 'VMS';
my $dirpath = File::Spec->catdir( $dir, $file );
