From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 10 May 1994 23:38:17 +0000 (+0000)
Subject: (read_char): Preserve echo area on asynch buffer switch.
X-Git-Tag: emacs-19.34~8406
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3b91a4f4c9524d025a110b0005f13217cbbe1b7c;p=emacs.git

(read_char): Preserve echo area on asynch buffer switch.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index 910bbf68da7..e32d9016f6e 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -1629,7 +1629,9 @@ read_char (commandflag, nmaps, maps, prev_event, used_mouse_menu)
 
   start_polling ();
 
-  echo_area_glyphs = 0;
+  /* Don't wipe the echo area for a trivial event.  */
+  if (XTYPE (c) != Lisp_Buffer)
+    echo_area_glyphs = 0;
 
   /* Handle things that only apply to characters.  */
   if (XTYPE (c) == Lisp_Int)