(char-db-dump-shuowen): Use `insert-char-data-with-variant' instead of

`insert-char-data'.

diff --git a/char-db-dump.el b/char-db-dump.el
index a314fe4..2f717af 100644 (file)
--- a/char-db-dump.el
+++ b/char-db-dump.el
@@ -168,7 +168,7 @@
                      char-db-file-coding-system))
       (while (<= code 52101)
        (when (setq chr (decode-char '=shuowen-jiguge code 'defined-only))
                      char-db-file-coding-system))
       (while (<= code 52101)
        (when (setq chr (decode-char '=shuowen-jiguge code 'defined-only))

-         (insert-char-data chr))
+         (insert-char-data-with-variant chr))

        (setq code (1+ code)))
       (write-region (point-min)(point-max)
                    (expand-file-name "ShuoWen.el" directory)))))
        (setq code (1+ code)))
       (write-region (point-min)(point-max)
                    (expand-file-name "ShuoWen.el" directory)))))