Code: Select all
if {[string compare $nick $ban]} {
Code: Select all
if {[string match [string map {\[ \\\[} $ban] $nick]} {
user wrote:That's called "lag" and, yes, it sucks. Removing all the bans sounds weird though... what ircd are you keeping them on?
Actually, doing a irc case conversion would be required for it to work completely...if converting to lowercase the chars escaped by my previous map will be gone, so I guess it's not that bad:stdragon wrote:Wouldn't the -nocase option be good?
Code: Select all
proc irclwr {str} {string tolower [string map {\[ \{ \] \} \\ |} $str]}
if {[string match [irclwr $ban] [irclwr $nick]]} {
Then you're probably on a non-rfc compliant network. Try without irc case conversion:MasterJM wrote:dont work
Code: Select all
[string match -nocase $ban $nick]