X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FClass.pm;h=08bb9d33a21ba7bf51dc653676829293d3ae5f69;hp=eab409f55468b3db438ccc1b4cafd8301de62608;hb=32490a728e1a7ec2ea29be2b87a7ed39a6e8f496;hpb=5176a3e41f75dc3f0de6049ac642087580f94680 diff --git a/lib/Mouse/Meta/Class.pm b/lib/Mouse/Meta/Class.pm index eab409f..08bb9d3 100644 --- a/lib/Mouse/Meta/Class.pm +++ b/lib/Mouse/Meta/Class.pm @@ -264,7 +264,11 @@ sub make_immutable { return 1; } -sub make_mutable { not_supported } +sub make_mutable { + my($self) = @_; + $self->{is_immutable} = 0; + return; +} sub is_immutable { $_[0]->{is_immutable} } sub is_mutable { !$_[0]->{is_immutable} } @@ -458,7 +462,7 @@ Mouse::Meta::Class - The Mouse class metaclass =head1 VERSION -This document describes Mouse version 0.42 +This document describes Mouse version 0.44 =head1 METHODS