summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/easy-mmode.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@gnu.org>2012-04-15 15:28:01 +0800
committerChong Yidong <cyd@gnu.org>2012-04-15 15:28:01 +0800
commite6fd457e010c2ec034a331335530d817852cc11c (patch)
tree4c290ef2537450fca8200b57dc11dc5443c40b1c /lisp/emacs-lisp/easy-mmode.el
parent75f1671a5240bf2833fc473900b662135509ed72 (diff)
parent467a33d09f0e6d445fb020013ac65b12adffc35e (diff)
downloademacs-e6fd457e010c2ec034a331335530d817852cc11c.tar.gz
emacs-e6fd457e010c2ec034a331335530d817852cc11c.tar.bz2
emacs-e6fd457e010c2ec034a331335530d817852cc11c.zip
Merge from emacs-24 branch
Diffstat (limited to 'lisp/emacs-lisp/easy-mmode.el')
-rw-r--r--lisp/emacs-lisp/easy-mmode.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index 88698a1f069..0d6716a2e63 100644
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -260,7 +260,7 @@ the mode if ARG is omitted or nil, and toggle it if ARG is `toggle'.
;; repeat-command still does the toggling correctly.
(interactive (list (or current-prefix-arg 'toggle)))
(let ((,last-message (current-message)))
- (,@(if setter (list setter)
+ (,@(if setter `(funcall #',setter)
(list (if (symbolp mode) 'setq 'setf) mode))
(if (eq arg 'toggle)
(not ,mode)