tcl - 来自查询绑定消息的 chown

Question

如何从 qry .chanset 设置？

bind msg - .flag msg:flag

proc msg:flag {nick uhost handle text} {
    if {$text == ""} {
        putnow "PRIVMSG $nick :.flag #channel on/off"
        return 0
    }

    set chan [lindex [split $text] 0]
    set button [lindex [split $text] 1]
    set flag [lindex [split $text] 2]
    if { [string match -nocase "on" "$button"] } {
        chanset $chan +$flag
    }
    if { [string match -nocase "off" "$button"] } {
        chanset $chan -$flag
    }

    putserv "PRIVMSG $nick :Change Flag Successful."
}

派对线上的错误消息：

[18:12:50] Tcl 错误：无效的命令名称“chanset”