From: Keith Packard <keithp@keithp.com>
Date: Sun, 27 Dec 2009 00:34:16 +0000 (-0800)
Subject: Add 'm' and ' ' bindings to notmuch-folder view
X-Git-Tag: 0.1~101
X-Git-Url: https://git.cworth.org/git?a=commitdiff_plain;h=b58dcfb7026e7bc5dbc9c2333d07dcb11a9975aa;p=notmuch

Add 'm' and ' ' bindings to notmuch-folder view

This allows the user to compose new mail from the folder view, and
also to use <space> to show the current folder.

Signed-off-by: Keith Packard <keithp@keithp.com>
---

diff --git a/notmuch.el b/notmuch.el
index 8fba25d4..af45a21a 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -1446,12 +1446,14 @@ current search results AND that are tagged with the given tag."
     (define-key map "?" 'notmuch-help)
     (define-key map "x" 'kill-this-buffer)
     (define-key map "q" 'kill-this-buffer)
+    (define-key map "m" 'message-mail)
     (define-key map ">" 'notmuch-folder-last)
     (define-key map "<" 'notmuch-folder-first)
     (define-key map "=" 'notmuch-folder)
     (define-key map "s" 'notmuch-search)
     (define-key map [mouse-1] 'notmuch-folder-show-search)
     (define-key map (kbd "RET") 'notmuch-folder-show-search)
+    (define-key map " " 'notmuch-folder-show-search)
     (define-key map "p" 'notmuch-folder-previous)
     (define-key map "n" 'notmuch-folder-next)
     map)