update.

[chise/tomoyo-tools.git] / char-db-dump.el

diff --git a/char-db-dump.el b/char-db-dump.el
index 81b6413..2f717af 100644 (file)
--- a/char-db-dump.el
+++ b/char-db-dump.el
@@ -1,6 +1,6 @@
 ;;; char-db-dump.el --- Dump utility of char-spec files
 
-;; Copyright (C) 2002,2003,2004,2005,2010 MORIOKA Tomohiko
+;; Copyright (C) 2002,2003,2004,2005,2010,2018 MORIOKA Tomohiko
 
 ;; Author: MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
 ;; Keywords: Ideographs, Character Database, CHISE, UCS, Unicode
@@ -168,7 +168,7 @@
                      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)))))
@@ -214,6 +214,7 @@
   (char-db-dump-ideographs directory)
   (char-db-dump-non-ideographs directory)
   (char-db-dump-oracle-bones directory)
+  (char-db-dump-shuowen directory)
   (char-db-dump-ruimoku6 directory)
   (char-db-dump-additional-precomposed directory))