From: Dave Rolsky <autarch@urth.org>
Date: Sat, 25 Sep 2010 20:08:17 +0000 (-0500)
Subject: Remove superfluous argument passing
X-Git-Tag: 1.15~84
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0a13237516ec8e10f2568908e422b80850bc5d02;p=gitmo%2FMoose.git

Remove superfluous argument passing
---

diff --git a/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm b/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm
index 3a3c7ee..1afcc90 100644
--- a/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm
+++ b/lib/Moose/Meta/Method/Accessor/Native/String/substr.pm
@@ -28,11 +28,11 @@ sub _generate_method {
 
     $code .= "\n" . 'if ( @_ == 1 || @_ == 2 ) {';
 
-    $code .= $self->_reader_core( $inv, $slot_access, @_ );
+    $code .= $self->_reader_core( $inv, $slot_access );
 
     $code .= "\n" . '} elsif ( @_ == 3 ) {';
 
-    $code .= $self->_writer_core( $inv, $slot_access, @_ );
+    $code .= $self->_writer_core( $inv, $slot_access );
 
     $code .= "\n" . $self->_inline_post_body(@_);