Untitled

bind mode - "* +b" enforcebans 

proc enforcebans {nick uhost hand chan mc ban} { 
foreach n [chanlist $chan] { 
if {[string match -nocase $ban $n![getchanhost $n $chan]]} { 
putkick $chan $n "$n was kicked by $::botnick(Banned by: $nick)" 
} 
} 
}



this code give me the error 
Tcl error [enforcebans]: can't read "::botnick(Banned by: IftikhaR)": variable isn't array