Update activechatter.tcl