Index: openacs-4/packages/xotcl-core/tcl/40-thread-mod-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/40-thread-mod-procs.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/xotcl-core/tcl/40-thread-mod-procs.tcl	13 Jul 2007 16:44:38 -0000	1.7
+++ openacs-4/packages/xotcl-core/tcl/40-thread-mod-procs.tcl	14 Jul 2007 17:59:08 -0000	1.8
@@ -221,7 +221,7 @@
 	set initcmd [ns_ictl get]
       }
       append initcmd [my set initcmd]
-      ns_log notice "INIT $initcmd"
+      #ns_log notice "INIT $initcmd"
       ::thread::send $tid $initcmd
     } else {
       set tid [nsv_get [self class] [self]]