From 24cc28936e9366e70ed89cc5ddc560b886d25d8b Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Sun, 8 Oct 2023 10:55:28 +1100 Subject: [emacs] Small tweaks to org-agenda --- emacs/.emacs.d/init/ycp-org.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'emacs/.emacs.d/init') diff --git a/emacs/.emacs.d/init/ycp-org.el b/emacs/.emacs.d/init/ycp-org.el index 74a1e04..221eaf7 100644 --- a/emacs/.emacs.d/init/ycp-org.el +++ b/emacs/.emacs.d/init/ycp-org.el @@ -176,7 +176,7 @@ (setq org-agenda-custom-commands `(("A" "Agenda and next" ((agenda "" - ((org-agenda-span 10) + ((org-agenda-span 32) ;; only works when `org-agenda-start-on-weekday' ;; is nil (org-agenda-start-day "-2d"))) @@ -200,6 +200,10 @@ (add-hook 'org-agenda-after-show-hook 'my-org-agenda-after-show) (org-defkey org-agenda-mode-map "d" #'org-agenda-deadline) (org-defkey org-agenda-mode-map "s" #'org-agenda-schedule) + ;; For whatever reason, `org-agenda-quit' deletes window instead of + ;; burying the buffer when `org-agenda-window-setup' is not + ;; 'current-window and `(one-window-p)' returns nil + (org-defkey org-agenda-mode-map "q" #'bury-buffer) (setq org-agenda-window-setup 'other-window) ) -- cgit v1.2.3