aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/callint.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/callint.c b/src/callint.c
index 150e70e6526..819a39ad38e 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -634,12 +634,13 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
634 break; 634 break;
635 635
636 case 's': /* String read via minibuffer. */ 636 case 's': /* String read via minibuffer. */
637 args[i] = Fread_string (build_string (callint_message), Qnil, Qnil); 637 args[i] = Fread_string (build_string (callint_message),
638 Qnil, Qnil, Qnil);
638 break; 639 break;
639 640
640 case 'S': /* Any symbol. */ 641 case 'S': /* Any symbol. */
641 visargs[i] = Fread_string (build_string (callint_message), 642 visargs[i] = Fread_string (build_string (callint_message),
642 Qnil, Qnil); 643 Qnil, Qnil, Qnil);
643 /* Passing args[i] directly stimulates compiler bug */ 644 /* Passing args[i] directly stimulates compiler bug */
644 teml = visargs[i]; 645 teml = visargs[i];
645 args[i] = Fintern (teml, Qnil); 646 args[i] = Fintern (teml, Qnil);