From: Gerd Moellmann <gerd@gnu.org>
Date: Tue, 25 Sep 2001 10:18:44 +0000 (+0000)
Subject: (read_char): Don't clear a message for a switch-frame
X-Git-Tag: emacs-pretest-21.0.106~1
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4d2e9f95a582236975e2f0fb7641f3157af898f3;p=emacs.git

(read_char): Don't clear a message for a switch-frame
event.   From Stefan Monnier  <monnier@cs.yale.edu>.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index f3d008e95dd..76a6c15c157 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -2734,7 +2734,9 @@ read_char (commandflag, nmaps, maps, prev_event, used_mouse_menu)
 
   /* Now wipe the echo area, except for help events which do their
      own stuff with the echo area.  */
-  if (!CONSP (c) || !(EQ (Qhelp_echo, XCAR (c))))
+  if (!CONSP (c)
+      || (!(EQ (Qhelp_echo, XCAR (c)))
+	  && !(EQ (Qswitch_frame, XCAR (c)))))
     {
       if (!NILP (echo_area_buffer[0]))
 	safe_run_hooks (Qecho_area_clear_hook);