X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-tree.el;h=658c4f90870dfe4de726514b41908b53dde85661;hb=87f1d68440c3126a585427443339ff4c8e3067ef;hp=d864e6dd88194c85ca2229e864754094b3c12ce3;hpb=e954310d70674a439a50cf4c699467567095b057;p=notmuch diff --git a/emacs/notmuch-tree.el b/emacs/notmuch-tree.el index d864e6dd..658c4f90 100644 --- a/emacs/notmuch-tree.el +++ b/emacs/notmuch-tree.el @@ -241,6 +241,8 @@ FUNC." (define-key map [remap notmuch-search] 'notmuch-tree-to-search) ;; Override because we want to close message pane first. (define-key map [remap notmuch-mua-new-mail] (notmuch-tree-close-message-pane-and #'notmuch-mua-new-mail)) + ;; Override because we want to close message pane first. + (define-key map [remap notmuch-jump-search] (notmuch-tree-close-message-pane-and #'notmuch-jump-search)) (define-key map "S" 'notmuch-search-from-tree-current-query) @@ -249,6 +251,7 @@ FUNC." (define-key map "w" 'notmuch-show-save-attachments) (define-key map "v" 'notmuch-show-view-all-mime-parts) (define-key map "c" 'notmuch-show-stash-map) + (define-key map "b" 'notmuch-show-resend-message) ;; these apply to the message pane (define-key map (kbd "M-TAB") (notmuch-tree-to-message-pane #'notmuch-show-previous-button)) @@ -280,7 +283,7 @@ FUNC." (define-key map "+" 'notmuch-tree-add-tag) (define-key map "*" 'notmuch-tree-tag-thread) (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)) (fset 'notmuch-tree-mode-map notmuch-tree-mode-map)