branch: externals/transient
commit f1491361a7e754e65de1ee1c59944a35c82fc5d2
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>
transient-define-suffix: Update debug specification
---
lisp/transient.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index 75b4585b79..8de12682c0 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -949,12 +949,11 @@ The BODY must begin with an `interactive' form that
matches
ARGLIST. The infix arguments are usually accessed by using
`transient-args' inside `interactive'.
-\(fn NAME ARGLIST [DOCSTRING] [KEYWORD VALUE]... BODY...)"
+\(fn NAME ARGLIST [DOCSTRING] [KEYWORD VALUE]... [BODY...])"
(declare (debug ( &define name lambda-list
[&optional lambda-doc]
[&rest keywordp sexp]
- ("interactive" interactive)
- def-body))
+ [&optional ("interactive" interactive) def-body]))
(indent defun)
(doc-string 3))
(pcase-let ((`(,class ,slots ,_ ,docstr ,body ,interactive-only)
