Author: kane
Date: Fri Nov 9 04:03:58 2007
New Revision: 10207
Modified:
CPANPLUS-Dist-Build/ (props changed)
CPANPLUS-Dist-Build/trunk/t/02_CPANPLUS-Dist-Build.t
Log:
[EMAIL PROTECTED]: josboum | 2007-11-09 12:51:44 +0100
* use unix dirs on 'use lib' on VMS
Modified: CPANPLUS-Dist-Build/trunk/t/02_CPANPLUS-Dist-Build.t
==============================================================================
--- CPANPLUS-Dist-Build/trunk/t/02_CPANPLUS-Dist-Build.t (original)
+++ CPANPLUS-Dist-Build/trunk/t/02_CPANPLUS-Dist-Build.t Fri Nov 9
04:03:58 2007
@@ -164,7 +164,13 @@
# The installation directory actually needs to be in @INC
# in order to test uninstallation
- 'lib'->import( File::Spec->catdir($Lib, 'lib', 'perl5') );
+ { my $libdir = File::Spec->catdir($Lib, 'lib', 'perl5');
+
+ # lib.pm is documented to require unix-style paths
+ $libdir = VMS::Filespec::unixify($libdir) if $^O eq 'VMS';
+
+ 'lib'->import( $libdir );
+ }
# EU::Installed and CP+::M are only capable of searching
# for modules in the core directories. We need to fake
