X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F030_roles%2Ffailing%2F012_method_exclusion_in_composition.t;h=d852b17e12e22d1c35567d2324cea13b11647714;hp=f678d2c9e3913249056691f3748f856e7c2a93a1;hb=6fea087bcf1c984bd8afc7c2d5b4a078569e3b5c;hpb=71e7b544ac5b18ce7b09b9a95723b1a4e28b4321 diff --git a/t/030_roles/failing/012_method_exclusion_in_composition.t b/t/030_roles/failing/012_method_exclusion_in_composition.t index f678d2c..d852b17 100644 --- a/t/030_roles/failing/012_method_exclusion_in_composition.t +++ b/t/030_roles/failing/012_method_exclusion_in_composition.t @@ -39,7 +39,7 @@ ok(My::OtherRole->meta->has_method($_), "we have a $_ method") for qw(foo bar ba ok(!My::OtherRole->meta->requires_method('foo'), '... and the &foo method is not required'); ok(My::OtherRole->meta->requires_method('bar'), '... and the &bar method is required'); -use Data::Dumper; print Dumper(My::OtherRole->meta->{required_methods}); + { package Foo::Role; use Mouse::Role;