[elpa] externals/embark fe21ffc5be 1/2: Show keyboard macro definitions in embark-bindings*

[ELPA Syncer]

branch: externals/embark
commit fe21ffc5bef6da98438bfd5dd68c79b994fb292e
Author: Omar Antolín <omar.antolin@gmail.com>
Commit: Omar Antolín <omar.antolin@gmail.com>

    Show keyboard macro definitions in embark-bindings*
---
 embark.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/embark.el b/embark.el
index 0969d34e84..b950b02ddd 100644
--- a/embark.el
+++ b/embark.el
@@ -1283,10 +1283,11 @@ UPDATE is the indicator update function."
 (defun embark--command-name (cmd)
   "Return an appropriate name for CMD.
 If CMD is a symbol, use its symbol name; for lambdas, use the
-first line of the documentation string; otherwise use the word
-\"unnamed\"."
+first line of the documentation string; for keyboard macros use
+`key-description'; otherwise use the word \"unnamed\"."
   (concat ; fresh copy, so we can freely add text properties
    (cond
+    ((or (stringp cmd) (vectorp cmd)) (key-description cmd))
     ((stringp (car-safe cmd)) (car cmd))
     ((eq (car-safe cmd) 'menu-item) (eval (cadr cmd)))
     ((keymapp cmd)