Add some Adobe-Japan1-2 code points.

[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 4ad78f3..9c0afeb 100644 (file)
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -181,6 +181,11 @@
    ))
 
 (when (featurep 'utf-2000)
+  (setq decomposition-feature-list
+       '(=decomposition
+         =decomposition@cid
+         =decomposition@hanyo-denshi))
+
   (setq coded-charset-entity-reference-alist
        '(((=adobe-japan1-base  . isolated)    "I-AJ1-" 5 d)
          ((=adobe-japan1-6     . isolated)    "I-AJ1-" 5 d)
@@ -248,6 +253,11 @@
          ((=hanyo-denshi/ft    . isolated)  "I-HD-FT-" 4 X)
          ((=hanyo-denshi/ia    . isolated)  "I-HD-IA-" 4 X)
          ((=hanyo-denshi/ib    . isolated)  "I-HD-IB-" 4 X)
+         ((=hanyo-denshi/hg    . isolated)  "I-HD-HG-" 4 X)
+         ((=hanyo-denshi/ip    . isolated)  "I-HD-IP-" 4 X)
+         ((=hanyo-denshi/jt    . isolated)  "I-HD-JT-" 4 X)
+         ((=hanyo-denshi/ks    . isolated)  "I-HD-KS-" 6 d)
+         ((=hanyo-denshi/ks/mf . isolated)   "I-KSMF-" 5 d)
          ( =adobe-japan1-6                      "AJ1-" 5 d)
          ( =adobe-japan1-base                 "I-AJ1-" 5 d)
          ( =gt                                   "GT-" 5 d)
@@ -286,6 +296,11 @@
          ( =hanyo-denshi/ft                   "HD-FT-" 4 X)
          ( =hanyo-denshi/ia                   "HD-IA-" 4 X)
          ( =hanyo-denshi/ib                   "HD-IB-" 4 X)
+         ( =hanyo-denshi/hg                   "HD-HG-" 4 X)
+         ( =hanyo-denshi/ip                   "HD-IP-" 4 X)
+         ( =hanyo-denshi/jt                   "HD-JT-" 4 X)
+         ( =hanyo-denshi/ks                   "HD-KS-" 6 d)
+         ( =hanyo-denshi/ks/mf                 "KSMF-" 5 d)
          ( =jis-x0208@1983                      "J83-" 4 X)
          ( =jis-x0208@1978                      "J78-" 4 X)
          ( chinese-cns11643-1                    "C1-" 4 X)
@@ -333,6 +348,7 @@
          (=>>gt-k                             "G-GT-K" 5 d)
          (=>>ruimoku-v6                      "G-RUI6-" 4 X)
          (=>>hanyo-denshi/ft                "G-HD-FT-" 4 X)
+         (=>>hanyo-denshi/ks                "G-HD-KS-" 4 X)
          ( =>jis-x0208@usual                   "o-J0-" 4 X)
          ( =>jis-x0208@1997                     "J97-" 4 X)
          ( =>jis-x0208@1997                    "A-J0-" 4 X)