(insert-char-attributes): Regard `simplified-ideograph-of' property.

diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el
index 3a29c5f..e7393e5 100644 (file)
--- a/lisp/utf-2000/char-db-util.el
+++ b/lisp/utf-2000/char-db-util.el
@@ -529,7 +529,8 @@
                ((memq name '(ideograph=
                              original-ideograph-of
                              ancient-ideograph-of
-                             vulgar-ideograph-of))
+                             vulgar-ideograph-of
+                             simplified-ideograph-of))
                 (insert (format "(%-18s%s " name line-breaking))
                 (setq lbs (concat "\n" (make-string (current-column) ?\ ))
                       separator nil)