fix broken gotos for Catalyst::Plugin::C3, added slightly modified next::method tests...

[gitmo/Class-C3-XS.git] / t / 32_next_method_edge_cases.t

diff --git a/t/32_next_method_edge_cases.t b/t/32_next_method_edge_cases.t
index 5af7004..422f134 100644 (file)
--- a/t/32_next_method_edge_cases.t
+++ b/t/32_next_method_edge_cases.t
@@ -5,9 +5,7 @@ use warnings;
 
 use Test::More tests => 12;
 
-BEGIN {   
-    use_ok('Class::C3');
-}
+BEGIN { use_ok('Class::C3::XS') }
 
 {
 
@@ -15,7 +13,6 @@ BEGIN {
         package Foo;
         use strict;
         use warnings;
-        use Class::C3;
         sub new { bless {}, $_[0] }
         sub bar { 'Foo::bar' }
     }
@@ -34,7 +31,6 @@ BEGIN {
         package Bar;
         use strict;
         use warnings;
-        use Class::C3;
         our @ISA = ('Foo');
     }  
     
@@ -54,8 +50,6 @@ BEGIN {
             *{'Bar::bar'} = $m;
         }
 
-        Class::C3::initialize();  
-
         can_ok($bar, 'bar');
         my $value = eval { $bar->bar() };
         ok(!$@, '... calling bar() succedded') || diag $@;
@@ -67,7 +61,6 @@ BEGIN {
         package Baz;
         use strict;
         use warnings;
-        use Class::C3;
         our @ISA = ('Foo');
     }      
     
@@ -82,9 +75,7 @@ BEGIN {
             *{'Baz::bar'} = $m;
         }
 
-        Class::C3::initialize();  
-
         eval { $baz->bar() };
         ok($@, '... calling bar() with next::method failed') || diag $@;
     }    
-}
\ No newline at end of file
+}