emacs-diffs
[Top][All Lists]
Advanced

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

master 6735bb3: Adjust the edebug spec for `interactive'


From: Lars Ingebrigtsen
Subject: master 6735bb3: Adjust the edebug spec for `interactive'
Date: Wed, 17 Feb 2021 14:59:54 -0500 (EST)

branch: master
commit 6735bb3d22dc64f3fe42e4a7f439ea9d62f75b5a
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Adjust the edebug spec for `interactive'
    
    * lisp/emacs-lisp/edebug.el: Adjust the edebug spec for
    `interactive' for the new syntax.
---
 lisp/emacs-lisp/edebug.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index 7fae4d2..4599694 100644
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -2136,7 +2136,8 @@ SPEC is the symbol name prefix for `gensym'."
        ;; more convenient to define their Edebug spec here.
        (defun ( &define name lambda-list lambda-doc
                [&optional ("declare" def-declarations)]
-               [&optional ("interactive" &optional &or stringp def-form)]
+               [&optional ("interactive" &optional [&or stringp def-form]
+                            &rest symbolp)]
                def-body))
 
        (defmacro ( &define name lambda-list lambda-doc
@@ -2192,7 +2193,8 @@ SPEC is the symbol name prefix for `gensym'."
   '(&optional [&or stringp
                    (&define ":documentation" def-form)]))
 
-(def-edebug-elem-spec 'interactive '(&optional &or stringp def-form))
+(def-edebug-elem-spec 'interactive '(&optional [&or stringp def-form]
+                                               &rest symbolp))
 
 ;; A function-form is for an argument that may be a function or a form.
 ;; This specially recognizes anonymous functions quoted with quote.



reply via email to

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