Mercurial > emacs

diff lisp/emacs-lisp/easy-mmode.el @ 105945:503b88c15efc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(define-minor-mode): Purecopy :lighter.
author Dan Nicolaescu <dann@ics.uci.edu>
date Wed, 11 Nov 2009 06:17:07 +0000
parents bd2966850aac
children fecbb2b5a355
line wrap: on
line diff
--- a/lisp/emacs-lisp/easy-mmode.el	Wed Nov 11 06:16:16 2009 +0000
+++ b/lisp/emacs-lisp/easy-mmode.el	Wed Nov 11 06:17:07 2009 +0000
@@ -158,7 +158,7 @@
       (setq body (cdr body))
       (case keyw
 	(:init-value (setq init-value (pop body)))
-	(:lighter (setq lighter (pop body)))
+	(:lighter (setq lighter (purecopy (pop body))))
 	(:global (setq globalp (pop body)))
 	(:extra-args (setq extra-args (pop body)))
 	(:set (setq set (list :set (pop body))))