diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2010-05-02 21:55:01 -0400 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2010-05-02 21:55:01 -0400 |
| commit | f034e1762ba3824627494e479a47189ec62db6d1 (patch) | |
| tree | 199d189457e10e000af42b0d3aa00f5ab98202c6 /lisp/international | |
| parent | 9978c06c88315dce3071f6c4b284878f34c37c66 (diff) | |
| download | emacs-f034e1762ba3824627494e479a47189ec62db6d1.tar.gz | |
Variable purecopying fix (Bug#6083).
* international/mule.el (auto-coding-alist): Only purecopy
car or each item, not the whole list (Bug#6083).
Diffstat (limited to 'lisp/international')
| -rw-r--r-- | lisp/international/mule.el | 3 |
1 files changed, 2 insertions, 1 deletions
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) |