From 1a1702c1f5e0ba0bfc5b9edc06d3c03fac011a7b Mon Sep 17 00:00:00 2001 From: Jethro Kuan Date: Mon, 10 Feb 2020 16:28:38 +0800 Subject: [PATCH] Fix symlinks handling --- org-roam.el | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/org-roam.el b/org-roam.el index a22acd4..b6c532f 100644 --- a/org-roam.el +++ b/org-roam.el @@ -136,18 +136,20 @@ it will return the title by loading the file." (defun org-roam--find-all-files () "Return all org-roam files." - (org-roam--find-files org-roam-directory)) + (org-roam--find-files (file-truename org-roam-directory))) (defun org-roam--get-file-path (id &optional absolute) "Convert identifier `ID' to file path. If `ABSOLUTE', return the absolute file-path. Else, return the relative file-path." - (let ((absolute-file-path (expand-file-name - (concat id ".org") - (file-truename org-roam-directory)))) + (let ((absolute-file-path (file-truename + (expand-file-name + (concat id ".org") + org-roam-directory)))) (if absolute absolute-file-path - (file-relative-name absolute-file-path org-roam-directory)))) + (file-relative-name absolute-file-path + (file-truename org-roam-directory))))) (defun org-roam--get-id (file-path) "Convert `FILE-PATH' to the org-roam id."