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=6ce8e4ae1a247ac36cb4b9276dc9eb2ff4085f30;hpb=efa728b4984ddf1611bc9931fbc209438459652c;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 6ce8e4a..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.15';
+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;