transient--debug: Cosmetics

magit · May 9, 2024 · dc967e0 · dc967e0
1 parent e2bfe89
commit dc967e0
Showing 1 changed file with 6 additions and 6 deletions.
diff --git 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))