From: tomo <tomo>
Date: Tue, 31 May 2005 16:49:33 +0000 (+0000)
Subject: (=zinbun-oracle): New coded-charset for XEmacs CHISE.
X-Git-Tag: r21-4-15-chise-0_22-1^2~121
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=16e461935124780dfeb07fd29d1140bdd05eb43c;p=chise%2Fxemacs-chise.git-

(=zinbun-oracle): New coded-charset for XEmacs CHISE.
(=ucs-bmp-cjk): Change `max-code' to #x9FA5 temporarily.
---

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"