From: David Edmondson <dme@dme.org>
Date: Mon, 16 Jun 2014 05:30:11 +0000 (+0100)
Subject: emacs: Forwarded messages should not have modified buffers
X-Git-Tag: 0.19_rc1~156
X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=commitdiff_plain;h=b732a58a00ca48dd1a3892e10cf4a22d0715d9bc

emacs: Forwarded messages should not have modified buffers

When the user begins forwarding a message, the resulting composition
buffer should not be marked as modified, in order that it can
immediately be killed without prompting.
---

diff --git a/emacs/notmuch-mua.el b/emacs/notmuch-mua.el
index 95e4a4d3..2c588860 100644
--- a/emacs/notmuch-mua.el
+++ b/emacs/notmuch-mua.el
@@ -346,7 +346,8 @@ the From: address first."
     (message-forward-make-body cur)
     ;; `message-forward-make-body' shows the User-agent header.  Hide
     ;; it again.
-    (message-hide-headers)))
+    (message-hide-headers)
+    (set-buffer-modified-p nil)))
 
 (defun notmuch-mua-new-reply (query-string &optional prompt-for-sender reply-all)
   "Compose a reply to the message identified by QUERY-STRING.