From: yamaoka <yamaoka>
Date: Mon, 14 Jun 1999 11:57:27 +0000 (+0000)
Subject: (message-send-news): Make `tembuf' as unmodified after inserting a text from
X-Git-Tag: t-gnus-6_10_066-00~5
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=89045909826e95b7f91e33210e4b19fa357c7bb4;p=elisp%2Fgnus.git-

(message-send-news): Make `tembuf' as unmodified after inserting a text from
`message-encoding-buffer'.
(message-send-mail): Ditto.
---

diff --git a/lisp/message.el b/lisp/message.el
index 2985607..658005a 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -2498,6 +2498,7 @@ This sub function is for exclusive use of `message-send-mail'."
 	    (set-buffer tembuf)
 	    (erase-buffer)
 	    (insert-buffer message-encoding-buffer)
+	    (set-buffer-modified-p nil)
 	    ;; Remove some headers.
 	    (save-restriction
 	      (message-narrow-to-headers)
@@ -2735,6 +2736,7 @@ This sub function is for exclusive use of `message-send-news'."
 	    (buffer-disable-undo)
 	    (erase-buffer)
 	    (insert-buffer message-encoding-buffer)
+	    (set-buffer-modified-p nil)
 	    ;; Remove some headers.
 	    (save-restriction
 	      (message-narrow-to-headers)