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 -N -r1.20.2.4 -r1.20.2.5 --- openacs-4/packages/xotcl-core/tcl/chat-procs.tcl 14 Feb 2014 18:20:44 -0000 1.20.2.4 +++ openacs-4/packages/xotcl-core/tcl/chat-procs.tcl 2 Mar 2015 16:10:26 -0000 1.20.2.5 @@ -16,7 +16,7 @@ {mode default} {encoder urlencode} {timewindow 600} - {sweepinterval 600} + {sweepinterval 599} } Chat instproc init {} { @@ -243,8 +243,7 @@ Chat instproc noencode {string} {set string} Chat instproc encode {string} {my [my encoder] $string} Chat instproc json_encode {string} { - string map [list \n \\n {"} {\"} ' {\'}] $string ;\#" - # + string map [list \n \\n {"} {\"} ' {\'}] $string" } Chat instproc json_encode_msg {msg} {