From cd2531db72eaf9b3a704bda141f9ced898040ce2 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Jan=20Dj=C3=A4rv?= <jan.h.d@swipnet.se>
Date: Sat, 13 Nov 2004 23:17:55 +0000
Subject: [PATCH] Add BLOCK_INPUT in pop_down_file_dialog.

---
 src/gtkutil.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/gtkutil.c b/src/gtkutil.c
index 90cee0c7272..79333782229 100644
--- a/src/gtkutil.c
+++ b/src/gtkutil.c
@@ -1150,7 +1150,9 @@ pop_down_file_dialog (arg)
      Lisp_Object arg;
 {
   struct Lisp_Save_Value *p = XSAVE_VALUE (arg);
+  BLOCK_INPUT;
   gtk_widget_destroy (GTK_WIDGET (p->pointer));
+  UNBLOCK_INPUT;
   return Qnil;
 }
 
-- 
2.39.5