$attribute->create($metaclass, $attribute->name, %{$attribute});
}
+ if(!$attribute->{associated_methods} && ($attribute->{is} || '') ne 'bare'){
+ Carp::cluck(
+ 'Attribute (' . $attribute->name . ') of class ' . $metaclass->name
+ . ' has no associated methods (did you mean to provide an "is" argument?)');
+ }
+
return;
}
=head1 VERSION
-This document describes Mouse version 0.50_01
+This document describes Mouse version 0.50_02
=head1 METHODS