(Fcall_interactively): Allocate string by bytes.

Use message_with_string.

1 files changed, 4 insertions, 4 deletions

diff --git a/src/callint.c b/src/callint.c
index e947143ebe0..0fb5e94082d 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -288,8 +288,8 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
     {
       /* Make a copy of string so that if a GC relocates specs,
          `string' will still be valid.  */
-      string = (unsigned char *) alloca (XSTRING (specs)->size + 1);
-      bcopy (XSTRING (specs)->data, string, XSTRING (specs)->size + 1);
+      string = (unsigned char *) alloca (XSTRING (specs)->size_byte + 1);
+      bcopy (XSTRING (specs)->data, string, XSTRING (specs)->size_byte + 1);
     }
   else if (string == 0)
     {
@@ -487,10 +487,10 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
           break;
 
         case 'c':               /* Character */
-          /* Use message_nolog rather than message1_nolog here,
+          /* Use message_with_string rather than message1_nolog here,
              so that nothing bad happens if callint_message is changed
              within Fread_char (by a timer, for example).  */
-          message_nolog ("%s", callint_message);
+          message_with_string ("%s", build_string (callint_message), 0);
           args[i] = Fread_char ();
           message1_nolog ((char *) 0);
           /* Passing args[i] directly stimulates compiler bug */