@@ -496,11 +496,11 @@
 				     (sqlite3:execute db (conc "PRAGMA journal_mode = "journal-mode";")))
 				 (if (and init-proc (or force-init
 							(not db-exists)))
 				     (init-proc db))
 				 db))
-			     expire-time: 5)
+			     expire-time: 15)
                             (begin
 			      (if (file-exists? fname )
                                   (let ((db (sqlite3:open-database fname)))
 				    ;; pragmas synchronous not needed because this db is used read-only
 				    ;; (sqlite3:execute db (conc "PRAGMA synchronous = "mode";")