xfns.c (Fx_create_frame) [USE_LUCID]: Add BLOCK_INPUT around XLoadQueryFont.

diff --git a/src/ChangeLog b/src/ChangeLog
index 2f237de..cf9d0fd 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2010-03-20  YAMAMOTO Mitsuharu  <mituharu@math.s.chiba-u.ac.jp>
+
+       * xfns.c (Fx_create_frame) [USE_LUCID]: Add BLOCK_INPUT around
+       XLoadQueryFont.
+
 2010-03-16  Kenichi Handa  <handa@m17n.org>
 
        * coding.c (decode_coding_ccl): Fix previous change for the

diff --git a/src/xfns.c b/src/xfns.c
index 96fb090..b11a7a5 100644 (file)
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -3347,7 +3347,9 @@ This function is an internal primitive--use `make-frame' instead.  */)
 #ifdef USE_LUCID
   /* Prevent lwlib/xlwmenu.c from crashing because of a bug
      whereby it fails to get any font.  */
+  BLOCK_INPUT;
   xlwmenu_default_font = XLoadQueryFont (FRAME_X_DISPLAY (f), "fixed");
+  UNBLOCK_INPUT;
 #endif
 
   /* Frame contents get displaced if an embedded X window has a border.  */