X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Froles%2Fmethod_aliasing_in_composition.t;fp=t%2Froles%2Fmethod_aliasing_in_composition.t;h=c392eae94fc1fe33aa6f04ae627cdc42a71008b8;hb=2afe5289a42e908d111db381a826c66d93fbb913;hp=c6146a732cbbca0c70f73e1d449a24ad323039ad;hpb=7d24db9289ff608fb713ac0e699422a4e36f4d42;p=gitmo%2FMoose.git diff --git a/t/roles/method_aliasing_in_composition.t b/t/roles/method_aliasing_in_composition.t index c6146a7..c392eae 100644 --- a/t/roles/method_aliasing_in_composition.t +++ b/t/roles/method_aliasing_in_composition.t @@ -57,7 +57,7 @@ ok(My::Class->meta->has_method($_), "we have a $_ method") for qw(foo baz bar ro } ok(My::OtherRole->meta->has_method($_), "we have a $_ method") for qw(foo baz role_bar); -ok(My::OtherRole->meta->requires_method('bar'), '... and the &bar method is required'); +ok(!My::OtherRole->meta->requires_method('bar'), '... and the &bar method is not required'); ok(!My::OtherRole->meta->requires_method('role_bar'), '... and the &role_bar method is not required'); {