# HG changeset patch
# User YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
# Date 1114765222 0
# Node ID e1eca57a26b43c06742c7f7b17c517a4d62e08f3
# Parent  e3bedede9b3fa9bdcd080aca95889c1d96b3b6df
(Fx_server_version): Add BLOCK_INPUT around Gestalt.

diff -r e3bedede9b3f -r e1eca57a26b4 src/macfns.c
--- a/src/macfns.c	Fri Apr 29 09:00:07 2005 +0000
+++ b/src/macfns.c	Fri Apr 29 09:00:22 2005 +0000
@@ -2969,8 +2969,13 @@
 {
   int mac_major_version;
   SInt32 response;
-
-  if (Gestalt (gestaltSystemVersion, &response) != noErr)
+  OSErr err;
+
+  BLOCK_INPUT;
+  err = Gestalt (gestaltSystemVersion, &response);
+  UNBLOCK_INPUT;
+
+  if (err != noErr)
     error ("Cannot get Mac OS version");
 
   mac_major_version = (response >> 8) & 0xff;