changeset 36863:247618d8fd9d

(read-input-method-name): Locally bind enable-recursive-minibuffers to t.
author Kenichi Handa <handa@m17n.org>
date Mon, 19 Mar 2001 04:50:39 +0000
parents e7247c404477
children f9e2a2533bef
files lisp/international/mule-cmds.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el	Mon Mar 19 04:49:09 2001 +0000
+++ b/lisp/international/mule-cmds.el	Mon Mar 19 04:50:39 2001 +0000
@@ -1023,6 +1023,10 @@
   (if default
       (setq prompt (format prompt default)))
   (let* ((completion-ignore-case t)
+	 ;; As it is quite normal to change input method in the
+	 ;; minibuffer, we must enable it even if
+	 ;; enable-recursive-minibuffers is currently nil.
+	 (enable-recursive-minibuffers t)
 	 ;; This binding is necessary because input-method-history is
 	 ;; buffer local.
 	 (input-method (completing-read prompt input-method-alist