diff --git a/lib/commands/get.pm b/lib/commands/get.pm index 8b7945ac16cb8d17ab665c9b0d33d20672499aa3..9b6db930a0b359747fb2f7d61c661543386d0e3b 100644 --- a/lib/commands/get.pm +++ b/lib/commands/get.pm @@ -14,7 +14,7 @@ our $irc; our $log; sub exec { - my ($kernel, $nick, $chan, $msg) = @_; + my ($nick, $chan, $msg) = @_; my $query = commands::get::query->new( chan => $chan->[0], diff --git a/lib/commands/parser.pm b/lib/commands/parser.pm index 66db81986c4b47ddefe554869efbb3905ae39a50..cccdd55522ea663d6d94ae96aa4d3f574e439364 100644 --- a/lib/commands/parser.pm +++ b/lib/commands/parser.pm @@ -82,7 +82,7 @@ sub exec { } elsif ($msg =~ /^( *!get)(?: +.*)?$/) { $msg = substr $msg, (length $1) + 1; - my @args = ($kernel, $nick, $chan, $msg); + my @args = ($nick, $chan, $msg); my $id = commands::get::exec(@args); if ($id) {