Fix previous define-minor-mode change
* lisp/emacs-lisp/easy-mmode.el (define-minor-mode): Fix interactive extension in previous change.
This commit is contained in:
parent
ffca272678
commit
07e6b29b12
1 changed files with 5 additions and 4 deletions
|
@ -313,10 +313,11 @@ or call the function `%s'."))))
|
|||
;; Use `toggle' rather than (if ,mode 0 1) so that using
|
||||
;; repeat-command still does the toggling correctly.
|
||||
(if (consp interactive)
|
||||
`(command ,interactive
|
||||
(list (if current-prefix-arg
|
||||
(prefix-numeric-value current-prefix-arg)
|
||||
'toggle)))
|
||||
`(interactive
|
||||
,interactive
|
||||
(list (if current-prefix-arg
|
||||
(prefix-numeric-value current-prefix-arg)
|
||||
'toggle)))
|
||||
'(interactive (list (if current-prefix-arg
|
||||
(prefix-numeric-value current-prefix-arg)
|
||||
'toggle)))))
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue