changeset 16523:53306ee8953d

(minor-mode-alist): Don't use purecopy.
author Richard M. Stallman <rms@gnu.org>
date Wed, 06 Nov 1996 19:03:53 +0000
parents 63ca7c6ceeff
children 84440bd95727
files lisp/bindings.el
diffstat 1 files changed, 6 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/bindings.el	Wed Nov 06 07:38:41 1996 +0000
+++ b/lisp/bindings.el	Wed Nov 06 19:03:53 1996 +0000
@@ -90,12 +90,12 @@
 
 Actually, STRING need not be a string; any possible mode-line element
 is okay.  See `mode-line-format'.")
-(setq minor-mode-alist (mapcar 'purecopy
-			       '((abbrev-mode " Abbrev")
-				 (overwrite-mode overwrite-mode)
-				 (auto-fill-function " Fill")
-				 ;; not really a minor mode...
-				 (defining-kbd-macro " Def"))))
+;; Don't use purecopy here--some people want to change these strings.
+(setq minor-mode-alist '((abbrev-mode " Abbrev")
+			 (overwrite-mode overwrite-mode)
+			 (auto-fill-function " Fill")
+			 ;; not really a minor mode...
+			 (defining-kbd-macro " Def")))
 
 ;; These variables are used by autoloadable packages.
 ;; They are defined here so that they do not get overridden