From: Carl Worth <cworth@cworth.org>
Date: Wed, 18 Nov 2009 18:12:13 +0000 (+0100)
Subject: Make '?" bring up a list of bindings.
X-Git-Tag: 0.1~444
X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=commitdiff_plain;h=0656fb518df3190aebc04ed955c8b3c3cc21759c

Make '?" bring up a list of bindings.

Just using describe-mode for now, (though something more specialized
would be better).
---

diff --git a/notmuch.el b/notmuch.el
index 014d15bc..ed1b363b 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -53,6 +53,7 @@
     (define-key map (kbd "DEL") 'notmuch-show-rewind)
     (define-key map " " 'notmuch-show-advance-marking-read-and-archiving)
     (define-key map "|" 'notmuch-show-pipe-message)
+    (define-key map "?" 'describe-mode)
     map)
   "Keymap for \"notmuch show\" buffers.")
 (fset 'notmuch-show-mode-map notmuch-show-mode-map)
@@ -698,6 +699,7 @@ thread from that buffer can be show when done with this one)."
     (define-key map "\M->" 'notmuch-search-goto-last-thread)
     (define-key map " " 'notmuch-search-scroll-up)
     (define-key map (kbd "<DEL>") 'notmuch-search-scroll-down)
+    (define-key map "?" 'describe-mode)
     map)
   "Keymap for \"notmuch search\" buffers.")
 (fset 'notmuch-search-mode-map notmuch-search-mode-map)