X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F300_immutable%2F001_immutable_moose.t;h=1c561aeb4e8aca3398b7c836abc117af85d5a34e;hp=2e1f74c8cd24ac650e55ca13d061e6ec2331772e;hb=7ca5c5fb6e084d9c57bc022b336458afc74c6847;hpb=43e6a50b260b096a34b0c46da87296bd220c4184 diff --git a/t/300_immutable/001_immutable_moose.t b/t/300_immutable/001_immutable_moose.t index 2e1f74c..1c561ae 100644 --- a/t/300_immutable/001_immutable_moose.t +++ b/t/300_immutable/001_immutable_moose.t @@ -41,11 +41,10 @@ use Mouse::Meta::Role; is( Foo->new->bazes, 'many bazes', "correct value for 'bazes' before inlining constructor" ); lives_ok { $meta->make_immutable } "Foo is imutable"; - SKIP: { - skip "Mouse doesn't supports ->identifier, add_role", 2; - lives_ok { $meta->identifier } "->identifier on metaclass lives"; - dies_ok { $meta->add_role($foo_role) } "Add Role is locked"; - }; + + lives_ok { $meta->identifier } "->identifier on metaclass lives"; + dies_ok { $meta->add_role($foo_role) } "Add Role is locked"; + lives_ok { Foo->new } "Inlined constructor works with lazy_build"; is( Foo->new->foos, 'many foos', "correct value for 'foos' after inlining constructor" );