# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 900404151 0
# Node ID 661d40b1f2f08358c6f2ffa18dd2c5d8cbe15d4d
# Parent  5102cb480cae1afa195aad0730e933b144ace0af
(read-quoted-char): Bind input-method-function to nil.

diff -r 5102cb480cae -r 661d40b1f2f0 lisp/subr.el
--- a/lisp/subr.el	Tue Jul 14 05:51:20 1998 +0000
+++ b/lisp/subr.el	Tue Jul 14 08:15:51 1998 +0000
@@ -723,6 +723,8 @@
   (let ((message-log-max nil) done (first t) (code 0) char)
     (while (not done)
       (let ((inhibit-quit first)
+	    ;; Don't use input methods inside this function.
+	    (input-method-function nil)
 	    ;; Don't let C-h get the help message--only help function keys.
 	    (help-char nil)
 	    (help-form