From 49fe12a91d4f38f476da592cbbd06e487fc60797 Mon Sep 17 00:00:00 2001
From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 1 Jun 1995 23:37:20 +0000
Subject: [PATCH] (EmacsFrameDestroy): Block and unblock input.

---
 src/widget.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/widget.c b/src/widget.c
index 101ca4f61f5..32daf8ffc27 100644
--- a/src/widget.c
+++ b/src/widget.c
@@ -27,7 +27,7 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
 #include "frame.h"
 
 #include "dispextern.h"
-
+#include "blockinput.h"
 
 #include <X11/StringDefs.h>
 #include <X11/IntrinsicP.h>
@@ -744,10 +744,12 @@ EmacsFrameDestroy (widget)
      been freed. */
   free_frame_faces (s);
 
+  BLOCK_INPUT;
   /* need to be careful that the face-freeing code doesn't free these too */
   XFreeGC (XtDisplay (widget), s->display.x->normal_gc);
   XFreeGC (XtDisplay (widget), s->display.x->reverse_gc);
   XFreeGC (XtDisplay (widget), s->display.x->cursor_gc);
+  UNBLOCK_INPUT;
 }
 
 void
-- 
2.39.2