From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 10 Jan 1994 22:37:42 +0000 (+0000)
Subject: (x_sync): Block input.
X-Git-Tag: emacs-19.34~10293
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4e87f4d2ad776e2fb2df550b65f362fb9cd4ab77;p=emacs.git

(x_sync): Block input.
---

diff --git a/src/xfns.c b/src/xfns.c
index 035d20c1d01..99373481b54 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -3730,7 +3730,9 @@ void
 x_sync (frame)
      Lisp_Object frame;
 {
+  BLOCK_INPUT;
   XSync (x_current_display, False);
+  UNBLOCK_INPUT;
 }
 
 syms_of_xfns ()