[elpa] externals/transient e91ad31f8a 234/366: transient--debug: Show this-command-keys

[Jonas Bernoulli]

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

    transient--debug: Show this-command-keys
---
 lisp/transient.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/transient.el b/lisp/transient.el
index 6e770500da..93c736837e 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2027,9 +2027,10 @@ value.  Otherwise return CHILDREN as is."
 (defun transient--debug (arg &rest args)
   (when transient--debug
     (if (symbolp arg)
-        (message "-- %-16s (cmd: %s, exit: %s)"
+        (message "-- %-16s (cmd: %s, event: %S, exit: %s)"
                  arg
                  (transient--suffix-symbol this-command)
+                 (key-description (this-command-keys-vector))
                  transient--exitp)
       (apply #'message arg args))))