[commands::get] remove useless arg

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],

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) {