complicated expressions can't be dereferenced directly

[gitmo/Moose.git] / lib / Moose / Meta / Method / Accessor / Native / Hash / get.pm

diff --git a/lib/Moose/Meta/Method/Accessor/Native/Hash/get.pm b/lib/Moose/Meta/Method/Accessor/Native/Hash/get.pm
index dbde3d5..a4b2e1e 100644 (file)
--- a/lib/Moose/Meta/Method/Accessor/Native/Hash/get.pm
+++ b/lib/Moose/Meta/Method/Accessor/Native/Hash/get.pm
@@ -35,7 +35,7 @@ sub _return_value {
     my $self        = shift;
     my $slot_access = shift;
 
-    return "\@_ > 1 ? \@{ $slot_access }{\@_} : ${slot_access}->{ \$_[0] }";
+    return "\@_ > 1 ? \@{ ($slot_access) }{\@_} : ${slot_access}->{ \$_[0] }";
 }
 
 no Moose::Role;