From: Dave Rolsky Date: Thu, 22 Jan 2009 22:58:37 +0000 (+0000) Subject: fix this test so it actually tests the right thing (though it really needs to look... X-Git-Tag: 0.65~1 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e016145bb5cb74abea3ad95d9ccc92d40ce6cc67;p=gitmo%2FMoose.git fix this test so it actually tests the right thing (though it really needs to look at the error message to do it properly --- diff --git a/t/030_roles/003_apply_role.t b/t/030_roles/003_apply_role.t index de35519..1ccff67 100644 --- a/t/030_roles/003_apply_role.t +++ b/t/030_roles/003_apply_role.t @@ -36,8 +36,6 @@ use Test::Exception; sub boo {'BarClass::boo'} sub foo {'BarClass::foo'} # << the role overrides this ... - - __PACKAGE__->meta->make_immutable( debug => 0 ); } { @@ -50,8 +48,6 @@ use Test::Exception; sub blau {'FooClass::blau'} # << the role wraps this ... sub goo {'FooClass::goo'} # << overrides the one from the role ... - - __PACKAGE__->meta->make_immutable( debug => 0 ); } { @@ -74,12 +70,12 @@ dies_ok { '... does_role requires a role name'; dies_ok { - $foo_class_meta->apply_role(); + $foo_class_meta->add_role(); } '... apply_role requires a role'; dies_ok { - $foo_class_meta->apply_role( bless( {} => 'Fail' ) ); + $foo_class_meta->add_role( bless( {} => 'Fail' ) ); } '... apply_role requires a role';