X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-StrictConstructor.git;a=blobdiff_plain;f=lib%2FMooseX%2FStrictConstructor%2FRole%2FMeta%2FMethod%2FConstructor.pm;h=5c0a8a489a0eae10d5ab1d6f70818918fc55834c;hp=577a8465bdfbe1bf50d47fceba52a60dc3aa5cea;hb=8ce99ddba2861ea19c26ebdadceaf1898a544ef8;hpb=0a0390cc1aa08bb9a5f2727fe203d0a3cfdc5757 diff --git a/lib/MooseX/StrictConstructor/Role/Meta/Method/Constructor.pm b/lib/MooseX/StrictConstructor/Role/Meta/Method/Constructor.pm index 577a846..5c0a8a4 100644 --- a/lib/MooseX/StrictConstructor/Role/Meta/Method/Constructor.pm +++ b/lib/MooseX/StrictConstructor/Role/Meta/Method/Constructor.pm @@ -19,7 +19,7 @@ around '_generate_BUILDALL' => sub ( map { "$_ => 1," } grep { defined } map { $_->init_arg() } - @{ $self->attributes() } + @{ $self->_attributes() } ); $source .= <<"EOF";