# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 732261312 0
# Node ID 7b95f29936cb4d5d8926cb8d04b8fcc3ec3e5718
# Parent  10b84f28f6f2ffc57663d70b51f41c5caaa7842b
(xmenu_show): Do BLOCK_INPUT; unblock just before returning.

diff -r 10b84f28f6f2 -r 7b95f29936cb src/xmenu.c
--- a/src/xmenu.c	Tue Mar 16 05:54:56 1993 +0000
+++ b/src/xmenu.c	Tue Mar 16 05:55:12 1993 +0000
@@ -321,11 +321,13 @@
   if (pane_cnt == 0)
     return 0;
 
+  BLOCK_INPUT;
   *error = (char *) 0;		/* Initialize error pointer to null */
   GXMenu = XMenuCreate (XDISPLAY parent, "emacs");
   if (GXMenu == NUL)
     {
       *error = "Can't create menu";
+      UNBLOCK_INPUT;
       return (0);
     }
   
@@ -345,6 +347,7 @@
 	{
 	  XMenuDestroy (XDISPLAY GXMenu);
 	  *error = "Can't create pane";
+	  UNBLOCK_INPUT;
 	  return (0);
 	}
       for (selidx = 0; selidx < line_cnt[panes]; selidx++)
@@ -361,6 +364,7 @@
 	      /* free (datap); */
 	      *error = "Can't add selection to menu";
 	      /* error ("Can't add selection to menu"); */
+	      UNBLOCK_INPUT;
 	      return (0);
 	    }
 	}
@@ -412,6 +416,7 @@
       break;
     }
   XMenuDestroy (XDISPLAY GXMenu);
+  UNBLOCK_INPUT;
   /* free (datap_save);*/
   return (entry);
 }