From 441b6ff7c88e049e50ac8601106e53953cc55c82 Mon Sep 17 00:00:00 2001 From: Alexandre Morignot <erdnaxeli@cervoi.se> Date: Mon, 11 May 2015 22:19:36 +0200 Subject: [PATCH] [commands::get] remove useless arg --- lib/commands/get.pm | 2 +- lib/commands/parser.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/commands/get.pm b/lib/commands/get.pm index 8b7945a..9b6db93 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 66db819..cccdd55 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) { -- GitLab