# HG changeset patch
# User Jan Dj¸«£rv <jan.h.d@swipnet.se>
# Date 1148886665 0
# Node ID 3e5c40f72a0451c7481863fcbbe01ca09d249678
# Parent  92b0f65a55cef8a2340419852f2bd27aae5b29d5
Connect menu_nav_ended to "selection-done" to fix grabs

diff -r 92b0f65a55ce -r 3e5c40f72a04 src/gtkutil.c
--- 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);