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-Url: https://git.cworth.org/git?p=obsolete%2Fnotmuch-old;a=commitdiff_plain;h=d3924d57980db59f8f681ae0a5106fcbc27c1e35;hp=415d5da7dd06a17648549fa42ac3574ef0ccc661 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)