From ed0e7f3b736cf8ace2f281f5feb30396988308b6 Mon Sep 17 00:00:00 2001
From: Alexandre Morignot <erdnaxeli@cervoi.se>
Date: Mon, 11 May 2015 22:30:39 +0200
Subject: [PATCH] [commands::get] remove (another) useless arg
---
lib/commands/get.pm | 2 +-
lib/commands/parser.pm | 2 +-
lib/sessions/irc/later.pm | 2 +-
3 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/lib/commands/get.pm b/lib/commands/get.pm
index 9b6db93..bc6de5a 100644
--- a/lib/commands/get.pm
+++ b/lib/commands/get.pm
@@ -14,7 +14,7 @@ our $irc;
our $log;
sub exec {
- my ($nick, $chan, $msg) = @_;
+ my ($chan, $msg) = @_;
my $query = commands::get::query->new(
chan => $chan->[0],
diff --git a/lib/commands/parser.pm b/lib/commands/parser.pm
index cccdd55..8ef89e6 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 = ($nick, $chan, $msg);
+ my @args = ($chan, $msg);
my $id = commands::get::exec(@args);
if ($id) {
diff --git a/lib/sessions/irc/later.pm b/lib/sessions/irc/later.pm
index 2711d30..605d107 100644
--- a/lib/sessions/irc/later.pm
+++ b/lib/sessions/irc/later.pm
@@ -7,7 +7,7 @@ sub consume
{
my ($nick, $id) = @_;
- my @args = ($nick, [$nick], $id);
+ my @args = ([$nick], $id);
commands::get::exec(@args);
}
--
GitLab