emacs: tree: make b bounce a message and backspace scroll message pane up

This tweaks the keybindings in tree-mode. It make b do bounce/resend
matching show-mode. Since b was already bound to scroll message pane
back, we now use backspace for that.

This means space/backspace scroll the message pane forwards/backwards,
and page-up/page-down scrolls the tree pane forwards/backwards.
This commit is contained in:
Mark Walters 2016-09-25 08:18:10 +01:00 committed by David Bremner
parent 114d1cd0d0
commit 9966720453

View file

@ -251,6 +251,7 @@ FUNC."
(define-key map "w" 'notmuch-show-save-attachments) (define-key map "w" 'notmuch-show-save-attachments)
(define-key map "v" 'notmuch-show-view-all-mime-parts) (define-key map "v" 'notmuch-show-view-all-mime-parts)
(define-key map "c" 'notmuch-show-stash-map) (define-key map "c" 'notmuch-show-stash-map)
(define-key map "b" 'notmuch-show-resend-message)
;; these apply to the message pane ;; these apply to the message pane
(define-key map (kbd "M-TAB") (notmuch-tree-to-message-pane #'notmuch-show-previous-button)) (define-key map (kbd "M-TAB") (notmuch-tree-to-message-pane #'notmuch-show-previous-button))
@ -282,7 +283,7 @@ FUNC."
(define-key map "+" 'notmuch-tree-add-tag) (define-key map "+" 'notmuch-tree-add-tag)
(define-key map "*" 'notmuch-tree-tag-thread) (define-key map "*" 'notmuch-tree-tag-thread)
(define-key map " " 'notmuch-tree-scroll-or-next) (define-key map " " 'notmuch-tree-scroll-or-next)
(define-key map "b" 'notmuch-tree-scroll-message-window-back) (define-key map (kbd "DEL") 'notmuch-tree-scroll-message-window-back)
map)) map))
(fset 'notmuch-tree-mode-map notmuch-tree-mode-map) (fset 'notmuch-tree-mode-map notmuch-tree-mode-map)