Changes committed gnus/lisp (ChangeLog gnus-msg.el)

Modified: ChangeLog gnus-msg.el

(gnus-summary-supersede-article, gnus-summary-resend-message-edit):
 Bind mail-parse-charset to the value of gnus-newsgroup-charset to decode
 non-MIME encoded text in message header.


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.1897 gnus/lisp/ChangeLog:7.1898
--- ChangeLog:7.1897	Thu Jul 31 01:48:40 2008
+++ ChangeLog	Fri Aug  8 13:10:55 2008
@@ -1,3 +1,10 @@
+2008-08-08  Katsumi Yamaoka  <[email protected]>
+
+	* gnus-msg.el (gnus-summary-supersede-article)
+	(gnus-summary-resend-message-edit): Bind mail-parse-charset to the
+	value of gnus-newsgroup-charset to decode non-MIME encoded text in
+	message header.
+
 2008-07-30  Katsumi Yamaoka  <[email protected]>
 
 	* rfc2104.el (rfc2104-string-make-unibyte): Define it as a compiler
Index: gnus-msg.el
diff -u gnus/lisp/gnus-msg.el:7.68 gnus/lisp/gnus-msg.el:7.69
--- gnus-msg.el:7.68	Wed Jun 11 16:19:44 2008
+++ gnus-msg.el	Fri Aug  8 13:10:55 2008
@@ -812,7 +812,8 @@
 This is done simply by taking the old article and adding a Supersedes
 header line with the old Message-ID."
   (interactive)
-  (let ((article (gnus-summary-article-number)))
+  (let ((article (gnus-summary-article-number))
+	(mail-parse-charset gnus-newsgroup-charset))
     (gnus-setup-message 'reply-yank
       (gnus-summary-select-article t)
       (set-buffer gnus-original-article-buffer)
@@ -1274,7 +1275,7 @@
 contents of the message, and then, everything will happen as when
 composing a new message."
   (interactive)
-  (let ((article (gnus-summary-article-number)))
+  (let ((mail-parse-charset gnus-newsgroup-charset))
     (gnus-setup-message 'reply-yank
       (gnus-summary-select-article t)
       (set-buffer gnus-original-article-buffer)