exot/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Include zettelkasten files in Org agenda searches

Browse Source
This commit is contained in:
Daniel Borchmann 2024-07-10 13:43:18 +02:00
parent 2349d6726f
commit 902e205e7e
No known key found for this signature in database
GPG Key ID: 784AA8DF0CCDF625
1 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
init.el
View File

@ -1112,7 +1112,16 @@ quickly loose their meaning."
(fset 'recenter 'identity) (fset 'recenter 'identity)
(unwind-protect (unwind-protect
(apply actual-agenda-redo r) (apply actual-agenda-redo r)
(fset 'recenter old-recenter)))))) (fset 'recenter old-recenter))))
(define-advice org-search-view (:around
(func &rest args)
find-in-org-roam-files)
"When searching through Org items, also include `org-roam' files when available."
(let ((org-agenda-text-search-extra-files (append org-agenda-text-search-extra-files
(when (require 'org-roam nil :no-error)
(org-roam-list-files)))))
(apply func args)))))
;; Capturing ;; Capturing