Mercurial > emacs

diff src/callint.c @ 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 6cfba7f41dca
children 96eb40f791e4
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;