13/05/2009, 20:11
il manque un "{" :
tcl
set nadmin "Orion,systak,test"
bind pub - !xkick kick
proc kick {nick uhost hand chan arg} {
set n0 [string tolower [lindex $arg 0]]
set protected [split [string tolower $::nadmin] ","]
if {[lsearch $protected $n0] == -1} {
putquick "kick $chan $n0 kicked"
}
}
Toute l'actualité de mes scripts ici (dernière mise à jour le 14/07/2018)
Tout programme comporte au moins un bug et pourrait être raccourci d'au moins une instruction, de quoi l'on peut déduire que tout programme peut être réduit à une seule instruction qui ne fonctionne pas.
Tout programme comporte au moins un bug et pourrait être raccourci d'au moins une instruction, de quoi l'on peut déduire que tout programme peut être réduit à une seule instruction qui ne fonctionne pas.
