diff options
| author | Richard M. Stallman | 1992-12-21 05:38:25 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1992-12-21 05:38:25 +0000 |
| commit | be58fa58a90fbc28613dbe2ba1809cba6f46de5a (patch) | |
| tree | df34183d4049dd7593df1a8ab311590a94c8f339 /src/callint.c | |
| parent | 8c74709f517a8ce9743fc032b50d62215c394064 (diff) | |
| download | emacs-be58fa58a90fbc28613dbe2ba1809cba6f46de5a.tar.gz emacs-be58fa58a90fbc28613dbe2ba1809cba6f46de5a.zip | |
(Fcall_interactively): For `s', use Fread_string.
Diffstat (limited to 'src/callint.c')
| -rw-r--r-- | src/callint.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/callint.c b/src/callint.c index 9f0a98c24bd..53cad4a4a78 100644 --- a/src/callint.c +++ b/src/callint.c | |||
| @@ -493,7 +493,7 @@ Otherwise, this is done only if an arg is read using the minibuffer.") | |||
| 493 | break; | 493 | break; |
| 494 | 494 | ||
| 495 | case 'S': /* Any symbol. */ | 495 | case 'S': /* Any symbol. */ |
| 496 | visargs[i] = Fread_no_blanks_input (build_string (prompt), Qnil); | 496 | visargs[i] = Fread_string (build_string (prompt), Qnil); |
| 497 | /* Passing args[i] directly stimulates compiler bug */ | 497 | /* Passing args[i] directly stimulates compiler bug */ |
| 498 | teml = visargs[i]; | 498 | teml = visargs[i]; |
| 499 | args[i] = Fintern (teml, Qnil); | 499 | args[i] = Fintern (teml, Qnil); |