diff options
| author | Kazuhiro Ito | 2021-05-05 17:09:07 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-05-05 17:09:07 +0200 |
| commit | f1c6a4c41e801b722cbde22d6c8c653dccb2fe85 (patch) | |
| tree | 9f3669924031c905c7c1843cf143645efcce551b | |
| parent | 3481903d136af4380b5ee22879500e0295da8eba (diff) | |
| download | emacs-f1c6a4c41e801b722cbde22d6c8c653dccb2fe85.tar.gz emacs-f1c6a4c41e801b722cbde22d6c8c653dccb2fe85.zip | |
Tweak how some Japanese punctuation chars are translated to ASCII
* lisp/language/japan-util.el (japanese-symbol-table): Tweak
Japanese punctuation character translation (bug#47767).
| -rw-r--r-- | lisp/language/japan-util.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el index 948bfef9f22..f3e3590645b 100644 --- a/lisp/language/japan-util.el +++ b/lisp/language/japan-util.el | |||
| @@ -96,9 +96,9 @@ HANKAKU-KATAKANA belongs to `japanese-jisx0201-kana'.") | |||
| 96 | (put-char-code-property jisx0201 'jisx0208 katakana))))) | 96 | (put-char-code-property jisx0201 'jisx0208 katakana))))) |
| 97 | 97 | ||
| 98 | (defconst japanese-symbol-table | 98 | (defconst japanese-symbol-table |
| 99 | '((?\ ?\ ) (?， ?, ?､) (?． ?. ?｡) (?、 ?, ?､) (?。 ?. ?｡) (?・ nil ?･) | 99 | '((?\ ?\ ) (?， ?,) (?． ?.) (?、 nil ?､) (?。 nil ?｡) (?・ nil ?･) |
| 100 | (?： ?:) (?； ?\;) (?？ ??) (?！ ?!) (?゛ nil ?ﾞ) (?゜ nil ?ﾟ) | 100 | (?： ?:) (?； ?\;) (?？ ??) (?！ ?!) (?゛ nil ?ﾞ) (?゜ nil ?ﾟ) |
| 101 | (?´ ?') (?｀ ?`) (?＾ ?^) (?＿ ?_) (?ー ?- ?ｰ) (?— ?-) (?‐ ?-) | 101 | (?´ ?') (?｀ ?`) (?＾ ?^) (?＿ ?_) (?ー nil ?ｰ) (?— ?-) (?‐ ?-) |
| 102 | (?／ ?/) (?＼ ?\\) (?〜 ?~) (?｜ ?|) (?‘ ?`) (?’ ?') (?“ ?\") (?” ?\") | 102 | (?／ ?/) (?＼ ?\\) (?〜 ?~) (?｜ ?|) (?‘ ?`) (?’ ?') (?“ ?\") (?” ?\") |
| 103 | (?\（ ?\() (?\） ?\)) (?\［ ?\[) (?\］ ?\]) (?\｛ ?{) (?\｝ ?}) | 103 | (?\（ ?\() (?\） ?\)) (?\［ ?\[) (?\］ ?\]) (?\｛ ?{) (?\｝ ?}) |
| 104 | (?〈 ?<) (?〉 ?>) (?\「 nil ?\｢) (?\」 nil ?\｣) | 104 | (?〈 ?<) (?〉 ?>) (?\「 nil ?\｢) (?\」 nil ?\｣) |