From 0a0e8fe62e40e1a620a48daac943ae897ed56517 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 7 Jul 1994 06:42:21 +0000 Subject: [PATCH] (make_lispy_event): Ignore menu bar up events. --- src/keyboard.c | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/src/keyboard.c b/src/keyboard.c index 381d8ff4804..a93fa224861 100644 --- a/src/keyboard.c +++ b/src/keyboard.c @@ -2608,6 +2608,14 @@ make_lispy_event (event) #endif { Lisp_Object items, item; + int hpos; + int i; + + /* Activate the menu bar on the down event. If the + up event comes in before the menu code can deal with it, + just ignore it. */ + if (! (event->modifiers & down_modifier)) + return Qnil; #ifdef USE_X_TOOLKIT /* The click happened in the menubar. @@ -2616,9 +2624,6 @@ make_lispy_event (event) XFASTINT (event->y) = 1; #else /* not USE_X_TOOLKIT */ - int hpos; - int i; - item = Qnil; items = FRAME_MENU_BAR_ITEMS (f); for (i = 0; i < XVECTOR (items)->size; i += 3) -- 2.39.5