27/08/2011, 15:48
salut,
petite modification pour éviter le lag du bot, remplacer ça:
par ça:
petite modification pour éviter le lag du bot, remplacer ça:
TCL
proc sc::send {type arg} {
variable rchan
if [string equal $rchan ""] {set rchan [channels]}
foreach c $rchan {
putserv "PRIVMSG $c :$arg"
}
}
par ça:
TCL
proc sc::send {type arg} {
variable rchan
if [string equal $rchan ""] {set rchan [channels]}
putserv "PRIVMSG [join $rchan ,] :$arg"
}
C'est en reconnaissant ses erreurs que l'on progresse