epkg--override-connection-class: New variable

emacscollective · Aug 28, 2024 · 7f7553f · 7f7553f
1 parent 8f51609
commit 7f7553f
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/lisp/epkg.el b/lisp/epkg.el
@@ -81,6 +81,8 @@ again."
    (schemata     :initform 'epkg--db-table-schemata)
    (version      :initform 11)))
 
+(defvar epkg--override-connection-class nil)
+
 (defun epkg-db (&optional livep)
   "Return the Epkg database object.
 
@@ -89,7 +91,7 @@ the connection to the database is live already.
 
 If the `epkg-repository', which contains the SQLite database
 file, does not exist yet, then first ask the user to clone it."
-  (closql-db 'epkg-database livep))
+  (closql-db 'epkg-database livep epkg--override-connection-class))
 
 (cl-defmethod closql--db-prepare-storage ((_class (subclass epkg-database)))
   (unless (file-exists-p epkg-repository)