diff options
| author | Kenichi Handa <handa@m17n.org> | 1997-09-10 07:42:08 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1997-09-10 07:42:08 +0000 |
| commit | 5fe61ca5f7ee24e3de44563222dabb50014668c2 (patch) | |
| tree | 49b1e8ae92a17e519dc665c1f23efaf54a9e4176 | |
| parent | 60ef5007aa44c26de561ee8361ff007e6100af32 (diff) | |
| download | emacs-5fe61ca5f7ee24e3de44563222dabb50014668c2.tar.gz | |
(setup-japanese-environment): Give
iso-2022-jp to set-default-coding-system if not running on DOS.
(read-hiragana-string): Use input method
"japanese-hiragana".
| -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 88a3a6a623d..35e6c3f686f 100644 --- a/lisp/language/japan-util.el +++ b/lisp/language/japan-util.el @@ -45,7 +45,7 @@ (set-default-coding-systems (if (eq system-type 'ms-dos) 'japanese-shift-jis - 'iso-2022-7bit)) + 'iso-2022-jp)) (setq default-input-method "japanese")) @@ -286,7 +286,7 @@ Optional argument ASCII-ONLY non-nil means to convert only to ASCII char." (defun read-hiragana-string (prompt &optional initial-input) "Read a Hiragana string from the minibuffer, prompting with string PROMPT. If non-nil, second arg INITIAL-INPUT is a string to insert before reading." - (read-multilingual-string prompt initial-input "quail-ja-hiragana")) + (read-multilingual-string prompt initial-input "japanese-hiragana")) ;; (provide 'japan-util) |