From 639caf4c04abe89836e782b0ec3f9cff7f7c000b Mon Sep 17 00:00:00 2001
From: yamaoka <yamaoka>
Date: Tue, 29 Jun 2004 11:54:14 +0000
Subject: [PATCH] Synch to No Gnus 200406291153.

---
 lisp/mm-util.el |    5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

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)
-- 
1.7.10.4