diff options
| author | Kenichi Handa <handa@m17n.org> | 1997-08-26 11:42:33 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 1997-08-26 11:42:33 +0000 |
| commit | 1e206719d56dd185c2167cc0d4c1b3c6f857582e (patch) | |
| tree | f8656ab5435d6a5bae22ed1feacb1a1ab51cc57e /src/mocklisp.c | |
| parent | 4328577a4e9822cc25d9de8611e0cee8e80f54e9 (diff) | |
| download | emacs-1e206719d56dd185c2167cc0d4c1b3c6f857582e.tar.gz | |
(Fml_arg): Call Fread_string with
INHERIT-INPUT-METHOD nil.
Diffstat (limited to 'src/mocklisp.c')
| -rw-r--r-- | src/mocklisp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/mocklisp.c b/src/mocklisp.c index 3b0276f9ce3..928edf1cea2 100644 --- a/src/mocklisp.c +++ b/src/mocklisp.c @@ -120,7 +120,7 @@ DEFUN ("ml-arg", Fml_arg, Sml_arg, 1, 2, 0, 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)); |