sub strict_constructor;
*strict_constructor = $generate_class_accessor->('strict_constructor');
+sub _invalidate_metaclass_cache {
+ my($self) = @_;
+ delete $self->{_mouse_cache};
+ return;
+}
+
sub _report_unknown_args {
my($metaclass, $attrs, $args) = @_;
if ($args->{lazy}) {
(exists $args->{default} || defined $args->{builder})
- || $class->throw_error("You cannot have lazy attribute ($name) without specifying a default value for it");
+ || $class->throw_error("You cannot have a lazy attribute ($name) without specifying a default value for it");
}
return;
sub type_parameter { $_[0]->{type_parameter} }
sub _compiled_type_constraint{ $_[0]->{compiled_type_constraint} }
-sub _compiled_type_coercion { $_[0]->{_compiled_type_coercion} }
sub __is_parameterized { exists $_[0]->{type_parameter} }
sub has_coercion { exists $_[0]->{_compiled_type_coercion} }
=head1 VERSION
-This document describes Mouse version 0.80
+This document describes Mouse version 0.87
=head1 SEE ALSO