From: Jesse Luehrs Date: Sat, 3 Apr 2010 00:59:25 +0000 (-0500) Subject: one more immutability test (t0m) X-Git-Tag: 1.05~17 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=01cd689a0ed32f7f95673dbafe4c1c69bc7a42e5;p=gitmo%2FMoose.git one more immutability test (t0m) --- diff --git a/t/050_metaclasses/052_metaclass_compat.t b/t/050_metaclasses/052_metaclass_compat.t index 8e71ee5..f09dcf5 100644 --- a/t/050_metaclasses/052_metaclass_compat.t +++ b/t/050_metaclasses/052_metaclass_compat.t @@ -77,6 +77,7 @@ ok(Foo::Sub->meta->constructor_class->meta->can('does_role') $meta->superclasses('Foo2'); { our $TODO; local $TODO = "need to handle immutability better"; ::lives_ok { $meta->superclasses('Bar2') }; + ::lives_ok { $meta->make_mutable if $meta->is_immutable }; } }