awesome-emacs/org-roam
1
0
Fork 0
mirror of https://github.com/org-roam/org-roam synced 2025-08-03 12:27:23 -05:00
Code Issues Packages Projects Releases Wiki Activity

(fix)db: expand org-roam-directory name as directory (#1945)

Browse Source 
Closes #1940
This commit is contained in:
Jethro Kuan
2021-11-06 17:03:54 +08:00
committed by GitHub
parent 84f58cbc12
commit 4d71fbdfe1
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
org-roam-db.el
View File

@ -113,7 +113,7 @@ slow."
;;; Core Functions ;;; Core Functions
(defun org-roam-db--get-connection () (defun org-roam-db--get-connection ()
"Return the database connection, if any." "Return the database connection, if any."
(gethash (expand-file-name org-roam-directory) (gethash (expand-file-name (file-name-as-directory org-roam-directory))
org-roam-db--connection)) org-roam-db--connection))
(defun org-roam-db--conn-fn () (defun org-roam-db--conn-fn ()
@ -143,7 +143,7 @@ Performs a database upgrade when required."
(let ((conn (funcall (org-roam-db--conn-fn) org-roam-db-location))) (let ((conn (funcall (org-roam-db--conn-fn) org-roam-db-location)))
(when-let ((process (emacsql-process conn))) (when-let ((process (emacsql-process conn)))
(set-process-query-on-exit-flag process nil)) (set-process-query-on-exit-flag process nil))
(puthash (expand-file-name org-roam-directory) (puthash (expand-file-name (file-name-as-directory org-roam-directory))
conn conn
org-roam-db--connection) org-roam-db--connection)
(when init-db (when init-db