diff --git a/modules/lang/org/contrib/journal.el b/modules/lang/org/contrib/journal.el index d14c26f99..1df1dde1e 100644 --- a/modules/lang/org/contrib/journal.el +++ b/modules/lang/org/contrib/journal.el @@ -32,6 +32,8 @@ ;; ...By exploiting `org-journal-dir''s setter (setq! org-journal-dir (expand-file-name org-journal-dir org-directory))) + (set-popup-rule! "^\\*Org-journal search" :select t :quit t) + (map! (:map org-journal-mode-map :n "]f" #'org-journal-open-next-entry :n "[f" #'org-journal-open-previous-entry diff --git a/modules/ui/popup/+hacks.el b/modules/ui/popup/+hacks.el index 7cc0573c7..b9af549fd 100644 --- a/modules/ui/popup/+hacks.el +++ b/modules/ui/popup/+hacks.el @@ -281,6 +281,13 @@ Ugh, such an ugly hack." (apply orig-fn args)))) +;;;###package org-journal +(defadvice! +popup--use-popup-window-a (orig-fn &rest args) + :around #'org-journal-search-by-string + (letf! ((#'switch-to-buffer #'pop-to-buffer)) + (apply orig-fn args))) + + ;;;###package persp-mode (defadvice! +popup--persp-mode-restore-popups-a (&rest _) "Restore popup windows when loading a perspective from file."