瀏覽代碼

Update BT.Core.tcl

Daniel Voipan 5 年之前
父節點
當前提交
8e295a8f65
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      BlackTools/BT.Core.tcl

+ 1 - 1
BlackTools/BT.Core.tcl

@@ -392,7 +392,7 @@ proc notc:flood:protection {nick host hand text dest} {
 	global black botnick
 	set number [scan $black(notice:flood) %\[^:\]]
 	set timer [scan $black(notice:flood) %*\[^:\]:%s]
-if {$nick == $black(chanserv)} {
+if {$nick == $black(chanserv) || [string equal -nocase $nick "CHANSERV"]} {
 	return
 }
 if {![isbotnick $dest]} {