From: Kenichi Handa <handa@m17n.org>
Date: Sun, 25 Jan 2004 07:32:30 +0000 (+0000)
Subject: (katakana-sjis, cp932-2-byte, cp932): New charsets.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1614
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ceacd8032360fa13e262872ebf8b5cc5352f0ca7;p=emacs.git

(katakana-sjis, cp932-2-byte, cp932): New charsets.
---

diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el
index e397edb6490..d6de9dfbe21 100644
--- a/lisp/international/mule-conf.el
+++ b/lisp/international/mule-conf.el
@@ -419,6 +419,24 @@
   :code-space [33 126 33 126]
   :code-offset #x150000)
 
+(define-charset 'katakana-sjis
+  "Katakana part of Shift-JIS"
+  :dimension 1
+  :superset '((katakana-jisx0201 . 128))
+  :supplementary-p t)
+
+(define-charset 'cp932-2-byte
+  "2-byte part of CP932"
+  :map "CP932-2BYTE"
+  :code-space [#x00 #xFF #x00 #xFE]
+  :supplementary-p t)
+
+(define-charset 'cp932
+  "CP932 (Microsoft shift-jis)"
+  :code-space [#x00 #xFF #x00 #xFE]
+  :short-name "CP932"
+  :superset '(ascii katakana-sjis cp932-2-byte))
+
 (define-charset 'korean-ksc5601
   "KSC5601 Korean Hangul and Hanja: ISO-IR-149"
   :short-name "KSC5601"