Mercurial > emacs
comparison lisp/language/japanese.el @ 22983:7a010b8c0d99
("LANUGAGE-ENVIRONMENT"): Delete property setup-function or change
the value to setup-XXX-environment-internal. Add properties
nonascii-translation, input-method, features, unibyte-syntax, and
unibyte-display.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Mon, 10 Aug 1998 06:29:02 +0000 |
parents | 4836a83d3578 |
children | 5c0a4ed13900 |
comparison
equal
deleted
inserted
replaced
22982:5fef9d1a7fc2 | 22983:7a010b8c0d99 |
---|---|
75 (define-coding-system-alias 'euc-japan-1990 'japanese-iso-8bit) | 75 (define-coding-system-alias 'euc-japan-1990 'japanese-iso-8bit) |
76 (define-coding-system-alias 'euc-japan 'japanese-iso-8bit) | 76 (define-coding-system-alias 'euc-japan 'japanese-iso-8bit) |
77 (define-coding-system-alias 'euc-jp 'japanese-iso-8bit) | 77 (define-coding-system-alias 'euc-jp 'japanese-iso-8bit) |
78 | 78 |
79 (set-language-info-alist | 79 (set-language-info-alist |
80 "Japanese" '((setup-function . setup-japanese-environment) | 80 "Japanese" '((setup-function . setup-japanese-environment-internal) |
81 (exit-function . exit-japanese-environment) | 81 (exit-function . exit-japanese-environment) |
82 (tutorial . "TUTORIAL.ja") | 82 (tutorial . "TUTORIAL.ja") |
83 (charset japanese-jisx0208 japanese-jisx0208-1978 | 83 (charset japanese-jisx0208 japanese-jisx0208-1978 |
84 japanese-jisx0212 latin-jisx0201 katakana-jisx0201) | 84 japanese-jisx0212 latin-jisx0201 katakana-jisx0201) |
85 (coding-system iso-2022-jp japanese-iso-8bit | 85 (coding-system iso-2022-jp japanese-iso-8bit |
86 japanese-shift-jis japanese-iso-7bit-1978-irv) | 86 japanese-shift-jis japanese-iso-7bit-1978-irv) |
87 (coding-priority iso-2022-jp japanese-iso-8bit | 87 (coding-priority iso-2022-jp japanese-iso-8bit |
88 japanese-shift-jis) | 88 japanese-shift-jis) |
89 (input-method . "japanese") | |
90 (features japan-util) | |
89 (sample-text . "Japanese ($BF|K\8l(B) $B$3$s$K$A$O(B, (I:]FAJ(B") | 91 (sample-text . "Japanese ($BF|K\8l(B) $B$3$s$K$A$O(B, (I:]FAJ(B") |
90 (documentation . t))) | 92 (documentation . t))) |
91 | 93 |
92 ;;; japanese.el ends here | 94 ;;; japanese.el ends here |