From 6d225f0f18753ba1be0f35ddd3902837a2d638c5 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Mon, 17 Feb 2003 12:34:50 +0000
Subject: [PATCH] (ucs-big5): New coded-charset when `utf-2000' is provided;
 it was defined as a builtin coded-charset. (ideograph-gt):
 Likewise.

---
 lisp/mule/mule-conf.el |   23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 7fe82a0..62a3aa6 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -157,6 +157,16 @@
 		  graphic	2
 		  direction	l2r
 		  mother	ucs-jis))
+  (make-charset 'ucs-big5
+		"UCS for Big5"
+		`(long-name	"ISO/IEC 10646 for Big5"
+		  chars		256
+		  dimension	3
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  mother	ucs))
+
   (make-charset '=big5-pua
 		"Big5-PUA"
 		`(long-name	"Big5 with private used area"
@@ -218,6 +228,19 @@
 		  min-code	#x8140
 		  max-code	#x8DFE))
   (define-charset-alias 'chinese-big5-cdp '=big5-cdp)
+
+  (make-charset 'ideograph-gt
+		"GT"
+		`(long-name	"GT 2000"
+		  chars		256
+		  dimension	3
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  registry	""
+		  min-code	,(lsh #x6100 16)
+		  max-code	,(+ (lsh #x6100 16) 67547)
+		  code-offset	,(lsh #x6100 16)))
   (make-charset '=gt-k
 		"GT parts"
 		`(long-name	"Ideographic parts of GT"
-- 
1.7.10.4