# HG changeset patch
# User Jan Dj¸«£rv <jan.h.d@swipnet.se>
# Date 1100387875 0
# Node ID d433adb0e42c8c78793f76024e2376ab2ad79d3f
# Parent  3608b64ba20f9ff1dd462b57211a7e680dd7d893
Add BLOCK_INPUT in pop_down_file_dialog.

diff -r 3608b64ba20f -r d433adb0e42c src/gtkutil.c
--- a/src/gtkutil.c	Sat Nov 13 23:09:11 2004 +0000
+++ b/src/gtkutil.c	Sat Nov 13 23:17:55 2004 +0000
@@ -1150,7 +1150,9 @@
      Lisp_Object arg;
 {
   struct Lisp_Save_Value *p = XSAVE_VALUE (arg);
+  BLOCK_INPUT;
   gtk_widget_destroy (GTK_WIDGET (p->pointer));
+  UNBLOCK_INPUT;
   return Qnil;
 }