changeset 19550:0e09a1cec19d

(Fml_arg): Call Fread_string with INHERIT-INPUT-METHOD nil.
author Kenichi Handa <handa@m17n.org>
date Tue, 26 Aug 1997 11:42:33 +0000
parents e1b1dcf77ac1
children 256843b0f804
files src/mocklisp.c
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/mocklisp.c	Tue Aug 26 11:42:33 1997 +0000
+++ b/src/mocklisp.c	Tue Aug 26 11:42:33 1997 +0000
@@ -120,7 +120,7 @@
      Lisp_Object n, prompt;
 {
   if (EQ (Vmocklisp_arguments, Qinteractive))
-    return Fread_string (prompt, Qnil, Qnil, Qnil);
+    return Fread_string (prompt, Qnil, Qnil, Qnil, Qnil);
   CHECK_NUMBER (n, 0);
   XSETINT (n, XINT (n) - 1);	/* Mocklisp likes to be origin-1 */
   return Fcar (Fnthcdr (n, Vmocklisp_arguments));