diff src/gtkutil.c @ 71056:3e5c40f72a04

Connect menu_nav_ended to "selection-done" to fix grabs

--- a/src/gtkutil.c	Mon May 29 06:19:09 2006 +0000
+++ b/src/gtkutil.c	Mon May 29 07:11:05 2006 +0000
@@ -1970,6 +1970,30 @@
   return w;
 }
 
+/* Callback called when keyboard traversal (started by x-menu-bar-start) ends.
+   WMENU is the menu for which traversal has been done.  DATA points to the
+   frame for WMENU.  We must release grabs, some bad interaction between GTK
+   and Emacs makes the menus keep the grabs.  */
+
+static void
+menu_nav_ended (wmenu, data)
+     GtkMenuShell *wmenu;
+     gpointer data;
+{
+  FRAME_PTR f = (FRAME_PTR) data;
+  Display *dpy = FRAME_X_DISPLAY (f);
+
+  BLOCK_INPUT;
+      GtkMenuShell *w = GTK_MENU_SHELL (FRAME_X_OUTPUT (f)->menubar_widget);
+      gtk_menu_shell_deactivate (w);
+      gtk_menu_shell_deselect (w);
+
+  XUngrabKeyboard (dpy, CurrentTime);
+  XUngrabPointer (dpy, CurrentTime);
+  UNBLOCK_INPUT;
+}
+
+
 static GtkWidget *create_menus P_ ((widget_value *, FRAME_PTR, GCallback,
 				    GCallback, GCallback, int, int, int,
 				    GtkWidget *, xg_menu_cb_data *, char *));
@@ -2024,6 +2048,12 @@
       }
       else wmenu = gtk_menu_bar_new ();
 
+      /* Fix up grabs after keyboard traversal ends.  */
+      g_signal_connect (G_OBJECT (wmenu),
+                        "selection-done",
+                        G_CALLBACK (menu_nav_ended),
+                        f);
+
       /* Put cl_data on the top menu for easier access.  */
       cl_data = make_cl_data (cl_data, f, highlight_cb);
       g_object_set_data (G_OBJECT (wmenu), XG_FRAME_DATA, (gpointer)cl_data);