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.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} {