From 16e461935124780dfeb07fd29d1140bdd05eb43c Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Tue, 31 May 2005 16:49:33 +0000
Subject: [PATCH] (=zinbun-oracle): New coded-charset for XEmacs CHISE.
 (=ucs-bmp-cjk): Change `max-code' to #x9FA5 temporarily.

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

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 3848ec8..191064c 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -395,6 +395,19 @@
 		  direction	l2r))
   (define-charset-alias 'ideograph-cbeta '=cbeta)
 
+  (make-charset '=zinbun-oracle
+		"Oracle Bones Script"
+		`(long-name	"Oracle Bones Script in Zinbun, Kyoto Univ."
+		  chars		256
+		  dimension	2
+		  registry	"zob1968-0"
+		  graphic	2
+		  min-code	#xE70000
+		  max-code	,(+ #xE70000 8192)
+		  code-offset	#xE70000
+		  columns	2
+		  direction	l2r))
+
   (make-charset '=jef-china3
 		"JEF + CHINA3 private characters"
 		'(long-name	"JEF + CHINA3"
@@ -616,7 +629,10 @@
 	       direction l2r
 	       registry "-zh-.*-ucs-0"
 	       mother ucs-bmp
-	       min-code #x2E00 max-code #xA4CF))
+	       min-code #x2E00
+	       max-code #x9FA5
+	       ;; max-code #xA4CF
+	       ))
   (make-charset
    '=ucs-bmp-cjk@unicode
    "CJK Characters in BMP of Unicode"
-- 
1.7.10.4