counsel.el (counsel-unicode-char): Display hex codes in left column

diff --git a/counsel.el b/counsel.el
index ddf3d4fac6e6fc69865a6c5ef1fbc8b602214126..9a3adcca9581547c078d36152b5943d513073438 100644 (file)
--- a/counsel.el
+++ b/counsel.el
@@ -290,7 +290,7 @@
     (ivy-read "Unicode name: "
               (mapcar (lambda (x)
                         (propertize
-                         (format "% -60s%c" (car x) (cdr x))
+                         (format "% -6X% -60s%c" (cdr x) (car x) (cdr x))
                          'result (cdr x)))
                       (ucs-names))
               :action (lambda (char)