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

(fix): remove other occurrences of file-truename (#1125)

Browse Source 
org-roam-buffer should no longer be resolving the symlinks as well.
This commit is contained in:
Jethro Kuan
2020-09-22 14:23:02 +08:00
committed by GitHub
parent f59c18fda5
commit d170c4ac85
3 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
org-roam-buffer.el
View File

@ -224,7 +224,7 @@ This needs to be quick or infrequent, because this is run at
(when (and (or redisplay
(not (eq org-roam-buffer--current buffer)))
(eq 'visible (org-roam-buffer--visibility))
(buffer-local-value 'buffer-file-truename buffer))
(buffer-file-name buffer))
(setq org-roam-buffer--current buffer)
(org-roam-buffer-update))))

2
tests/test-org-roam-perf.el
View File

@ -29,7 +29,7 @@
(defun test-org-roam-perf--abs-path (file-path)
"Get absolute FILE-PATH from `org-roam-directory'."
(file-truename (expand-file-name file-path org-roam-directory)))
(expand-file-name file-path org-roam-directory))
(defun test-org-roam-perf--init ()
"."

4
tests/test-org-roam.el
View File

@ -27,7 +27,7 @@
(defun test-org-roam--abs-path (file-path)
"Get absolute FILE-PATH from `org-roam-directory'."
(file-truename (expand-file-name file-path org-roam-directory)))
(expand-file-name file-path org-roam-directory))
(defun test-org-roam--find-file (path)
"PATH."
@ -35,7 +35,7 @@
(make-directory (file-name-directory path) t)
(find-file path)))
(defvar test-org-roam-directory (file-truename (concat default-directory "tests/roam-files"))
(defvar test-org-roam-directory (expand-file-name "tests/roam-files")
"Directory containing org-roam test org files.")
(defun test-org-roam--init ()