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.")
 	  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);