@@ -1156,16 +1156,20 @@
 	(let ((cfname (args:get-arg "-append-config")))
 	  (if (and cfname
 		   (file-read-access? cfname))
 	      (read-config cfname *configdat* #t))) ;; values are added to the hash, no need to do anything special.
 	;; have config at this time, this is a good place to set params based on config file settings
-	(let*  ((dbmode (configf:lookup *configdat* "setup" "dbcache-mode")))
+	(let*  ((dbmode   (configf:lookup *configdat* "setup" "dbcache-mode"))
+		(syncmode (configf:lookup *configdat* "setup" "sync-mode")))
 	  (if dbmode
 	      (begin
 		(debug:print-info 0 *default-log-port* "Overriding dbmode to "dbmode)
-		(dbcache-mode (string->symbol dbmode)))))
-	
+		(dbcache-mode (string->symbol dbmode))))
+	  (if syncmode
+	      (begin
+		(debug:print-info 0 *default-log-port* "Overriding syncmode to "syncmode)
+		(dbfile:sync-method (string->symbol syncmode)))))
 	*toppath*)))
 
 
 (define (get-best-disk confdat testconfig)
   (let* ((disks   (or (and testconfig (hash-table-ref/default testconfig "disks" #f))