Update Module::Load::Conditional to 0.20
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Thu, 4 Oct 2007 09:11:18 +0000 (09:11 +0000)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Thu, 4 Oct 2007 09:11:18 +0000 (09:11 +0000)
p4raw-id: //depot/perl@32022

MANIFEST
lib/Module/Load/Conditional.pm
lib/Module/Load/Conditional/t/01_Module_Load_Conditional.t
lib/Module/Load/Conditional/t/to_load/MustBe/Loaded.pm [moved from lib/Module/Load/Conditional/t/to_load/Must/Be/Loaded.pm with 100% similarity]

index 3fafe76..f816b5d 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -2190,7 +2190,7 @@ lib/Module/Load/Conditional/t/to_load/Commented.pm        Module::Conditional tests
 lib/Module/Load/Conditional/t/to_load/InPod.pm Module::Load::Conditional tests
 lib/Module/Load/Conditional/t/to_load/LoadIt.pm        Module::Conditional tests
 lib/Module/Load/Conditional/t/to_load/LoadMe.pl        Module::Conditional tests
-lib/Module/Load/Conditional/t/to_load/Must/Be/Loaded.pm        Module::Conditional tests
+lib/Module/Load/Conditional/t/to_load/MustBe/Loaded.pm Module::Load::Conditional tests
 lib/Module/Load/Conditional/t/to_load/ToBeLoaded       Module::Conditional tests
 lib/Module/Loaded.pm   Module::Loaded
 lib/Module/Loaded/t/01_Module-Loaded.t Module::Loaded tests
index 613dda1..a97a9f0 100644 (file)
@@ -18,7 +18,7 @@ BEGIN {
                         $FIND_VERSION $ERROR $CHECK_INC_HASH];
     use Exporter;
     @ISA            = qw[Exporter];
-    $VERSION        = '0.18';
+    $VERSION        = '0.20';
     $VERBOSE        = 0;
     $FIND_VERSION   = 1;
     $CHECK_INC_HASH = 0;
index be467fd..45a4f69 100644 (file)
@@ -154,7 +154,7 @@ use_ok( 'Module::Load::Conditional' );
 }
 
 {
-    my $use_list = { 'Must::Be::Loaded' => 1 };
+    my $use_list = { 'MustBe::Loaded' => 1 };
     my $bool = can_load( modules => $use_list );
 
     ok( !$bool, q[Detect out of date module] );
@@ -162,12 +162,12 @@ use_ok( 'Module::Load::Conditional' );
 
 {
     delete $INC{'LoadIt.pm'};
-    delete $INC{'Must/Be/Loaded.pm'};
+    delete $INC{'MustBe/Loaded.pm'};
 
-    my $use_list = { 'LoadIt' => 1, 'Must::Be::Loaded' => 1 };
+    my $use_list = { 'LoadIt' => 1, 'MustBe::Loaded' => 1 };
     my $bool = can_load( modules => $use_list );
 
-    ok( !$INC{'LoadIt.pm'} && !$INC{'Must/Be/Loaded.pm'},
+    ok( !$INC{'LoadIt.pm'} && !$INC{'MustBe/Loaded.pm'},
         q[Do not load if one prerequisite fails]
     );
 }