doom/org: limit max height for indirect buffers in agenda
This commit is contained in:
parent
4e4b8a576a
commit
d89cdbb023
1 changed files with 15 additions and 0 deletions
|
@ -458,6 +458,21 @@ As such, relying on imperative config evaluation can turn into gotchas. While th
|
|||
(set-popup-rules!
|
||||
'(("^\\*Org Src"
|
||||
:slot 20 :side right :size 0.7 :select t)))
|
||||
|
||||
(defun bhankas-org-agenda-limit-indirect-max (og-fun &rest args)
|
||||
(setq bhankas-fit-buffer-limit-max t)
|
||||
(apply og-fun args)
|
||||
(setq bhankas-fit-buffer-limit-max nil))
|
||||
|
||||
(defun bhankas-org-agenda-limit-indirect-buffer (og-fun &rest args)
|
||||
(let ((new-args args))
|
||||
(when bhankas-fit-buffer-limit-max
|
||||
(setq new-args (append args '(20))))
|
||||
(apply og-fun new-args)))
|
||||
|
||||
(advice-add 'fit-window-to-buffer :around #'bhankas-org-agenda-limit-indirect-buffer)
|
||||
(advice-add 'org-agenda-tree-to-indirect-buffer :around #'bhankas-org-agenda-limit-indirect-max)
|
||||
|
||||
(global-org-modern-mode))
|
||||
#+END_SRC
|
||||
** org-roam
|
||||
|
|
Reference in a new issue