diff options
Diffstat (limited to 'email.org')
| -rw-r--r-- | email.org | 13 |
1 files changed, 8 insertions, 5 deletions
@@ -384,13 +384,16 @@ (when (eq 'notmuch jao-afio-mail-function) (setq mm-text-html-renderer 'shr)) + (defun jao-notmuch-refresh-agenda () + (interactive) + (save-window-excursion (org-agenda-list))) + (defun jao-notmuch-refresh-hello () (interactive) (when (derived-mode-p 'notmuch-hello-mode) (when (not (string-blank-p jao-notmuch-minibuffer-string)) - (notmuch-hello)) + (let ((notmuch-hello-auto-refresh nil)) (notmuch-hello))) (let ((inhibit-message t)) - (save-window-excursion (org-agenda-list)) (beginning-of-buffer) (widget-forward 2)))) @@ -413,7 +416,8 @@ (jao-afio-switch . jao-notmuch-refresh-hello)) :bind (:map notmuch-hello-mode-map - (("S" . consult-notmuch) + (("a" . jao-notmuch-refresh-agenda) + ("S" . consult-notmuch) ("g" . jao-notmuch-refresh-hello) ("SPC" . widget-button-press)) :map notmuch-common-keymap @@ -429,8 +433,7 @@ (let ((b (current-buffer))) (select-window notmuch-tree-message-window) (setq-local jao-notmuch--tree-buffer b) - (when (and and-click (button-at (point))) - (push-button)) + (when (and and-click (button-at (point))) (push-button)) t))) (defun jao-notmuch-click-message-buffer () |