From: Kenichi Handa <handa@m17n.org>
Date: Sun, 25 Jan 2004 07:34:49 +0000 (+0000)
Subject: (japanese-cp932): New coding system.
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1612
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1cd8a17573a6368252eee6f67a3651db48f291dd;p=emacs.git

(japanese-cp932): New coding system.
(cp932): New alias of it.
---

diff --git a/lisp/language/japanese.el b/lisp/language/japanese.el
index fa350c562ae..a860450065b 100644
--- a/lisp/language/japanese.el
+++ b/lisp/language/japanese.el
@@ -74,6 +74,14 @@
 (define-coding-system-alias 'shift_jis 'japanese-shift-jis)
 (define-coding-system-alias 'sjis 'japanese-shift-jis)
 
+(define-coding-system 'japanese-cp932
+  "CP932 (Microsoft shift-jis)"
+  :coding-type 'charset
+  :mnemonic ?S
+  :charset-list '(ascii katakana-sjis cp932-2-byte))
+
+(define-coding-system-alias 'cp932 'japanese-cp932)
+
 ;; Fixme: AKA Shift-JIS according to
 ;; <URL:http://www.microsoft.com/globaldev/reference/WinCP.asp>.  Is
 ;; that correct?