diff --git a/lib/commands/parser.pm b/lib/commands/parser.pm index 6b1ea97ebcf8fc413a5e728472e2019569cfdfad..0817433064a47e0a1c895511d52600ae3958e0fc 100644 --- a/lib/commands/parser.pm +++ b/lib/commands/parser.pm @@ -103,6 +103,9 @@ sub exec { $irc->yield(privmsg => $nick => "Toutes les commandes fonctionnent en query."); $irc->yield(privmsg => $nick => 'Niveau vie privée, potentiellement toute commande (excepté !help) entraine un enregistrement dans la base de données avec au minimum la date et l\'heure et le nick de la personne ayant exécuté la commande.'); } + elsif ($msg =~/^ *!(fav|lat|tag|get)/) { + $irc->yield(privmsg => $chan->[0] => $insultes[rand @insultes]); + } else { return 0; }