Mercurial > emacs

comparison lisp/language/japanese.el @ 55472:6763036919ea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add cp932 as alias for japanese-shift-jis.
author Jason Rumney <jasonr@gnu.org>
date Sun, 09 May 2004 21:25:22 +0000
parents 695cf19ef79e
children 197607499a29 4c90ffeb71c5
comparison
equal deleted inserted replaced
55471:c2a09ac7b7b1 55472:6763036919ea
65 (charset-origin-alist (japanese-jisx0208 "SJIS" encode-sjis-char) 65 (charset-origin-alist (japanese-jisx0208 "SJIS" encode-sjis-char)
66 (katakana-jisx0201 "SJIS" encode-sjis-char)))) 66 (katakana-jisx0201 "SJIS" encode-sjis-char))))
67 67
68 (define-coding-system-alias 'shift_jis 'japanese-shift-jis) 68 (define-coding-system-alias 'shift_jis 'japanese-shift-jis)
69 (define-coding-system-alias 'sjis 'japanese-shift-jis) 69 (define-coding-system-alias 'sjis 'japanese-shift-jis)
70 (define-coding-system-alias 'cp932 'japanese-shift-jis)
70 71
71 (make-coding-system 72 (make-coding-system
72 'japanese-iso-7bit-1978-irv 2 ?j 73 'japanese-iso-7bit-1978-irv 2 ?j
73 "ISO 2022 based 7-bit encoding for Japanese JISX0208-1978 and JISX0201-Roman." 74 "ISO 2022 based 7-bit encoding for Japanese JISX0208-1978 and JISX0201-Roman."
74 '((ascii japanese-jisx0208-1978 japanese-jisx0208 75 '((ascii japanese-jisx0208-1978 japanese-jisx0208