From 4aaffda19b84c458cc5637c0e3b5dea5eea38fd6 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 8 Aug 2007 14:06:02 +0000 Subject: [PATCH] (auto-mode-alist): Use the purecopied text (duh!). --- lisp/ChangeLog | 4 ++++ lisp/files.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f817d235f57..24d83794eac 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2007-08-08 Stefan Monnier + + * files.el (auto-mode-alist): Use the purecopied text (duh!). + 2007-08-08 Andreas Schwab * mail/mailabbrev.el (sendmail-pre-abbrev-expand-hook): Check for diff --git a/lisp/files.el b/lisp/files.el index 4d952f3f935..8ade456ee07 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1886,7 +1886,7 @@ since only a single case-insensitive search through the alist is made." ;; c++-mode, java-mode and more) are added through autoload ;; directives in that file. That way is discouraged since it ;; spreads out the definition of the initial value. - (mapc + (mapcar (lambda (elt) (cons (purecopy (car elt)) (cdr elt))) `(;; do this first, so that .html.pl is Polish html, not Perl -- 2.39.2