* src/minibuf.c (read_minibuf_noninteractive): Remove unused args.

This commit is contained in:
Stefan Monnier 2018-10-22 09:50:08 -04:00
parent 1d2b386ec4
commit 7d5919e5e7

View file

@ -181,12 +181,8 @@ string_to_object (Lisp_Object val, Lisp_Object defalt)
from read_minibuf to do the job if noninteractive. */
static Lisp_Object
read_minibuf_noninteractive (Lisp_Object map, Lisp_Object initial,
Lisp_Object prompt, Lisp_Object backup_n,
bool expflag,
Lisp_Object histvar, Lisp_Object histpos,
Lisp_Object defalt,
bool allow_props, bool inherit_input_method)
read_minibuf_noninteractive (Lisp_Object prompt, bool expflag,
Lisp_Object defalt)
{
ptrdiff_t size, len;
char *line;
@ -430,10 +426,7 @@ read_minibuf (Lisp_Object map, Lisp_Object initial, Lisp_Object prompt,
|| (IS_DAEMON && DAEMON_RUNNING))
&& NILP (Vexecuting_kbd_macro))
{
val = read_minibuf_noninteractive (map, initial, prompt,
make_fixnum (pos),
expflag, histvar, histpos, defalt,
allow_props, inherit_input_method);
val = read_minibuf_noninteractive (prompt, expflag, defalt);
return unbind_to (count, val);
}