From 34252c93a71197f9d4cfc5c35afe0e01a5721a22 Mon Sep 17 00:00:00 2001
From: Alexandre Morignot <erdnaxeli@cervoi.se>
Date: Tue, 10 Feb 2015 18:29:03 +0100
Subject: [PATCH] !get saves last request *by chan*
---
lib/commands/get.pm | 10 +++++-----
1 file changed, 5 insertions(+), 5 deletions(-)
diff --git a/lib/commands/get.pm b/lib/commands/get.pm
index 07f0fdd..acdff13 100644
--- a/lib/commands/get.pm
+++ b/lib/commands/get.pm
@@ -12,7 +12,7 @@ use commands::get::query;
our $irc;
our $log;
-my $last_req;
+my %last_req;
my $dbh;
my $sth;
@@ -28,7 +28,7 @@ sub exec {
my $req;
my $rows;
- if (not defined $last_req or not ($query ~~ $last_req)) {
+ if (not defined $last_req{$query->chan} or not ($query ~~ $last_req{$query->chan})) {
# we close a previous session if needed
if ($dbh) {
$sth->finish if $sth->{'Active'};
@@ -117,7 +117,7 @@ sub exec {
$content = $sth->fetch;
if (!$content) {
- if ($last_req ~~ $query) {
+ if ($last_req{$query->chan} ~~ $query) {
# the request was already executed, there is nothing more
$irc->yield(privmsg => $chan => "Tu tournes en rond, Jack !");
}
@@ -128,7 +128,7 @@ sub exec {
$irc->yield(privmsg => $chan => "Poste d'abord du contenu, n00b.");
}
- $last_req = undef;
+ $last_req{$query->chan} = undef;
return
}
@@ -172,7 +172,7 @@ sub exec {
or $log->error("Couldn't finish transaction: " . $dbh->errstr);
# we save the request
- $last_req = $query;
+ $last_req{$query->chan} = $query;
return $content->[0];
}
--
GitLab