From 283b5a6aa6d1bce82cf8f983b6269867703d3b25 Mon Sep 17 00:00:00 2001 From: Alexandre Morignot <erdnaxeli@gmail.com> Date: Tue, 11 Dec 2012 17:09:34 +0100 Subject: [PATCH] commande !tag --- PlayBot.pl | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/PlayBot.pl b/PlayBot.pl index 0e7be2f..c820e74 100755 --- a/PlayBot.pl +++ b/PlayBot.pl @@ -296,6 +296,12 @@ sub on_speak return; } + elsif ($msg =~ /^!tag( +([0-9]+))?/) { + my $id = ($2) ? $2 : $lastID; + while ($msg =~ /#([a-zA-Z0-9_-]+)/g) { + addTag($id, $1); + } + } else { return; } @@ -333,8 +339,7 @@ sub on_speak # insertion des éventuels tags - while ($msg =~ /#([a-zA-Z0-9_-]*)/g) { - next if (!$1); + while ($msg =~ /#([a-zA-Z0-9_-]+)/g) { if ($debug) { $log->debug($1); next; -- GitLab