(=>ucs-itaiji-001@iwds-1): New coded-charset for XEmacs CHISE.

[chise/xemacs-chise.git.1] / lisp / mule / mule-coding.el

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index 7037dda..d5ce1cb 100644 (file)
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -5,7 +5,7 @@
 ;; Copyright (C) 1995 Amdahl Corporation.
 ;; Copyright (C) 1995 Sun Microsystems.
 ;; Copyright (C) 1997, 1999, 2002, 2003, 2004, 2005, 2006, 2008, 2009,
-;;   2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017 MORIOKA Tomohiko
+;;   2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017, 2018 MORIOKA Tomohiko
 
 ;; This file is part of XEmacs.
 
@@ -370,6 +370,7 @@
          ( =ucs-itaiji-009                   "U-i009+" 4 X)
          ( =ucs-itaiji-010                   "U-i010+" 4 X)
          ( =ucs-itaiji-011                   "U-i011+" 4 X)
+         ( =ucs-itaiji-012                   "U-i012+" 4 X)
          ( =ucs-itaiji-084                   "U-i084+" 4 X)
          ( =big5-cdp-var-001               "CDP-v001-" 4 X)
          ( =big5-cdp-var-002               "CDP-v002-" 4 X)
@@ -388,6 +389,7 @@
          (==ucs-itaiji-002                "g2-U-i002+" 4 X)
          (==ucs-itaiji-003                "g2-U-i003+" 4 X)
          (==ucs-itaiji-005                "g2-U-i005+" 4 X)
+         (==ucs-itaiji-006                "g2-U-i006+" 4 X)
          (==big5-cdp-itaiji-001         "g2-CDP-i001-" 4 X)
          (==jis-x0208@1978/1pr               "g2-J78-" 4 X)
          (==gt-k                             "g2-GT-K" 5 d)
@@ -614,6 +616,7 @@
          (=>ucs-itaiji-005                 "A-U-i005+" 4 X)
          (=>ucs-itaiji-006                 "A-U-i006+" 4 X)
          (=>ucs-itaiji-007                 "A-U-i007+" 4 X)
+         (=>ucs-itaiji-009                 "A-U-i009+" 4 X)
          (=>big5-cdp-itaiji-001          "A-CDP-i001-" 4 X)
          ( =jis-x0208@1978/i1                 "J78i1-" 4 X)
          ( =shinjigen@rev                      "SJG2-" 4 d)