From: Gerd Moellmann <gerd@gnu.org>
Date: Sat, 1 Apr 2000 12:23:25 +0000 (+0000)
Subject: (realize_basic_faces): Block input while realizing
X-Git-Tag: emacs-pretest-21.0.90~4367
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=17e8204bae924692b3aa899e8af295cbc49fedc1;p=emacs.git

(realize_basic_faces): Block input while realizing
the faces.
---

diff --git a/src/xfaces.c b/src/xfaces.c
index bbe0d954b99..c585515497a 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -5585,6 +5585,10 @@ realize_basic_faces (f)
      struct frame *f;
 {
   int success_p = 0;
+
+  /* Block input there so that we won't be surprised by an X expose
+     event, for instance without having the faces set up.  */
+  BLOCK_INPUT;
   
   if (realize_default_face (f))
     {
@@ -5600,6 +5604,7 @@ realize_basic_faces (f)
       success_p = 1;
     }
 
+  UNBLOCK_INPUT;
   return success_p;
 }