diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-02-14 14:13:38 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-02-14 14:13:38 +0100 |
| commit | 869cdcf4e7a787534d275ca6fc0a792ab642c764 (patch) | |
| tree | baed12ff8ea87036d1acab3ac8a34b9a7218895f | |
| parent | 07e6b29b12c961808fcf4d8f804946056118efc5 (diff) | |
| download | emacs-869cdcf4e7a787534d275ca6fc0a792ab642c764.tar.gz | |
Really fix the syntax problem in define-minor-mode
* lisp/emacs-lisp/easy-mmode.el (define-minor-mode): Fix
interactive extension in previous change.
| -rw-r--r-- | lisp/emacs-lisp/easy-mmode.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index 01fb58e863a..7e5e2a9b8a9 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el @@ -314,10 +314,10 @@ or call the function `%s'.")))) ;; repeat-command still does the toggling correctly. (if (consp interactive) `(interactive - ,interactive (list (if current-prefix-arg (prefix-numeric-value current-prefix-arg) - 'toggle))) + 'toggle)) + ,@interactive) '(interactive (list (if current-prefix-arg (prefix-numeric-value current-prefix-arg) 'toggle))))) |