[elpa] externals/transient 769fa4380a 169/366: transient-set-level: Fix edge-case

[Jonas Bernoulli]

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

    transient-set-level: Fix edge-case
---
 lisp/transient.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index 0bfa4364ab..7d80fb8599 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2045,7 +2045,7 @@ transient is active."
                   (and (lookup-key transient--transient-map keys)
                        (string-to-number
                         (let ((transient--active-infix
-                               (transient-suffix-object)))
+                               (transient-suffix-object command)))
                           (transient--show)
                           (transient--read-number-N
                            (format "Set level for `%s': "