diff options
| author | Richard M. Stallman | 1997-06-23 05:03:04 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-06-23 05:03:04 +0000 |
| commit | e31bd500ac2ebe451bbff25a6b260944954d3642 (patch) | |
| tree | 05cadbece054c5fc76d7e7cef2add25fa7582348 | |
| parent | b4dc9e6affd082f143d888a6909ea2fe8d83bb6d (diff) | |
| download | emacs-e31bd500ac2ebe451bbff25a6b260944954d3642.tar.gz emacs-e31bd500ac2ebe451bbff25a6b260944954d3642.zip | |
(read-hiragana-string): Call read-multilingual-string correctly.
| -rw-r--r-- | lisp/language/japan-util.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el index 1ad191b2897..e860b27156b 100644 --- a/lisp/language/japan-util.el +++ b/lisp/language/japan-util.el | |||
| @@ -293,8 +293,7 @@ Optional argument ASCII-ONLY non-nil means to convert only to ASCII char." | |||
| 293 | (defun read-hiragana-string (prompt &optional initial-input) | 293 | (defun read-hiragana-string (prompt &optional initial-input) |
| 294 | "Read a Hiragana string from the minibuffer, prompting with string PROMPT. | 294 | "Read a Hiragana string from the minibuffer, prompting with string PROMPT. |
| 295 | If non-nil, second arg INITIAL-INPUT is a string to insert before reading." | 295 | If non-nil, second arg INITIAL-INPUT is a string to insert before reading." |
| 296 | (read-multilingual-string prompt initial-input | 296 | (read-multilingual-string prompt initial-input "quail-ja-hiragana")) |
| 297 | "Japanese" "quail-ja-hiragana")) | ||
| 298 | 297 | ||
| 299 | ;; | 298 | ;; |
| 300 | (provide 'japan-util) | 299 | (provide 'japan-util) |