From: Steve Peters Date: Sun, 2 Mar 2008 02:31:06 +0000 (+0000) Subject: Update to Module-Load-Conditional-0.26 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=596fddd5e3e62452096460708abaa5a8cbf23298;p=p5sagit%2Fp5-mst-13.2.git Update to Module-Load-Conditional-0.26 p4raw-id: //depot/perl@33405 --- diff --git a/lib/Module/Load/Conditional.pm b/lib/Module/Load/Conditional.pm index 4cabf82..90f9d6c 100644 --- a/lib/Module/Load/Conditional.pm +++ b/lib/Module/Load/Conditional.pm @@ -18,7 +18,7 @@ BEGIN { $FIND_VERSION $ERROR $CHECK_INC_HASH]; use Exporter; @ISA = qw[Exporter]; - $VERSION = '0.24'; + $VERSION = '0.26'; $VERBOSE = 0; $FIND_VERSION = 1; $CHECK_INC_HASH = 0; diff --git a/lib/Module/Load/Conditional/t/01_Module_Load_Conditional.t b/lib/Module/Load/Conditional/t/01_Module_Load_Conditional.t index 7e0cf2f..01d427a 100644 --- a/lib/Module/Load/Conditional/t/01_Module_Load_Conditional.t +++ b/lib/Module/Load/Conditional/t/01_Module_Load_Conditional.t @@ -64,8 +64,12 @@ use_ok( 'Module::Load::Conditional' ); ### and return it @path; }; - - is( $INC{'Module/Load/Conditional.pm'}, + my $inc_path = $INC{'Module/Load/Conditional.pm'}; + if ( $^O eq 'MSWin32' ) { + $inc_path = File::Spec->canonpath( $inc_path ); + $inc_path =~ s{\\}{/}g; # to meet with unix path + } + is( $inc_path, File::Spec::Unix->catfile(@rv_path), q[ Found proper file] );