Updates to the fossil_chat.tcl script.