X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FMeta%2FMethod%2FAccessor%2FNative%2FArray%2Fshuffle.pm;h=70b30962ebc5af5bc6b097bfd80ef0d481e9e18b;hb=245478d5ee6b5343e4d591be811582963e177bef;hp=d917070b61aab61bba832899fe2099ac5def0a5f;hpb=efa728b4984ddf1611bc9931fbc209438459652c;p=gitmo%2FMoose.git diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/shuffle.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/shuffle.pm index d917070..70b3096 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/shuffle.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/shuffle.pm @@ -5,7 +5,7 @@ use warnings; use List::Util (); -our $VERSION = '1.15'; +our $VERSION = '1.19'; $VERSION = eval $VERSION; our $AUTHORITY = 'cpan:STEVAN'; @@ -20,7 +20,7 @@ sub _return_value { my $self = shift; my $slot_access = shift; - return "List::Util::shuffle \@{ $slot_access }"; + return "List::Util::shuffle \@{ ($slot_access) }"; } no Moose::Role;