Commit 0ec2e29e authored by Eli Zaretskii's avatar Eli Zaretskii
Browse files

(Fmenu_or_popup_active_p): New function.

(syms_of_macmenu): Defsubr it.
parent ec4ef174
......@@ -1052,6 +1052,17 @@ x_activate_menubar (f)
UNBLOCK_INPUT;
}
/* The following is used by delayed window autoselection. */
DEFUN ("menu-or-popup-active-p", Fmenu_or_popup_active_p, Smenu_or_popup_active_p, 0, 0, 0,
doc: /* Return t if a menu or popup dialog is active. */)
()
{
/* Always return Qnil since menu selection functions do not return
until a selection has been made or cancelled. */
return Qnil;
}
/* Find the menu selection and store it in the keyboard buffer.
F is the frame the menu is on.
MENU_BAR_ITEMS_USED is the length of VECTOR.
......@@ -2653,6 +2664,7 @@ syms_of_macmenu ()
staticpro (&Qdebug_on_next_call);
defsubr (&Sx_popup_menu);
defsubr (&Smenu_or_popup_active_p);
#ifdef HAVE_MENUS
defsubr (&Sx_popup_dialog);
#endif
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment