From 149ad6fedf199dcb20fdd388d19fad5b3f848989 Mon Sep 17 00:00:00 2001 From: jao Date: Fri, 23 Apr 2021 01:23:38 +0100 Subject: notmuch: homogeneous scrolling over everything with SPC --- email.org | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'email.org') diff --git a/email.org b/email.org index eaac4c2..57f360c 100644 --- a/email.org +++ b/email.org @@ -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))) -- cgit v1.2.3