From: Richard M. Stallman Date: Sun, 19 Dec 1999 19:13:08 +0000 (+0000) Subject: (Fcompleting_read): Rename arg INIT to INITIAL_INPUT. X-Git-Tag: emacs-pretest-21.0.90~5663 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d43f85c277b14cbdf60578f505d243bca64d9225;p=emacs.git (Fcompleting_read): Rename arg INIT to INITIAL_INPUT. --- diff --git a/src/minibuf.c b/src/minibuf.c index e5c97023b49..701006350e8 100644 --- a/src/minibuf.c +++ b/src/minibuf.c @@ -1444,15 +1444,17 @@ Completion ignores case if the ambient value of\n\ */ DEFUN ("completing-read", Fcompleting_read, Scompleting_read, 2, 8, 0, 0 /* See immediately above */) - (prompt, table, predicate, require_match, init, hist, def, inherit_input_method) - Lisp_Object prompt, table, predicate, require_match, init, hist, def; - Lisp_Object inherit_input_method; + (prompt, table, predicate, require_match, initial_input, hist, def, inherit_input_method) + Lisp_Object prompt, table, predicate, require_match, initial_input; + Lisp_Object hist, def, inherit_input_method; { Lisp_Object val, histvar, histpos, position; + Lisp_Object init; int pos = 0; int count = specpdl_ptr - specpdl; struct gcpro gcpro1; + init = initial_input; GCPRO1 (def); specbind (Qminibuffer_completion_table, table);