From d3924d57980db59f8f681ae0a5106fcbc27c1e35 Mon Sep 17 00:00:00 2001 From: Mark Walters Date: Thu, 22 Aug 2013 18:10:22 +0100 Subject: 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. --- contrib/notmuch-pick/notmuch-pick.el | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'contrib') 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) -- cgit v1.2.3