From: tomo <tomo>
Date: Mon, 8 Apr 2002 17:29:01 +0000 (+0000)
Subject: (chinese-big5-eten): New coded-charset in UTF-2000.
X-Git-Tag: r21-2-44-0_18-m7~20
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b0b3c4d458aa4f88ef73192b05317e0a87cd6740;p=chise%2Fxemacs-chise.git-

(chinese-big5-eten): New coded-charset in UTF-2000.
(chinese-big5-cdp): Likewise.
---

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index ebe9435..fd2044c 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -2,7 +2,7 @@
 
 ;; Copyright (C) 1995,1999 Electrotechnical Laboratory, JAPAN.
 ;; Licensed to the Free Software Foundation.
-;; Copyright (C) 1997,1999,2000 MORIOKA Tomohiko
+;; Copyright (C) 1997,1999,2000,2002 MORIOKA Tomohiko
 
 ;; Keywords: mule, multilingual, character set, coding system
 
@@ -116,4 +116,31 @@
    final ?P
    graphic 0))
 
+(when (featurep 'utf-2000)
+  (make-charset
+   'chinese-big5-eten
+   "Big5-ETEN"
+   `(long-name "Big5 ETEN"
+	       chars 256
+	       dimension 2
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       mother chinese-big5
+	       registry "Big5\\.ETEN"))
+  (make-charset
+   'chinese-big5-cdp
+   "Big5-CDP"
+   `(long-name "Big5 with CDP extension"
+	       chars 256
+	       dimension 2
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       registry "big5\\.cdp-0"
+	       min-code ,(lsh #x6200 16)
+	       max-code ,(+ (lsh #x6200 16) #xFFFF)
+	       code-offset ,(lsh #x6200 16)))
+  )
+
 ;;; mule-conf.el ends here