From: tomo <tomo>
Date: Wed, 23 Nov 2011 13:39:05 +0000 (+0000)
Subject: (=adobe-japan1): New alias for `=adobe-japan1-6'.
X-Git-Tag: r21-4-22-chise-0_25-11^20~182
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7947f1e1889b96db65113cc11f9b79f5c03209aa;p=chise%2Fxemacs-chise.git-

(=adobe-japan1): New alias for `=adobe-japan1-6'.
(=>>>adobe-japan1-0): New coded-charset for XEmacs CHISE.
(=>>>adobe-japan1-1): Ditto.
(=>>>adobe-japan1-2): Ditto.
(=>>>adobe-japan1-3): Ditto.
(=>>>adobe-japan1-4): Ditto.
(=>>>adobe-japan1-5): Ditto.
(=>>>adobe-japan1-6): Ditto.
(=>>>adobe-japan1): Changed to alias for `=>>>adobe-japan1-6'.
---

diff --git a/lisp/mule/mule-conf.el b/lisp/mule/mule-conf.el
index 522ced5..6be65b8 100644
--- a/lisp/mule/mule-conf.el
+++ b/lisp/mule/mule-conf.el
@@ -1894,17 +1894,87 @@
 	       min-code 0
 	       max-code 23057
 	       registry "AdobeJapan1-6$"))
+  (define-charset-alias '=adobe-japan1 '=adobe-japan1-6)
+
+  (make-charset
+   '=>>>adobe-japan1-0
+   "Adobe-Japan1-0 abstract glyph-forms"
+   '(long-name "Adobe-Japan1 abstract glyph-forms"
+	       chars 256
+	       dimension 2
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       mother =adobe-japan1-0
+	       registry "AdobeJapan1-0$"))
+  (make-charset
+   '=>>>adobe-japan1-1
+   "Adobe-Japan1-1 abstract glyph-forms"
+   '(long-name "Adobe-Japan1 abstract glyph-forms"
+	       chars 256
+	       dimension 2
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       mother =>>>adobe-japan1-0
+	       registry "AdobeJapan1-1$"))
+  (make-charset
+   '=>>>adobe-japan1-2
+   "Adobe-Japan1-2 abstract glyph-forms"
+   '(long-name "Adobe-Japan1 abstract glyph-forms"
+	       chars 256
+	       dimension 2
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       mother =>>>adobe-japan1-1
+	       registry "AdobeJapan1-2$"))
   (make-charset
-   '=>>>adobe-japan1
-   "Adobe-Japan1 abstract glyph-forms"
+   '=>>>adobe-japan1-3
+   "Adobe-Japan1-3 abstract glyph-forms"
    '(long-name "Adobe-Japan1 abstract glyph-forms"
 	       chars 256
 	       dimension 2
 	       columns 2
 	       graphic 2
 	       direction l2r
-	       mother =adobe-japan1-6
+	       mother =>>>adobe-japan1-2
+	       registry "AdobeJapan1-3$"))
+  (make-charset
+   '=>>>adobe-japan1-4
+   "Adobe-Japan1-4 abstract glyph-forms"
+   '(long-name "Adobe-Japan1 abstract glyph-forms"
+	       chars 256
+	       dimension 2
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       mother =>>>adobe-japan1-3
+	       registry "AdobeJapan1-4$"))
+  (make-charset
+   '=>>>adobe-japan1-5
+   "Adobe-Japan1-5 abstract glyph-forms"
+   '(long-name "Adobe-Japan1 abstract glyph-forms"
+	       chars 256
+	       dimension 2
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       mother =>>>adobe-japan1-4
+	       registry "AdobeJapan1-5$"))
+  (make-charset
+   '=>>>adobe-japan1-6
+   "Adobe-Japan1-6 abstract glyph-forms"
+   '(long-name "Adobe-Japan1 abstract glyph-forms"
+	       chars 256
+	       dimension 2
+	       columns 2
+	       graphic 2
+	       direction l2r
+	       mother =>>>adobe-japan1-5
 	       registry "AdobeJapan1-6$"))
+  (define-charset-alias '=>>>adobe-japan1 '=>>>adobe-japan1-6)
+
   (make-charset
    '=>>adobe-japan1
    "Adobe-Japan1 abstract glyphs"