From: Mark Walters Date: Thu, 22 Aug 2013 17:10:22 +0000 (+0100) Subject: contrib: pick: pass tab through to the message pane X-Git-Tag: 0.17_rc1~183 X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=commitdiff_plain;h=d3924d57980db59f8f681ae0a5106fcbc27c1e35 contrib: pick: pass tab through to the message pane This makes tab move to next button in the message pane and binds button activate (in message pane) to "e". This means that is easy to toggle hidden parts or hidden citations etc in the message pane. --- diff --git a/contrib/notmuch-pick/notmuch-pick.el b/contrib/notmuch-pick/notmuch-pick.el index f24f2b31..3b1f85c1 100644 --- a/contrib/notmuch-pick/notmuch-pick.el +++ b/contrib/notmuch-pick/notmuch-pick.el @@ -216,6 +216,14 @@ This function does not give an error if there is no button." (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) + + ;; these apply to the message pane + (define-key map (kbd "M-TAB") (notmuch-pick-to-message-pane #'notmuch-show-previous-button)) + (define-key map (kbd "") (notmuch-pick-to-message-pane #'notmuch-show-previous-button)) + (define-key map (kbd "TAB") (notmuch-pick-to-message-pane #'notmuch-show-next-button)) + (define-key map "e" (notmuch-pick-to-message-pane #'notmuch-pick-button-activate)) + + ;; The main pick bindings (define-key map "q" 'notmuch-pick-quit) (define-key map "x" 'notmuch-pick-quit) (define-key map "?" 'notmuch-help)