X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-StrictConstructor.git;a=blobdiff_plain;f=lib%2FMooseX%2FStrictConstructor%2FTrait%2FClass.pm;fp=lib%2FMooseX%2FStrictConstructor%2FTrait%2FClass.pm;h=c6865c695c94c7377bc4d713ef54622912fbbb15;hp=f4c106a50b8ccdc83df940f33fc16a18ac000176;hb=7d51074a04f1ed362e74ff1cb5ac781a6db5df6d;hpb=7e1ef712f7bd41f400fa9d7cc565487fa2fff57e diff --git a/lib/MooseX/StrictConstructor/Trait/Class.pm b/lib/MooseX/StrictConstructor/Trait/Class.pm index f4c106a..c6865c6 100644 --- a/lib/MooseX/StrictConstructor/Trait/Class.pm +++ b/lib/MooseX/StrictConstructor/Trait/Class.pm @@ -37,7 +37,7 @@ after superclasses => sub { return unless @_; Moose::Util::MetaRole::apply_base_class_roles( - for => $self->name, + for => $self->name(), roles => ['MooseX::StrictConstructor::Role::Object'], ); };