branch: externals/transient commit d2c88d2562e42b42fbe4b50b035fef98f826c984 Author: Jonas Bernoulli <jo...@bernoul.li> Commit: Jonas Bernoulli <jo...@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