Mercurial > emacs

comparison lisp/language/japanese.el @ 24332:29c0557957ba

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(iso-2022-jp-2): New coding system. ("Japanese"): Put iso-2022-jp-2 in coding-priority property.
author Kenichi Handa <handa@m17n.org>
date Wed, 17 Feb 1999 00:15:34 +0000
parents 6f70c8b3ea9a
children 16b7fc8a65d2
comparison
equal deleted inserted replaced
24331:84dcf9017a67 24332:29c0557957ba
38 '((safe-charsets ascii japanese-jisx0208-1978 japanese-jisx0208 38 '((safe-charsets ascii japanese-jisx0208-1978 japanese-jisx0208
39 latin-jisx0201 japanese-jisx0212 katakana-jisx0201) 39 latin-jisx0201 japanese-jisx0212 katakana-jisx0201)
40 (mime-charset . iso-2022-jp))) 40 (mime-charset . iso-2022-jp)))
41 41
42 (define-coding-system-alias 'junet 'iso-2022-jp) 42 (define-coding-system-alias 'junet 'iso-2022-jp)
43
44 (make-coding-system
45 'iso-2022-jp-2 2 ?J
46 "ISO 2022 based 7bit encoding for CJK, Latin-1, and Greek (MIME:ISO-2022-JP-2)"
47 '((ascii japanese-jisx0208-1978 japanese-jisx0208
48 latin-jisx0201 japanese-jisx0212 katakana-jisx0201
49 chinese-gb2312 korean-ksc5601) nil
50 (nil latin-iso8859-1 greek-iso8859-7) nil
51 short ascii-eol ascii-cntl seven nil single-shift)
52 '((safe-charsets ascii japanese-jisx0208-1978 japanese-jisx0208
53 latin-jisx0201 japanese-jisx0212 katakana-jisx0201
54 chinese-gb2312 korean-ksc5601
55 latin-iso8859-1 greek-iso8859-7)
56 (mime-charset . iso-2022-jp-2)))
43 57
44 (make-coding-system 58 (make-coding-system
45 'japanese-shift-jis 1 ?S 59 'japanese-shift-jis 1 ?S
46 "Shift-JIS 8-bit encoding for Japanese (MIME:SHIFT_JIS)" 60 "Shift-JIS 8-bit encoding for Japanese (MIME:SHIFT_JIS)"
47 nil 61 nil
85 (charset japanese-jisx0208 japanese-jisx0208-1978 99 (charset japanese-jisx0208 japanese-jisx0208-1978
86 japanese-jisx0212 latin-jisx0201 katakana-jisx0201) 100 japanese-jisx0212 latin-jisx0201 katakana-jisx0201)
87 (coding-system iso-2022-jp japanese-iso-8bit 101 (coding-system iso-2022-jp japanese-iso-8bit
88 japanese-shift-jis japanese-iso-7bit-1978-irv) 102 japanese-shift-jis japanese-iso-7bit-1978-irv)
89 (coding-priority iso-2022-jp japanese-iso-8bit 103 (coding-priority iso-2022-jp japanese-iso-8bit
90 japanese-shift-jis) 104 japanese-shift-jis iso-2022-jp-2)
91 (input-method . "japanese") 105 (input-method . "japanese")
92 (features japan-util) 106 (features japan-util)
93 (sample-text . "Japanese ($BF|K\8l(B) $B$3$s$K$A$O(B, (I:]FAJ(B") 107 (sample-text . "Japanese ($BF|K\8l(B) $B$3$s$K$A$O(B, (I:]FAJ(B")
94 (documentation . t))) 108 (documentation . t)))
95 109