doom/org: slight optimization for bhanaks-org-agenda-limit-indirect-* functions

This commit is contained in:
Payas Relekar 2023-11-10 23:49:18 +05:30
parent d4fbff0e56
commit 88287c9f73

View file

@ -382,14 +382,12 @@ As such, relying on imperative config evaluation can turn into gotchas. While th
(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))
(makunbound bhankas-fit-buffer-limit-max))
(defun bhankas-org-agenda-limit-indirect-buffer (og-fun &rest args)
(let ((new-args args))
(when (and (boundp 'bhankas-fit-buffer-limit-max)
bhankas-fit-buffer-limit-max)
(setq new-args (append args '(20))))
(apply og-fun new-args)))
(when (boundp 'bhankas-fit-buffer-limit-max)
(setq args (append args '(20))))
(apply og-fun args))
:config
(map!
:map org-mode-map