From 0f0b12a2a6f75aa48ab02b54bc1ca9387b2ee8d6 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 7 Feb 2003 04:15:41 +0000
Subject: [PATCH] (=ucs-jis-1990): New coded-charset for UTF-2000.
 (=ucs-jis-2000): New coded-charset for UTF-2000.

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

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 99af0a7..a569714 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -125,6 +125,28 @@
 
 (when (featurep 'utf-2000)
   (make-charset
+   '=ucs-jis-1990
+   "UCS for JIS:1990"
+   `(long-name "ISO/IEC 10646 for JIS X 0208/0212:1990"
+	       chars 256
+	       dimension 3
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       mother ucs-jis))
+  (make-charset
+   '=ucs-jis-2000
+   "UCS for JIS:2000"
+   `(long-name "ISO/IEC 10646 for JIS X 0213:2000"
+	       chars 256
+	       dimension 3
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       mother ucs-jis))
+  (define-charset-alias 'ucs-jis-1990 '=ucs-jis-1990)
+  (define-charset-alias 'ucs-jis-2000 '=ucs-jis-2000)
+  (make-charset
    'chinese-big5-pua
    "Big5-PUA"
    `(long-name "Big5 with private used area"
-- 
1.7.10.4