diff options
author | Joakim Verona <joakim@verona.se> | 2012-04-26 11:59:27 +0200 |
---|---|---|
committer | Joakim Verona <joakim@verona.se> | 2012-04-26 11:59:27 +0200 |
commit | 6346156f96f3d3492dd3ca1f3d3a5db55ab3c3b2 (patch) | |
tree | 9361a618467f2089e7e4b409d5f9f7b4e4f23a1d /lisp/emacs-lisp/easy-mmode.el | |
parent | ab5b626f97ea7d71a98a06d8cc777fa925a1f716 (diff) | |
parent | e6fd457e010c2ec034a331335530d817852cc11c (diff) | |
download | emacs-6346156f96f3d3492dd3ca1f3d3a5db55ab3c3b2.tar.gz emacs-6346156f96f3d3492dd3ca1f3d3a5db55ab3c3b2.tar.bz2 emacs-6346156f96f3d3492dd3ca1f3d3a5db55ab3c3b2.zip |
upstream partial out of memory
Diffstat (limited to 'lisp/emacs-lisp/easy-mmode.el')
-rw-r--r-- | lisp/emacs-lisp/easy-mmode.el | 2 |
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) |