emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 07e6b29 10/12: Fix previous define-minor-mode change


From: Lars Ingebrigtsen
Subject: master 07e6b29 10/12: Fix previous define-minor-mode change
Date: Sun, 14 Feb 2021 08:15:04 -0500 (EST)

branch: master
commit 07e6b29b12c961808fcf4d8f804946056118efc5
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix previous define-minor-mode change
    
    * lisp/emacs-lisp/easy-mmode.el (define-minor-mode): Fix
    interactive extension in previous change.
---
 lisp/emacs-lisp/easy-mmode.el | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el
index 08ac818..01fb58e 100644
--- a/lisp/emacs-lisp/easy-mmode.el
+++ b/lisp/emacs-lisp/easy-mmode.el
@@ -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)))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]