@@ -85,11 +85,11 @@
 	      (handler      (make-busy-timeout 36000)))
 	 (if (and exists
 		  (not write-access))
 	     (set! *db-write-access* write-access)) ;; only unset so other db's also can use this control
 	 (sqlite3:set-busy-handler! mdb handler)
-	 (sqlite3:execute mdb (conc "PRAGMA synchronous = 0;"))
+	 (db:set-sync db) ;; (sqlite3:execute mdb (conc "PRAGMA synchronous = 0;"))
 	 (if (or (and (not exists)
 		      (file-write-access? *toppath*))
 		 (not (file-read-access? dbpath)))
 	     (begin
 	       (sqlite3:execute mdb "CREATE TABLE IF NOT EXISTS tasks_queue (id INTEGER PRIMARY KEY,