Use describe-char-padded-string for composed character names in "C-u C-x ="

* lisp/descr-text.el (describe-char): Use describe-char-padded-string
for displaying Unicode names of composed characters on GUI frames.
(Bug#42256)

diff --git a/lisp/descr-text.el b/lisp/descr-text.el
index be5e01435a7be3031abaa949bb7e8f03d720aea2..55f0b7dcb406c4cc5291fd774c4c759e71663299 100644 (file)
--- a/lisp/descr-text.el
+++ b/lisp/descr-text.el
@@ -781,8 +781,8 @@ The character information includes:
                           (let ((chars (match-string 1 (car composition))))
                             (dotimes (i (length chars))
                               (let ((char (aref chars i)))
-                                (insert (format "  %c (#x%x) %s\n"
-                                                char char
+                                (insert (format "  %s (#x%x) %s\n"
+                                                (describe-char-padded-string char) char
                                                 (get-char-code-property
                                                  char 'name))))))))
                     ;; TTY frame: show composition in terms of characters.