martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

(japanese-shift-jis): Add charset-origin-alist property.

Browse Source
This commit is contained in:
Kenichi Handa
1999-02-16 07:32:43 +00:00
parent bccc6e3d9f
commit ffd809f2f2
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/language/japanese.el
View File

@@ -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)