J'imagine que l'intérêt de ce TCL est pour les réseaux tels qu'Undernet (où les services ne sont pas faciles à obtenir).
Pour ne plus avoir ce souci sur les nicks "ressemblants", il faut modifier la ligne 121:
Par quelque chose du genre:
Pour ne plus avoir ce souci sur les nicks "ressemblants", il faut modifier la ligne 121:
tcl
if {[string first [string tolower $ligne] [string tolower $nick]]==0} {
Par quelque chose du genre:
tcl
if {[string tolower $nick] == [string tolower $ligne]} {