Index: dbmod.scm
==================================================================
--- dbmod.scm
+++ dbmod.scm
@@ -398,11 +398,11 @@
 		  (stmt8 (conc "UPDATE "todb table" SET ("no-id-fields-str") = (SELECT "no-id-fields-str" FROM "fromdb table" WHERE "todb table".id="fromdb table".id"
 			       (if (member "last_update" fields)
 				   (conc " AND "fromdb table".last_update > "todb table".last_update);")
 				   ");")))
 		  (start-ms (current-milliseconds)))
-	     (debug:print 0 *default-log-port* "stmt8="stmt8)
+	     ;; (debug:print 0 *default-log-port* "stmt8="stmt8)
 	     (if (sqlite3:auto-committing? dbh)
 		 (begin
 		   (sqlite3:with-transaction
 		    dbh
 		    (lambda ()