summaryrefslogtreecommitdiff
path: root/lisp/international/mule-conf.el
diff options
context:
space:
mode:
authorSam Steingold <sds@gnu.org>2011-02-01 16:37:12 -0500
committerSam Steingold <sds@gnu.org>2011-02-01 16:37:12 -0500
commite8e4d5c88e04390481b3156c0e5efe40979d8519 (patch)
tree91e183a5d20a036e1e03c544e693adfa8b09ec73 /lisp/international/mule-conf.el
parentabef340a0c5304054a2a5e6d95e1d825501f0e7a (diff)
downloademacs-e8e4d5c88e04390481b3156c0e5efe40979d8519.tar.gz
undo 2011-02-01T18:15:18Z!sds@gnu.org (purecopy-cons, purecopy-car) at Stefan Monnier's request
Diffstat (limited to 'lisp/international/mule-conf.el')
-rw-r--r--lisp/international/mule-conf.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el
index 55a96b6cca1..9ba95e4d11a 100644
--- a/lisp/international/mule-conf.el
+++ b/lisp/international/mule-conf.el
@@ -1505,7 +1505,7 @@ for decoding and encoding files, process I/O, etc."
;; Tar files are not decoded at all, but we treat them as raw bytes.
(setq file-coding-system-alist
- (mapcar 'purecopy-car
+ (mapcar (lambda (arg) (cons (purecopy (car arg)) (cdr arg)))
'(("\\.elc\\'" . utf-8-emacs)
("\\.utf\\(-8\\)?\\'" . utf-8)
("\\.xml\\'" . xml-find-file-coding-system)