Mercurial > emacs
changeset 24327:6f70c8b3ea9a
(japanese-shift-jis): Add charset-origin-alist property.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 16 Feb 1999 07:32:43 +0000 |
| parents | 0c8191e60c80 |
| children | d968067e4580 |
| files | lisp/language/japanese.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/language/japanese.el Tue Feb 16 03:36:28 1999 +0000 +++ b/lisp/language/japanese.el Tue Feb 16 07:32:43 1999 +0000 @@ -47,7 +47,9 @@ nil '((safe-charsets ascii japanese-jisx0208 japanese-jisx0208-1978 latin-jisx0201 katakana-jisx0201) - (mime-charset . shift_jis))) + (mime-charset . shift_jis) + (charset-origin-alist (japanese-jisx0208 "SJIS" encode-sjis-char) + (katakana-jisx0201 "SJIS" encode-sjis-char)))) (define-coding-system-alias 'shift_jis 'japanese-shift-jis) (define-coding-system-alias 'sjis 'japanese-shift-jis)