| ;;; code I suspect to be interacting
|
| (defun or/org-agenda-redo-if-single-window-in-frame ()
|
| (when (and (eq major-mode 'org-agenda-mode)
|
| (frame-root-window-p (selected-window)))
|
| (org-agenda-redo)))
|
|
|
| (add-hook 'window-configuration-change-hook
|
| #'or/org-agenda-redo-if-single-window-in-frame)
|
|
|
| (advice-add 'org-agenda-follow-mode :after (lambda (&rest args)
|
| (org-agenda-redo)))
|
|
|
| ;;; code that is supposed to silence org-agenda-redo's message
|
| (defun or/org-agenda-redo-inhibit-message-advice (oldfun args)
|
| (let ((inhibit-message t))
|
| (apply oldfun args)))
|
|
|
| (advice-add 'org-agenda-redo :around #'or/org-agenda-redo-inhibit-message-advice)
|