Reformatted.

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

diff --git a/lisp/mule/mule-coding.el b/lisp/mule/mule-coding.el
index 8db04c9..481e116 100644 (file)
--- a/lisp/mule/mule-coding.el
+++ b/lisp/mule/mule-coding.el
@@ -4,7 +4,7 @@
 ;; Licensed to the Free Software Foundation.
 ;; Copyright (C) 1995 Amdahl Corporation.
 ;; Copyright (C) 1995 Sun Microsystems.
-;; Copyright (C) 1997,1999,2002 MORIOKA Tomohiko
+;; Copyright (C) 1997,1999,2002,2003 MORIOKA Tomohiko
 
 ;; This file is part of XEmacs.
 
@@ -173,16 +173,20 @@
 
 (when (featurep 'utf-2000)
   (setq coded-charset-entity-reference-alist
-       '(((chinese-big5-cdp . isolated)       "I-CDP-" 4 X)
-         ( chinese-big5-cdp                     "CDP-" 4 X)
+       '(((ideograph-gt . isolated)            "I-GT-" 5 d)
+         ( ideograph-gt                          "GT-" 5 d)
+         ((ideograph-gt-k . isolated)         "I-GT-K" 5 d)
+         ( ideograph-gt-k                       "GT-K" 5 d)
          ((ideograph-daikanwa . isolated)       "I-M-" 5 d)
          ( ideograph-daikanwa                     "M-" 5 d)
          ((ideograph-cbeta . isolated)          "I-CB" 5 d)
          ( ideograph-cbeta                        "CB" 5 d)
-         ((ideograph-gt . isolated)            "I-GT-" 5 d)
-         ( ideograph-gt                          "GT-" 5 d)
-         ((ideograph-gt-k . isolated)         "I-GT-K" 5 d)
-         ( ideograph-gt-k                       "GT-K" 5 d)
+         ((chinese-big5-cdp . isolated)       "I-CDP-" 4 X)
+         ( chinese-big5-cdp                     "CDP-" 4 X)
+         ((ideograph-hanziku-1 . isolated)   "I-HZK1-" 4 X)
+         ( ideograph-hanziku-1                 "HZK1-" 4 X)
+         ((ideograph-hanziku-2 . isolated)   "I-HZK2-" 4 X)
+         ( ideograph-hanziku-2                 "HZK2-" 4 X)
          ((japanese-jisx0208-1990 . isolated) "I-J90-" 4 X)
          ( japanese-jisx0208-1990               "J90-" 4 X)
          ((japanese-jisx0208 . isolated)      "I-J83-" 4 X)
@@ -211,6 +215,7 @@
          ( chinese-cns11643-7                    "C7-" 4 X)
          ((korean-ksc5601 . isolated)          "I-K0-" 4 X)
          ( korean-ksc5601                        "K0-" 4 X)
+         ( china3-jef                           "JC3-" 4 X)
          ))
 
   (make-coding-system