org-persist.el: Make sure that org-persist-path is absolute

This commit is contained in:
Ihor Radchenko 2021-10-18 13:36:14 +08:00
parent 7a04f3b1cd
commit 0e912bd288
No known key found for this signature in database
GPG Key ID: 6470762A7DA11D8B
1 changed files with 7 additions and 6 deletions

View File

@ -35,12 +35,13 @@
(declare-function org-next-visible-heading "org" (arg)) (declare-function org-next-visible-heading "org" (arg))
(declare-function org-at-heading-p "org" (&optional invisible-not-ok)) (declare-function org-at-heading-p "org" (&optional invisible-not-ok))
(defvar org-persist-path (org-file-name-concat (defvar org-persist-path (expand-file-name
(let ((cache-dir (xdg-cache-home))) (org-file-name-concat
(if (seq-empty-p cache-dir) (let ((cache-dir (xdg-cache-home)))
user-emacs-directory (if (seq-empty-p cache-dir)
cache-dir)) user-emacs-directory
"org-persist/") cache-dir))
"org-persist/"))
"Directory where the data is stored.") "Directory where the data is stored.")
(defvar org-persist-index-file "index" (defvar org-persist-index-file "index"