From 6132155393b9934c772df048c1e8aea3451909a3 Mon Sep 17 00:00:00 2001 From: Jethro Kuan Date: Sat, 16 Apr 2022 20:26:25 -0700 Subject: [PATCH] (db)fix: fix sqlite-builtin and sqlite-module (#2161) --- org-roam-db.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/org-roam-db.el b/org-roam-db.el index 00cb41c..9608a1c 100644 --- a/org-roam-db.el +++ b/org-roam-db.el @@ -163,11 +163,11 @@ ROAM_REFS." #'emacsql-sqlite)) (sqlite-builtin (progn - (require 'emacs-sqlite-builtin) + (require 'emacsql-sqlite-builtin) #'emacsql-sqlite-builtin)) (sqlite-module (progn - (require 'emacs-sqlite-module) + (require 'emacsql-sqlite-module) #'emacsql-sqlite-module)) (libsqlite3 (progn @@ -188,7 +188,8 @@ Performs a database upgrade when required." (make-directory (file-name-directory org-roam-db-location) t) (let ((conn (funcall (org-roam-db--conn-fn) org-roam-db-location))) (emacsql conn [:pragma (= foreign_keys ON)]) - (when-let ((process (emacsql-process conn))) + (when-let* ((process (emacsql-process conn)) + (_ (processp process))) (set-process-query-on-exit-flag process nil)) (puthash (expand-file-name (file-name-as-directory org-roam-directory)) conn