From 83a6fab197cf3cba7ad9006ab12c3988ccc524c2 Mon Sep 17 00:00:00 2001 From: Jethro Kuan Date: Mon, 3 Feb 2020 21:21:53 +0800 Subject: [PATCH] Fix org-roam-insert --- org-roam.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/org-roam.el b/org-roam.el index 5de6814..56b7e19 100644 --- a/org-roam.el +++ b/org-roam.el @@ -60,9 +60,10 @@ Valid states are 'visible, 'exists and 'none." (mapcar (lambda (f) (file-name-sans-extension f)) (deft-find-all-files-no-prefix))))) - (let ((org-link-file-type 'relative) - (file-name (concat file-name ".org"))) - (org-insert-link nil (concat "file:" (concat deft-directory file-name)) + (let* ((org-link-file-type 'relative) + (file-name (concat file-name ".org")) + (file-path (file-relative-name (file-truename (concat deft-directory file-name))))) + (org-insert-link nil (concat "file:" file-path) (concat org-roam-zettel-indicator (file-name-base file-name))) (org-roam-add-backlink org-roam-hash-backlinks file-name (file-name-nondirectory (buffer-file-name (current-buffer))))))