1 2 3 4 5 6
proc clear_chat_bindings {chatid type} { bind [::chat::input_win $chatid] <Control-e> \ [list ::plugins::clear::clear_chat_win $chatid] } hook::add open_chat_post_hook clear_chat_binding