X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FMeta%2FMethod%2FAccessor%2FNative%2FArray%2Fmap.pm;h=53d9edc2b1dd8fc3ee0a470e22b8c9ad2c4acdf0;hb=aff6aafcfff96c2a91bd044e35010757feae584c;hp=ad255515d2f37a4168450dd6a5024a5055c74b51;hpb=88e88a7b2cfdf5d777f502a34cfbf5ba69809c58;p=gitmo%2FMoose.git diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/map.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/map.pm index ad25551..53d9edc 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/map.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/map.pm @@ -5,7 +5,7 @@ use warnings; use Params::Util (); -our $VERSION = '1.14'; +our $VERSION = '1.18'; $VERSION = eval $VERSION; our $AUTHORITY = 'cpan:STEVAN'; @@ -37,7 +37,7 @@ sub _return_value { my $self = shift; my $slot_access = shift; - return "map { \$_[0]->() } \@{ $slot_access }"; + return "map { \$_[0]->() } \@{ ($slot_access) }"; } no Moose::Role;