Index: openacs-4/packages/xotcl-core/tcl/chat-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/Attic/chat-procs.tcl,v diff -u -r1.23.2.6 -r1.23.2.7 --- openacs-4/packages/xotcl-core/tcl/chat-procs.tcl 22 Nov 2016 18:34:35 -0000 1.23.2.6 +++ openacs-4/packages/xotcl-core/tcl/chat-procs.tcl 24 Nov 2016 14:53:25 -0000 1.23.2.7 @@ -66,7 +66,7 @@ } Chat instproc add_msg {{-get_new:boolean true} {-uid ""} msg} { - my log "--chat adding $msg" + # my log "--chat adding $msg" my instvar array now set user_id [expr {$uid ne "" ? $uid : [my set user_id]}] set color [my user_color $user_id]