From afaef48b9005ed7672f58cc1e702ffffc71716c4 Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Sun, 2 May 2010 21:55:01 -0400 Subject: Variable purecopying fix (Bug#6083). * international/mule.el (auto-coding-alist): Only purecopy car or each item, not the whole list (Bug#6083). --- lisp/ChangeLog | 5 +++++ lisp/international/mule.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cb92e9833b6..5a686126b46 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-05-03 Chong Yidong + + * international/mule.el (auto-coding-alist): Only purecopy + car or each item, not the whole list (Bug#6083). + 2010-05-02 Chong Yidong * progmodes/js.el (js-mode): Make paragraph variables local before diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 8d2f6dede15..7e7e55728c8 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -1625,7 +1625,8 @@ and convert it in the temporary buffer. Otherwise, convert in-place." (defcustom auto-coding-alist ;; .exe and .EXE are added to support archive-mode looking at DOS ;; self-extracting exe archives. - (purecopy '(("\\.\\(\ + (mapcar (lambda (arg) (cons (purecopy (car arg)) (cdr arg))) + '(("\\.\\(\ arc\\|zip\\|lzh\\|lha\\|zoo\\|[jew]ar\\|xpi\\|rar\\|\ ARC\\|ZIP\\|LZH\\|LHA\\|ZOO\\|[JEW]AR\\|XPI\\|RAR\\)\\'" . no-conversion-multibyte) -- cgit v1.2.1