X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FMeta%2FMethod%2FAccessor%2FNative%2FArray%2Ffirst.pm;h=5d4482b027d7abfd5508ea971b310d1d1a93234a;hb=ec86bdff10923f63141e6529c2178189a64c71b8;hp=bb3b6874461d42875eea897446582c5ba7ae17cc;hpb=53a4677c8ac29f814924cd2eb21a760b10bf7f5d;p=gitmo%2FMoose.git diff --git a/lib/Moose/Meta/Method/Accessor/Native/Array/first.pm b/lib/Moose/Meta/Method/Accessor/Native/Array/first.pm index bb3b687..5d4482b 100644 --- a/lib/Moose/Meta/Method/Accessor/Native/Array/first.pm +++ b/lib/Moose/Meta/Method/Accessor/Native/Array/first.pm @@ -42,7 +42,7 @@ sub _return_value { my $self = shift; my ($slot_access) = @_; - return '&List::Util::first( $_[0], @{ (' . $slot_access . ') } )'; + return '&List::Util::first($_[0], @{ (' . $slot_access . ') })'; } no Moose::Role;