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.

Reply via email to