remove direct use of Class::C3 in tests

[p5sagit/Class-C3-Componentised.git] / t / 01-basic.t

diff --git a/t/01-basic.t b/t/01-basic.t
index 12cad2f..8bc81fd 100644 (file)
--- a/t/01-basic.t
+++ b/t/01-basic.t
@@ -8,7 +8,7 @@ use Class::Inspector;
 
 use lib "$FindBin::Bin/lib";
 
-plan tests => 22;
+plan tests => 23;
 
 BEGIN {
   package TestPackage::A;
@@ -54,6 +54,9 @@ throws_ok (
   'MyModule::ErrorComponent threw ok'
 );
 
+eval { MyModule->load_optional_class('ENDS::WITH::COLONS::') };
+like( $@, qr/Invalid class name 'ENDS::WITH::COLONS::'/, 'Throw on Class::' );
+
 # Simulate a PAR environment
 { 
   my @code;
@@ -93,7 +96,7 @@ throws_ok (
   ok( $retval, 'PAR package "loaded"' );
   
   # see if we can still load stuff with the coderef present
-  $retval = eval { MyModule->load_optional_class('Class::C3') };
+  $retval = eval { MyModule->load_optional_class('AnotherModule') };
   ok( !$@, 'load_optional_class did not throw' ) || diag $@;
-  ok( $retval, 'Class::C3 loaded' );
+  ok( $retval, 'AnotherModule loaded' );
 }