Bonjour !
Je pense que le code devrai ressemblé un peu plus à ceci :
Je pense que le code devrai ressemblé un peu plus à ceci :
tcl
set GLineChan "#test";
set GLineTime "0";
bind pub o !gline pub:gline
proc pub:gline { nick uhost handle channel arg } {
if { ![onchan $nick $::GLineChan] } { putquick "privmsg $chan :Access Denied." return 0; }
set nick [lindex $arg 0];
putquick "gline $nick $::GLineTime :vous êtes banni du réseau";
return 1;
}