diff options
| author | Kenichi Handa | 1999-02-16 07:32:43 +0000 |
|---|---|---|
| committer | Kenichi Handa | 1999-02-16 07:32:43 +0000 |
| commit | ffd809f2f23746caba888c2ec8a833830631e9e7 (patch) | |
| tree | b453c5afad328fe2c04c3bbbcd4716cd153eb751 | |
| parent | bccc6e3d9f4afdcf01eee130d6f42d096c270dad (diff) | |
| download | emacs-ffd809f2f23746caba888c2ec8a833830631e9e7.tar.gz emacs-ffd809f2f23746caba888c2ec8a833830631e9e7.zip | |
(japanese-shift-jis): Add charset-origin-alist property.
| -rw-r--r-- | lisp/language/japanese.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/language/japanese.el b/lisp/language/japanese.el index 1b023e6f75e..220f429ad0a 100644 --- a/lisp/language/japanese.el +++ b/lisp/language/japanese.el | |||
| @@ -47,7 +47,9 @@ | |||
| 47 | nil | 47 | nil |
| 48 | '((safe-charsets ascii japanese-jisx0208 japanese-jisx0208-1978 | 48 | '((safe-charsets ascii japanese-jisx0208 japanese-jisx0208-1978 |
| 49 | latin-jisx0201 katakana-jisx0201) | 49 | latin-jisx0201 katakana-jisx0201) |
| 50 | (mime-charset . shift_jis))) | 50 | (mime-charset . shift_jis) |
| 51 | (charset-origin-alist (japanese-jisx0208 "SJIS" encode-sjis-char) | ||
| 52 | (katakana-jisx0201 "SJIS" encode-sjis-char)))) | ||
| 51 | 53 | ||
| 52 | (define-coding-system-alias 'shift_jis 'japanese-shift-jis) | 54 | (define-coding-system-alias 'shift_jis 'japanese-shift-jis) |
| 53 | (define-coding-system-alias 'sjis 'japanese-shift-jis) | 55 | (define-coding-system-alias 'sjis 'japanese-shift-jis) |