mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
Add popup rule for org-journal search commands
This commit is contained in:
@ -32,6 +32,8 @@
|
|||||||
;; ...By exploiting `org-journal-dir''s setter
|
;; ...By exploiting `org-journal-dir''s setter
|
||||||
(setq! org-journal-dir (expand-file-name org-journal-dir org-directory)))
|
(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
|
(map! (:map org-journal-mode-map
|
||||||
:n "]f" #'org-journal-open-next-entry
|
:n "]f" #'org-journal-open-next-entry
|
||||||
:n "[f" #'org-journal-open-previous-entry
|
:n "[f" #'org-journal-open-previous-entry
|
||||||
|
@ -281,6 +281,13 @@ Ugh, such an ugly hack."
|
|||||||
(apply orig-fn args))))
|
(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
|
;;;###package persp-mode
|
||||||
(defadvice! +popup--persp-mode-restore-popups-a (&rest _)
|
(defadvice! +popup--persp-mode-restore-popups-a (&rest _)
|
||||||
"Restore popup windows when loading a perspective from file."
|
"Restore popup windows when loading a perspective from file."
|
||||||
|
Reference in New Issue
Block a user