From: Karl Heuer <kwzh@gnu.org>
Date: Tue, 7 Jun 1994 02:32:54 +0000 (+0000)
Subject: (Fy_or_n_p, Fyes_or_no_p) [HAVE_X_MENU]: Redisplay before popping up a menu.
X-Git-Tag: emacs-19.34~8038
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a3b14a452547fb0e4957fc057685af6a3600a108;p=emacs.git

(Fy_or_n_p, Fyes_or_no_p) [HAVE_X_MENU]: Redisplay before popping up a menu.
---

diff --git a/src/fns.c b/src/fns.c
index 1589176485a..35cd7e4bca5 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -1136,6 +1136,7 @@ Also accepts Space to mean yes, or Delete to mean no.")
 	  && using_x_p ())
 	{
 	  Lisp_Object pane, menu;
+	  redisplay_preserve_echo_area ();
 	  pane = Fcons (Fcons (build_string ("Yes"), Qt),
 			Fcons (Fcons (build_string ("No"), Qnil),
 			       Qnil));
@@ -1238,6 +1239,7 @@ and can edit it until it as been confirmed.")
       && using_x_p ())
     {
       Lisp_Object pane, menu, obj;
+      redisplay_preserve_echo_area ();
       pane = Fcons (Fcons (build_string ("Yes"), Qt),
 		    Fcons (Fcons (build_string ("No"), Qnil),
 			   Qnil));