X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FRole.pm;h=225ed0b56be1e7b4e02c6a50a1a5415ba6354a29;hb=refs%2Ftags%2F0.40_06;hp=9c1e994f8c5a4d1f415050e95f85bc8f6b7f2de6;hpb=f48920c11c806b2a1fd60be145ff2cdf79750878;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Meta/Role.pm b/lib/Mouse/Meta/Role.pm index 9c1e994..225ed0b 100644 --- a/lib/Mouse/Meta/Role.pm +++ b/lib/Mouse/Meta/Role.pm @@ -11,10 +11,10 @@ sub _construct_meta { my %args = @_; - $args{methods} ||= {}; - $args{attributes} ||= {}; - $args{required_methods} ||= []; - $args{roles} ||= []; + $args{methods} = {}; + $args{attributes} = {}; + $args{required_methods} = []; + $args{roles} = []; my $self = bless \%args, ref($class) || $class; if($class ne __PACKAGE__){ @@ -330,7 +330,7 @@ Mouse::Meta::Role - The Mouse Role metaclass =head1 VERSION -This document describes Mouse version 0.40_03 +This document describes Mouse version 0.40_06 =head1 SEE ALSO