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.97.2.20 -r1.97.2.21
--- openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	19 Sep 2014 21:17:28 -0000	1.97.2.20
+++ openacs-4/packages/xotcl-core/tcl/05-db-procs.tcl	19 Sep 2014 21:19:50 -0000	1.97.2.21
@@ -670,7 +670,7 @@
       set lines {}
       foreach col [dict keys $definition] {lappend lines "$col [dict get $definition $col]"}
       set definition [join $lines ",\n"]
-      my log "--table $name does not exist, creating with definition: $definition\n\nlines: $lines"
+      # my log "--table $name does not exist, creating with definition: $definition"
       ::xo::dc dml create-table-$name "create table $name ($definition)"
     } else {
       # The table exists already. Check the colums, whether we have to