emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add popup rule for org-journal search commands

Browse source
This commit is contained in:
Henrik Lissner 2020-05-07 00:23:46 -04:00
parent 333bdd44c0
commit 5b23b3d486
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 9 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
modules/lang/org/contrib/journal.el
View file

@ -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

7
modules/ui/popup/+hacks.el
View file

@ -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."