(define-minor-mode): Don't use symbol-value with constant argument.

5ca4661e · Stefan Monnier · c61dc887 · 5ca4661e · 5ca4661e
Commit 5ca4661e authored Aug 30, 2009 by Stefan Monnier
Show whitespace changes
Inline Side-by-side

Showing with 4 additions and 2 deletions

lisp/ChangeLog lisp/ChangeLog +3 -0

lisp/emacs-lisp/easy-mmode.el lisp/emacs-lisp/easy-mmode.el +1 -2

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
 2009-08-30  Stefan Monnier  <monnier@iro.umontreal.ca>

+	* emacs-lisp/easy-mmode.el (define-minor-mode): Don't use symbol-value
+	with constant argument.
+
 	* emacs-lisp/debug.el (debugger-setup-buffer): Make it multibyte.

 	* emacs-lisp/cl.el (cl-macro-environment): Don't define it here.

--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -263,8 +263,7 @@ With zero or negative ARG turn mode off.

       (add-minor-mode ',mode ',lighter
 		       ,(if keymap keymap-sym
-			  `(if (boundp ',keymap-sym)
-			       (symbol-value ',keymap-sym)))))))
+			  `(if (boundp ',keymap-sym) ,keymap-sym))))))

 ;;;
 ;;; make global minor mode