Mercurial > emacs

changeset 2209:7b95f29936cb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(xmenu_show): Do BLOCK_INPUT; unblock just before returning.
author Richard M. Stallman <rms@gnu.org>
date Tue, 16 Mar 1993 05:55:12 +0000
parents 10b84f28f6f2
children 22d78dbb3cc7
files src/xmenu.c
diffstat 1 files changed, 5 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- 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);
 }