Soucis dans une proc

[djkenny]

salut,

essais de remplacer ça

tclcopier

if {[string match [lindex $data 0] $chan] && [string match [lindex $data 1] $arg] && [lindex $data 0]=="PROTECT" && [string tolower [lindex $data 1]]==[string tolower [lindex $arg 0]]} {
 
par 
 
if {[string equal -nocase [lindex $data 0] $chan] && [string match -nocase [lindex $data 1] [lindex $arg 0]] && [lindex $data 0]=="PROTECT"} {