From a51b963cea1190c7b05d2c11c3ebe8f5dd6377a1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 7 Jul 1994 19:24:56 +0000 Subject: [PATCH] (xmenu_show) {USE_X_TOOLKIT}: ButtonPress no longer pops down; instead it forces the next ButtonRelease to exit. Don't dispatch on ButtonPress events. --- src/xmenu.c | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/src/xmenu.c b/src/xmenu.c index f5121e2bfed..12b76516e8c 100644 --- a/src/xmenu.c +++ b/src/xmenu.c @@ -1416,6 +1416,7 @@ xmenu_show (f, x, y, menubarp, keymaps, title, error) Position root_x, root_y; int first_pane; + int next_release_must_exit = 0; *error = NULL; @@ -1655,16 +1656,27 @@ xmenu_show (f, x, y, menubarp, keymaps, title, error) Vmouse_depressed = Qnil; } if (! (menu_item_selection == 0 + && !next_release_must_exit && (((XButtonEvent *) (&event))->time - last_event_timestamp < XINT (Vdouble_click_time)))) break; + /* Don't call XtDispatchEvent again for the same event! */ + continue; } else if (event.type == ButtonPress) { + next_release_must_exit = 1; +#if 0 + XtDispatchEvent (&event); /* Any mouse button activity that doesn't select in the menu should unpost the menu. */ if (menu_item_selection == 0) break; +#endif + /* Don't call XtDispatchEvent for the down event. + Doing so seems to give strange results + when you click on the menu bar while a menu is posted. */ + continue; } else if (event.type == KeyPress) { -- 2.39.5