From 4812cfb368cddbb4265e6d55d8eb2d6b83fde1fe Mon Sep 17 00:00:00 2001
From: Carl Worth <cworth@cworth.org>
Date: Fri, 13 Nov 2009 15:53:58 -0800
Subject: [PATCH] notmuch.el: Add an 'm' binding to start composing a new mail.

Available from either the "search" or the "show" view.
---
 notmuch.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/notmuch.el b/notmuch.el
index 6c39ec7e..e70a1fc5 100644
--- a/notmuch.el
+++ b/notmuch.el
@@ -35,6 +35,7 @@
     (define-key map "b" 'notmuch-show-toggle-body-read-visible)
     (define-key map "c" 'notmuch-show-toggle-citations-visible)
     (define-key map "h" 'notmuch-show-toggle-headers-visible)
+    (define-key map "m" 'message-mail)
     (define-key map "n" 'notmuch-show-next-message)
     (define-key map "N" 'notmuch-show-mark-read-then-next-open-message)
     (define-key map "p" 'notmuch-show-previous-message)
@@ -614,6 +615,7 @@ thread from that buffer can be show when done with this one)."
     (define-key map "a" 'notmuch-search-archive-thread)
     (define-key map "b" 'notmuch-search-scroll-down)
     (define-key map "f" 'notmuch-search-filter)
+    (define-key map "m" 'message-mail)
     (define-key map "n" 'next-line)
     (define-key map "o" 'notmuch-search-toggle-order)
     (define-key map "p" 'previous-line)