diff options
| -rw-r--r-- | lisp/language/japanese.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/language/japanese.el b/lisp/language/japanese.el index 592b9d151c4..29001650948 100644 --- a/lisp/language/japanese.el +++ b/lisp/language/japanese.el | |||
| @@ -68,13 +68,14 @@ | |||
| 68 | latin-iso8859-1 greek-iso8859-7) | 68 | latin-iso8859-1 greek-iso8859-7) |
| 69 | :mime-charset 'iso-2022-jp-2) | 69 | :mime-charset 'iso-2022-jp-2) |
| 70 | 70 | ||
| 71 | (let ((map ; SJIS vs CP932 | 71 | (let ((map ; JIS vs CP932 |
| 72 | '((#x301C . #xFF5E) ; WAVE DASH FULLWIDTH TILDE | 72 | '((#x301C . #xFF5E) ; WAVE DASH FULLWIDTH TILDE |
| 73 | (#x2016 . #x2225) ; DOUBLE VERTICAL LINE PARALLEL TO | 73 | (#x2016 . #x2225) ; DOUBLE VERTICAL LINE PARALLEL TO |
| 74 | (#x2212 . #xFF0D) ; MINUS SIGN FULLWIDTH HYPHEN-MINUS | 74 | (#x2212 . #xFF0D) ; MINUS SIGN FULLWIDTH HYPHEN-MINUS |
| 75 | (#x00A2 . #xFFE0) ; CENT SIGN FULLWIDTH CENT SIGN | 75 | (#x00A2 . #xFFE0) ; CENT SIGN FULLWIDTH CENT SIGN |
| 76 | (#x00A3 . #xFFE1) ; POUND SIGN FULLWIDTH POUND SIGN | 76 | (#x00A3 . #xFFE1) ; POUND SIGN FULLWIDTH POUND SIGN |
| 77 | (#x00AC . #xFFE2) ; NOT SIGN FULLWIDTH NOT SIGN | 77 | (#x00AC . #xFFE2) ; NOT SIGN FULLWIDTH NOT SIGN |
| 78 | (#x00A6 . #xFFE4) ; BROKEN LINE FULLWIDTH BROKEN LINE | ||
| 78 | ))) | 79 | ))) |
| 79 | (define-translation-table 'japanese-ucs-cp932-map map) | 80 | (define-translation-table 'japanese-ucs-cp932-map map) |
| 80 | (mapc #'(lambda (x) (let ((tmp (car x))) | 81 | (mapc #'(lambda (x) (let ((tmp (car x))) |