TEST

proc checkban {n c} {
	# set bhost [lindex [split [getchanhost $n $c] @] 1]
	# set identd [lindex [split [getchanhost $n $c] "@"] 0]
	# set identd [dop:notild $identd]
	# set nicks "*!$identd@$bhost"	
	foreach ban [chanbans $c] {
	if {[matchstr [lindex $ban 0] $n]} {
			killchanban $c [lindex $ban 0]
			pushmode $c -b [lindex $ban 0]
			incr ki
						} 
					} 
}