branch: externals/transient
commit dc967e07fea2663845187dc1399bc8504da855e1
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>
transient--debug: Cosmetics
---
lisp/transient.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/lisp/transient.el b/lisp/transient.el
index 55a5e951fd..993ba13625 100644
--- a/lisp/transient.el
+++ b/lisp/transient.el
@@ -2607,12 +2607,12 @@ value. Otherwise return CHILDREN as is."
(if (symbolp arg)
(message "-- %-22s (cmd: %s, event: %S, exit: %s%s)"
arg
- (or (and (symbolp this-command) this-command)
- (if (fboundp 'help-fns-function-name)
- (help-fns-function-name this-command)
- (if (byte-code-function-p this-command)
- "#[...]"
- this-command)))
+ (cond ((and (symbolp this-command) this-command))
+ ((fboundp 'help-fns-function-name)
+ (help-fns-function-name this-command))
+ ((byte-code-function-p this-command)
+ "#[...]")
+ (this-command))
(key-description (this-command-keys-vector))
transient--exitp
(cond ((keywordp (car args))
