From a6385fa99c751ffd0cf7dcaede45dfb2c5d5b775 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Wed, 10 Sep 1997 07:42:08 +0000 Subject: [PATCH] (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". --- lisp/language/japan-util.el | 4 ++-- 1 file 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) -- 2.39.2