From 902e205e7e3892cb79a41215bb6a6b0c3037fa1b Mon Sep 17 00:00:00 2001
From: Daniel Borchmann <daniel@algebra20.de>
Date: Wed, 10 Jul 2024 13:43:18 +0200
Subject: [PATCH] Include zettelkasten files in Org agenda searches

---
 init.el | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/init.el b/init.el
index 84615ae..0ee1616 100644
--- a/init.el
+++ b/init.el
@@ -1112,7 +1112,16 @@ quickly loose their meaning."
                 (fset 'recenter 'identity)
                 (unwind-protect
                      (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