X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FMeta%2FMethod%2FAccessor%2FNative%2FHash%2Fvalues.pm;h=bbd45352f0ac2fed48291d622b04ba95ae38ebeb;hb=refs%2Ftags%2F1.25;hp=79c69800996f6298e29240f3d739d0d5b3fa332a;hpb=f4b86ac0e1fd7ff8a180f2f8332821170db5371e;p=gitmo%2FMoose.git diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/values.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/values.pm index 79c6980..bbd4535 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Hash/values.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/values.pm @@ -5,7 +5,7 @@ use warnings; use Scalar::Util qw( looks_like_number ); -our $VERSION = '1.16'; +our $VERSION = '1.25'; $VERSION = eval $VERSION; our $AUTHORITY = 'cpan:STEVAN'; @@ -20,7 +20,7 @@ sub _return_value { my $self = shift; my $slot_access = shift; - return "values \%{ $slot_access }"; + return "values \%{ ($slot_access) }"; } no Moose::Role;