Mercurial > emacs

changeset 19854:c6f58c509273

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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".
author Kenichi Handa <handa@m17n.org>
date Wed, 10 Sep 1997 07:42:08 +0000
parents 89a91516559b
children e658839d837e
files lisp/language/japan-util.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/japan-util.el	Wed Sep 10 03:26:31 1997 +0000
+++ b/lisp/language/japan-util.el	Wed Sep 10 07:42:08 1997 +0000
@@ -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 @@
 (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)