From: Thomas Jost <schnouki@schnouki.net>
To: Jameson Graef Rollins <jrollins@finestructure.net>,
	Carl Worth <cworth@cworth.org>, Stewart Smith <stewart@flamingspork.com>,
	notmuch <notmuch@notmuchmail.org>
Subject: [PATCH 1/2] emacs: Don't always prompt for the "From" address when
	replying
Date: Fri, 27 May 2011 11:14:59 +0200
Message-Id: <1306487700-21358-1-git-send-email-schnouki@schnouki.net>
In-Reply-To: <87mxi9ytvt.fsf@servo.factory.finestructure.net>
References: <87mxi9ytvt.fsf@servo.factory.finestructure.net>
Precedence: list

When replying, the From: address is already filled in by notmuch reply, so most
of the time there is no need to prompt the user for it.
---
Hi Jameson,

You're right, this is mostly annoying when replying to messages. Here's a fix.

Regards,
Thomas

 emacs/notmuch-mua.el |    7 +++++--
 1 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el
index 7c05a81..556d2bf 100644
--- a/emacs/notmuch-mua.el
+++ b/emacs/notmuch-mua.el
@@ -155,7 +155,10 @@ name and addresses configured in the notmuch configuration file."
   :type '(repeat string))
 
 (defcustom notmuch-always-prompt-for-sender nil
-  "Always prompt for the From: address when composing a new message."
+  "Always prompt for the From: address when composing or forwarding a message.
+
+This is not taken into account when replying to a message, because in that case
+the From: header is already filled in by notmuch."
   :group 'notmuch
   :type 'boolean)
 
@@ -203,7 +206,7 @@ the From: address first."
   "Invoke the notmuch reply window."
   (interactive "P")
   (let ((sender
-	 (when (or prompt-for-sender notmuch-always-prompt-for-sender)
+	 (when prompt-for-sender
 	   (notmuch-mua-prompt-for-sender))))
     (notmuch-mua-reply query-string sender)))
 
-- 
1.7.5.2