From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 30 Nov 1995 00:31:52 +0000 (+0000)
Subject: (Fcall_interactively): In `c' case, clear out the message
X-Git-Tag: emacs-19.34~2196
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=07682ca3c964d8a20a49e14d0a3e85fbc29c0db9;p=emacs.git

(Fcall_interactively): In `c' case, clear out the message
after reading the character.
---

diff --git a/src/callint.c b/src/callint.c
index 231de94c3f0..3dbca425c1c 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -481,6 +481,7 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
         case 'c':		/* Character */
 	  message1 (callint_message);
 	  args[i] = Fread_char ();
+	  message1 ((char *) 0);
 	  /* Passing args[i] directly stimulates compiler bug */
 	  teml = args[i];
 	  visargs[i] = Fchar_to_string (teml);