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=7b03c6f6104833ac99a5cc6f423ed237235bf49f;hp=dba5c8c8b1c21e0222f9115660476edf0ac62f41;hb=e128626c409797822ffd8a4079f833eb3dc0fd37;hpb=733f404b1631c344ec33fc9b23a90558cf06d781 diff --git a/lib/Mouse/Meta/Class.pm b/lib/Mouse/Meta/Class.pm index dba5c8c..7b03c6f 100644 --- a/lib/Mouse/Meta/Class.pm +++ b/lib/Mouse/Meta/Class.pm @@ -244,6 +244,8 @@ sub make_immutable { $self->{is_immutable}++; + $self->{strict_constructor} = $args{strict_constructor}; + if ($args{inline_constructor}) { my $c = $self->constructor_class; Mouse::Util::load_class($c); @@ -461,7 +463,7 @@ Mouse::Meta::Class - The Mouse class metaclass =head1 VERSION -This document describes Mouse version 0.49 +This document describes Mouse version 0.50_01 =head1 METHODS