From 4a02423f72339dad31ff7fecf3007370af1f94ef Mon Sep 17 00:00:00 2001 From: =?utf8?q?Jan=20Dj=C3=A4rv?= Date: Sat, 14 Mar 2009 15:12:33 +0000 Subject: [PATCH] * gtkutil.c (xg_tool_bar_callback): Set focus back to the frame after clicking in a detached tool bar. (xg_tool_bar_proxy_callback): Remove call to Fx_focus_frame. --- src/ChangeLog | 6 ++++++ src/gtkutil.c | 11 +++++------ 2 files changed, 11 insertions(+), 6 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index 71c7fa01fbd..c980983d540 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,9 @@ +2009-03-14 Stephen Berman + + * gtkutil.c (xg_tool_bar_callback): Set focus back to the frame + after clicking in a detached tool bar. + (xg_tool_bar_proxy_callback): Remove call to Fx_focus_frame. + 2009-03-13 Stefan Monnier * fontset.c (fontset_from_font, Ffontset_info): YAILOM (Yet another diff --git a/src/gtkutil.c b/src/gtkutil.c index 39781cfd56f..8e3e24b6225 100644 --- a/src/gtkutil.c +++ b/src/gtkutil.c @@ -3457,10 +3457,14 @@ xg_tool_bar_callback (w, client_data) event.frame_or_window = frame; event.arg = key; /* Convert between the modifier bits GDK uses and the modifier bits - Emacs uses. This assumes GDK an X masks are the same, which they are when + Emacs uses. This assumes GDK and X masks are the same, which they are when this is written. */ event.modifiers = x_x_to_emacs_modifiers (FRAME_X_DISPLAY_INFO (f), mod); kbd_buffer_store_event (&event); + + /* Return focus to the frame after we have clicked on a detached + tool bar button. */ + Fx_focus_frame (frame); } /* Callback function invoked when a tool bar item is pressed in a detached @@ -3480,11 +3484,6 @@ xg_tool_bar_proxy_callback (w, client_data) xg_tool_bar_callback (wbutton, client_data); FRAME_PTR f = (FRAME_PTR) g_object_get_data (G_OBJECT (wbutton), XG_FRAME_DATA); - /* Put focus back to the frame after we have clicked on a detached - tool bar button. */ - Lisp_Object frame; - XSETFRAME (frame, f); - Fx_focus_frame (frame); } /* This callback is called when a tool item should create a proxy item, -- 2.39.5