(char-db-dump-additional-idc): Check `=ucs-itaiji-002'.

diff --git a/char-db-dump.el b/char-db-dump.el
index f0ff61f..7967af2 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,2018,2019,2020 MORIOKA Tomohiko
+;; Copyright (C) 2002,2003,2004,2005,2010,2018,2019,2020,2021 MORIOKA Tomohiko
 
 ;; Author: MORIOKA Tomohiko <tomo@kanji.zinbun.kyoto-u.ac.jp>
 ;; Keywords: Ideographs, Character Database, CHISE, UCS, Unicode
@@ -241,7 +241,8 @@
              (unless (memq c chars)
                (insert-char-data c)
                (setq chars (cons c chars))))))
-       (dolist (ccs '(=ucs-var-001 =ucs-var-002 =ucs-var-003 =ucs-itaiji-001))
+       (dolist (ccs '(=ucs-var-001 =ucs-var-002 =ucs-var-003
+                                   =ucs-itaiji-001 =ucs-itaiji-002))
          (when (setq chr (decode-char ccs i 'defined-only 'without-inheritance))
            (unless (memq chr chars)
              (insert-char-data chr)