branch: externals/transient commit 8a4f713087e09f09ead32bf15726542a5fd6df52 Author: Jonas Bernoulli <jo...@bernoul.li> Commit: Jonas Bernoulli <jo...@bernoul.li>
transient-define-prefix: Rename a local variable --- lisp/transient.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/lisp/transient.el b/lisp/transient.el index a2ee2af246..e8aac55ccc 100644 --- a/lisp/transient.el +++ b/lisp/transient.el @@ -1066,7 +1066,7 @@ to the setup function: (indent defun) (doc-string 3)) (pcase-let - ((`(,class ,slots ,suffixes ,docstr ,body ,interactive-only) + ((`(,class ,slots ,groups ,docstr ,body ,interactive-only) (transient--expand-define-args args arglist 'transient-define-prefix))) `(progn (defalias ',name @@ -1081,8 +1081,7 @@ to the setup function: (,(or class 'transient-prefix) :command ',name ,@slots)) (transient--set-layout ',name - (list ,@(mapcan (lambda (s) (transient--parse-child name s)) - suffixes)))))) + (list ,@(mapcan (lambda (s) (transient--parse-child name s)) groups)))))) (defmacro transient-define-suffix (name arglist &rest args) "Define NAME as a transient suffix command.