Index: openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl,v
diff -u -r1.103 -r1.103.2.1
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	9 Jul 2015 21:22:51 -0000	1.103
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	15 Aug 2015 05:15:35 -0000	1.103.2.1
@@ -706,7 +706,7 @@
   }
 
   require proc table {name definition {populate ""}} {
-    my log "==== require table $name exists: [my exists_table $name]\n$definition"
+    #my log "==== require table $name exists: [my exists_table $name]\n$definition"
     if {![my exists_table $name]} {
       set lines {}
       foreach col [dict keys $definition] {lappend lines "$col [dict get $definition $col]"}