diff options
author | Jesse Luehrs <doy@tozt.net> | 2013-05-31 03:06:35 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2013-05-31 03:06:35 -0500 |
commit | ef520c02cea20449c3bdeb656271ac51e645edcb (patch) | |
tree | ff2c47b513085399fb5369dd4cda70fbfb88153c /lib/Reply/Plugin/Defaults.pm | |
parent | 8df94620704fd56e5d0f718223f2b195181f57b6 (diff) | |
download | reply-ef520c02cea20449c3bdeb656271ac51e645edcb.tar.gz reply-ef520c02cea20449c3bdeb656271ac51e645edcb.zip |
pass through extra arguments to the code to execute
Diffstat (limited to 'lib/Reply/Plugin/Defaults.pm')
-rw-r--r-- | lib/Reply/Plugin/Defaults.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Reply/Plugin/Defaults.pm b/lib/Reply/Plugin/Defaults.pm index c71d329..0296c70 100644 --- a/lib/Reply/Plugin/Defaults.pm +++ b/lib/Reply/Plugin/Defaults.pm @@ -40,9 +40,9 @@ sub compile { sub execute { my $self = shift; - my ($next, $code) = @_; + my ($next, $code, @args) = @_; - return $code->(); + return $code->(@args); } sub print_error { |