From: tomo <tomo>
Date: Tue, 18 Oct 2011 10:37:47 +0000 (+0000)
Subject: (=+>ucs@iso): New coded-charset for XEmacs CHISE.
X-Git-Tag: r21-4-22-chise-0_25-11^20~507
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=a3711fed71ed60b8a462242b08b28d1a09afb0bb;p=chise%2Fxemacs-chise.git-

(=+>ucs@iso): New coded-charset for XEmacs CHISE.
(=>>ucs@iso): Use `=+>ucs@iso' instead of `=>ucs@iso' as the mother.
---

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 0591d03..5c74e49 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -1129,6 +1129,17 @@
 		  =>iso-ir	177
 		  mother	=>ucs@unicode))
 
+  (make-charset '=+>ucs@iso
+		"UCS based on ISO/IEC 10646 representative glyphs"
+		'(long-name	"Unified abstract glyphs of UCS"
+		  chars		256
+		  dimension	3
+		  columns	2
+		  graphic	2
+		  direction	l2r
+		  =>iso-ir	177
+		  mother	=>ucs@iso))
+
   (make-charset '=>>ucs@iso
 		"Representative abstract-glyphs of ISO/IEC 10646"
 		'(long-name	"UCS abstract glyphs for UCS"
@@ -1138,7 +1149,7 @@
 		  graphic	2
 		  direction	l2r
 		  =>iso-ir	177
-		  mother	=>ucs@iso))
+		  mother	=+>ucs@iso))
   (make-charset '=>>ucs@unicode
 		"Representative abstract-glyphs of Unicode"
 		'(long-name	"Unicode abstract glyphs"