Merge from emacs-24 branch
This commit is contained in:
commit
e6fd457e01
28 changed files with 469 additions and 338 deletions
|
@ -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)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue