[elpa] externals/transient d2c88d2562 3/9: transient--init-group: Cosmetics

[Jonas Bernoulli]

branch: externals/transient
commit d2c88d2562e42b42fbe4b50b035fef98f826c984
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    transient--init-group: Cosmetics
---
 lisp/transient.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index 4463a5f917..14f3160de8 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2067,9 +2067,9 @@ value.  Otherwise return CHILDREN as is."
 
 (defun transient--init-group (levels spec)
   (pcase-let ((`(,level ,class ,args ,children) (append spec nil)))
-    (and-let* ((- (transient--use-level-p level))
+    (and-let* (((transient--use-level-p level))
                (obj (apply class :level level args))
-               (- (transient--use-suffix-p obj))
+               ((transient--use-suffix-p obj))
                (suffixes (cl-mapcan (lambda (c) (transient--init-child levels 
c))
                                     (transient-setup-children obj children))))
       (progn ; work around debbugs#31840