(insert-char-data): If an element of `->decomposition' property is a

character, print it as same as an integer.

diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el
index 3b3a4ba..1e4604a 100644 (file)
--- a/lisp/utf-2000/char-db-util.el
+++ b/lisp/utf-2000/char-db-util.el
@@ -337,6 +337,8 @@
                          (mapconcat (lambda (code)
                                       (cond ((symbolp code)
                                              (symbol-name code))
+                                            ((characterp code)
+                                             (format "%S" code))
                                             ((integerp code)
                                              (format "#x%04X" code))
                                             (t