X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMoose%2FMeta%2FMethod%2FDelegation.pm;h=8c6f7593f7842f10783d0ad88f9a1941bd51b69b;hb=6b2f825e73f66af279fa9e0802bc06a0094e5e89;hp=82eef7e1f2740b864581d6dfd3f2c453d07a831f;hpb=eaf5a43ef108f6a9dce74c84afc25a892cffdfb1;p=gitmo%2FMoose.git diff --git a/lib/Moose/Meta/Method/Delegation.pm b/lib/Moose/Meta/Method/Delegation.pm index 82eef7e..8c6f759 100644 --- a/lib/Moose/Meta/Method/Delegation.pm +++ b/lib/Moose/Meta/Method/Delegation.pm @@ -7,7 +7,7 @@ use warnings; use Carp 'confess'; use Scalar::Util 'blessed', 'weaken'; -our $VERSION = '0.90'; +our $VERSION = '1.11'; $VERSION = eval $VERSION; our $AUTHORITY = 'cpan:STEVAN'; @@ -104,8 +104,8 @@ sub _initialize_body { object => $instance ); } - my @args = (@{ $self->curried_arguments }, @_); - $proxy->$method_to_call(@args); + unshift @_, @{ $self->curried_arguments }; + $proxy->$method_to_call(@_); }; } @@ -190,9 +190,7 @@ constructor. =head1 BUGS -All complex software has bugs lurking in it, and this module is no -exception. If you find a bug please either email me, or add the bug -to cpan-RT. +See L for details on reporting bugs. =head1 AUTHOR