Mercurial > emacs

changeset 17736:8b30ef18c480

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fcall_interactively): Pass new arg to Fread_from_minibuffer and Fread_variable. (Fcall_interactively): Pass new arg to Fcompleting_read.
author Richard M. Stallman <rms@gnu.org>
date Sat, 10 May 1997 21:44:59 +0000
parents f379e219ed8e
children f79f2d6b119b
files src/callint.c
diffstat 1 files changed, 6 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/callint.c	Sat May 10 21:44:11 1997 +0000
+++ b/src/callint.c	Sat May 10 21:44:59 1997 +0000
@@ -465,7 +465,8 @@
 	{
 	case 'a':		/* Symbol defined as a function */
 	  visargs[i] = Fcompleting_read (build_string (callint_message),
-					 Vobarray, Qfboundp, Qt, Qnil, Qnil);
+					 Vobarray, Qfboundp, Qt,
+					 Qnil, Qnil, Qnil);
 	  /* Passing args[i] directly stimulates compiler bug */
 	  teml = visargs[i];
 	  args[i] = Fintern (teml, Qnil);
@@ -498,7 +499,8 @@
 
 	case 'C':		/* Command: symbol with interactive function */
 	  visargs[i] = Fcompleting_read (build_string (callint_message),
-					 Vobarray, Qcommandp, Qt, Qnil, Qnil);
+					 Vobarray, Qcommandp,
+					 Qt, Qnil, Qnil, Qnil);
 	  /* Passing args[i] directly stimulates compiler bug */
 	  teml = visargs[i];
 	  args[i] = Fintern (teml, Qnil);
@@ -595,7 +597,7 @@
 		first = 0;
 
 		tem = Fread_from_minibuffer (build_string (callint_message),
-					     Qnil, Qnil, Qnil, Qnil);
+					     Qnil, Qnil, Qnil, Qnil, Qnil);
 		if (! STRINGP (tem) || XSTRING (tem)->size == 0)
 		  args[i] = Qnil;
 		else
@@ -645,7 +647,7 @@
 
 	case 'v':		/* Variable name: symbol that is
 				   user-variable-p. */
-	  args[i] = Fread_variable (build_string (callint_message));
+	  args[i] = Fread_variable (build_string (callint_message), Qnil);
 	  visargs[i] = last_minibuf_string;
 	  break;