summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/edebug.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/edebug.el')
-rw-r--r--lisp/emacs-lisp/edebug.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index 7fae4d21d50..45996945948 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.