Index: dbmod.scm ================================================================== --- dbmod.scm +++ dbmod.scm @@ -277,11 +277,11 @@ ;; direction: 'fromdest 'todest ;; (define (dbmod:sync-gasket tables last-update cachedb dbh dbfname direction keys) (assert (sqlite3:database? cachedb) "FATAL: sync-gasket: cachedb is not a db") (assert (sqlite3:database? cachedb) "FATAL: sync-gasket: dbh is not a db") - (debug:print-info 0 *default-log-port* "dbmod:sync-gasket called with sync-method="(dbfile:sync-method)) + (debug:print-info 2 *default-log-port* "dbmod:sync-gasket called with sync-method="(dbfile:sync-method)) (case (dbfile:sync-method) ((none) #f) ((attach) (dbmod:attach-sync tables cachedb dbfname direction)) ((newsync) Index: megatest-version.scm ================================================================== --- megatest-version.scm +++ megatest-version.scm @@ -18,6 +18,6 @@ ;; Always use two or four digit decimal ;; 1.01, 1.02...1.10,1.11,1.1101 ... 1.99,2.00.. ;; (declare (unit megatest-version)) -(define megatest-version 1.8013) +(define megatest-version 1.8014)