From 205012787b94d9ea2e945afffa38d616f37d9ae2 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Thu, 13 Jul 2000 14:07:57 +0000 Subject: [PATCH] (menubar_selection_callback): Use the `arg' slot of input events to queue additional information, instead of consing. --- src/w32menu.c | 20 ++++++++++++-------- 1 file changed, 12 insertions(+), 8 deletions(-) diff --git a/src/w32menu.c b/src/w32menu.c index 8a65c0b635b..995c3ef254b 100644 --- a/src/w32menu.c +++ b/src/w32menu.c @@ -1002,27 +1002,31 @@ menubar_selection_callback (FRAME_PTR f, void * client_data) Lisp_Object frame; XSETFRAME (frame, f); - buf.kind = menu_bar_event; - buf.frame_or_window = Fcons (frame, Fcons (Qmenu_bar, Qnil)); + buf.kind = MENU_BAR_EVENT; + buf.frame_or_window = frame; + buf.arg = frame; kbd_buffer_store_event (&buf); for (j = 0; j < submenu_depth; j++) if (!NILP (subprefix_stack[j])) { - buf.kind = menu_bar_event; - buf.frame_or_window = Fcons (frame, subprefix_stack[j]); + buf.kind = MENU_BAR_EVENT; + buf.frame_or_window = frame; + buf.arg = subprefix_stack[j]; kbd_buffer_store_event (&buf); } if (!NILP (prefix)) { - buf.kind = menu_bar_event; - buf.frame_or_window = Fcons (frame, prefix); + buf.kind = MENU_BAR_EVENT; + buf.frame_or_window = frame; + buf.arg = prefix; kbd_buffer_store_event (&buf); } - buf.kind = menu_bar_event; - buf.frame_or_window = Fcons (frame, entry); + buf.kind = MENU_BAR_EVENT; + buf.frame_or_window = frame; + buf.arg = entry; kbd_buffer_store_event (&buf); return; -- 2.39.2