From: yamaoka <yamaoka>
Date: Tue, 29 Jun 2004 11:54:14 +0000 (+0000)
Subject: Synch to No Gnus 200406291153.
X-Git-Tag: t-gnus-6_17_4-quimby-~835
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=639caf4c04abe89836e782b0ec3f9cff7f7c000b;p=elisp%2Fgnus.git-

Synch to No Gnus 200406291153.
---

diff --git a/lisp/mm-util.el b/lisp/mm-util.el
index 45642ad..bf208cc 100644
--- a/lisp/mm-util.el
+++ b/lisp/mm-util.el
@@ -277,8 +277,9 @@ with Mule charsets.  It is completely useless for Emacs."
     (condition-case nil
 	(let ((val (delq
 		    'ascii
-		    (symbol-value
-		     'unicode-basic-translation-charset-order-list)))
+		    (copy-sequence
+		     (symbol-value
+		      'unicode-basic-translation-charset-order-list))))
 	      (elem (assq 'utf-8 mm-mime-mule-charset-alist)))
 	  (if elem
 	      (setcdr elem val)