diff options
-rw-r--r-- | email.org | 9 |
1 files changed, 6 insertions, 3 deletions
@@ -503,7 +503,8 @@ :bind (:map notmuch-hello-mode-map (("g" . jao-notmuch-refresh-hello) ("S" . consut-notmuch) - ("k" . nil)))) + ("k" . nil) + ("SPC" . widget-button-press)))) #+end_src *** show @@ -571,8 +572,10 @@ (defun jao-notmuch-tree-scroll-or-next () "Scroll or next message in forest or exit if none." (interactive) - (when (notmuch-tree-scroll-message-window) - (notmuch-tree-next-matching-message t))) + (if (notmuch-tree-scroll-message-window) + (notmuch-tree-next-matching-message t) + (when (not (window-live-p notmuch-tree-message-window)) + (notmuch-tree-show-message nil)))) (defun jao-notmuch--format-field (fun field &rest args) (let ((rs (apply fun field args))) |