mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-30 08:09:04 +00:00
Code Issues Releases Activity

(Fcall_interactively): Pass extra arg to Fread_string.

Browse Source
This commit is contained in:
Richard M. Stallman 1997-05-15 02:28:34 +00:00
parent 1d8d92f4fe
commit 55c4d99f91
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/callint.c
View File

@ -634,12 +634,13 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
break;
case 's': /* String read via minibuffer. */
args[i] = Fread_string (build_string (callint_message), Qnil, Qnil);
args[i] = Fread_string (build_string (callint_message),
Qnil, Qnil, Qnil);
break;
case 'S': /* Any symbol. */
visargs[i] = Fread_string (build_string (callint_message),
Qnil, Qnil);
Qnil, Qnil, Qnil);
/* Passing args[i] directly stimulates compiler bug */
teml = visargs[i];
args[i] = Fintern (teml, Qnil);