Backport another speedup tweak from bleadperl.
[gitmo/Class-C3-XS.git] / t / 35_next_method_in_anon.t
index 67342b5..aa82f9c 100644 (file)
@@ -5,10 +5,7 @@ use warnings;
 
 use Test::More tests => 3;
 
-BEGIN {
-    use lib 'opt', '../opt', '../blib/lib';    
-    use_ok('c3');
-}
+BEGIN { use_ok('Class::C3::XS') }
 
 =pod
 
@@ -19,7 +16,6 @@ anonymous subroutine.
 
 {
     package A;
-    use c3; 
 
     sub foo {
       return 'A::foo';
@@ -33,7 +29,6 @@ anonymous subroutine.
 {
     package B;
     use base 'A';
-    use c3; 
     
     sub foo {
       my $code = sub {
@@ -53,8 +48,6 @@ anonymous subroutine.
     }
 }
 
-Class::C3::initialize();  
-
 is(B->foo, "B::foo => A::foo",
    'method resolved inside anonymous sub');