X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F35_next_method_in_anon.t;h=aa82f9ce1a5b3470cda79a80ca2ac24350737502;hb=3277bbc437306ad76a15c90b4271b4534ea633a5;hp=67342b5bb0ec25dad3ba4d236d31d566f1550080;hpb=8995e8271e0f7f7b9c0942a4425e8a44099bf608;p=gitmo%2FClass-C3-XS.git diff --git a/t/35_next_method_in_anon.t b/t/35_next_method_in_anon.t index 67342b5..aa82f9c 100644 --- a/t/35_next_method_in_anon.t +++ b/t/35_next_method_in_anon.t @@ -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');