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

(feat): allow for symlinks in the org roam directory (#733)

Browse Source
This commit is contained in:
ulfl
2020-05-30 12:52:25 +02:00
committed by GitHub
parent 7200364d31
commit 47feff5a8b
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
org-roam.el
View File

@ -328,7 +328,7 @@ E.g. (\".org\") => (\"*.org\" \"*.org.gpg\")"
"Return all Org-roam files located recursively within DIR, using elisp." "Return all Org-roam files located recursively within DIR, using elisp."
(let ((regex (concat "\\.\\(?:"(mapconcat #'regexp-quote org-roam-file-extensions "\\|" )"\\)\\(?:\\.gpg\\)?\\'")) (let ((regex (concat "\\.\\(?:"(mapconcat #'regexp-quote org-roam-file-extensions "\\|" )"\\)\\(?:\\.gpg\\)?\\'"))
result) result)
(dolist (file (directory-files-recursively dir regex) result) (dolist (file (directory-files-recursively dir regex nil nil t) result)
(when (and (file-readable-p file) (org-roam--org-file-p file)) (when (and (file-readable-p file) (org-roam--org-file-p file))
(push file result))))) (push file result)))))