(insert-char-attributes): Regard `->ideographic-variants', `->radical'

and `<-radical' as character-references.

diff --git a/lisp/utf-2000/char-db-util.el b/lisp/utf-2000/char-db-util.el
index 1027c20..5e5c638 100644 (file)
--- a/lisp/utf-2000/char-db-util.el
+++ b/lisp/utf-2000/char-db-util.el
@@ -587,8 +587,10 @@
                              ->original-ideograph <-original-ideograph
                              ->simplified-ideograph <-simplified-ideograph
                              ->same-ideograph
-                             ->ideographic <-ideographic
-                             ->bopomofo ->ideograph))
+                             ->ideographic-variants
+                             ->radical <-radical
+                             ->bopomofo ->ideograph
+                             ->ideographic <-ideographic))
                 (insert (format "(%-18s%s " name line-breaking))
                 (setq lbs (concat "\n" (make-string (current-column) ?\ ))
                       separator nil)