Mercurial > emacs
changeset 73788:177184091f28
(Fmenu_or_popup_active_p): Define outside HAVE_MENUS.
Return nil if building without menus.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Mon, 06 Nov 2006 16:47:33 +0000 |
parents | 497b9d9c1774 |
children | c83b592e110d |
files | src/w32menu.c src/xmenu.c |
diffstat | 2 files changed, 30 insertions(+), 21 deletions(-) [+] |
line wrap: on
line diff
--- a/src/w32menu.c Mon Nov 06 16:47:07 2006 +0000 +++ b/src/w32menu.c Mon Nov 06 16:47:33 2006 +0000 @@ -990,17 +990,6 @@ complete_deferred_msg (FRAME_W32_WINDOW (f), WM_INITMENU, 0); } -/* 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 on selected frame. */) - () -{ - FRAME_PTR f; - f = SELECTED_FRAME (); - return (f->output_data.w32->menubar_active > 0) ? Qt : Qnil; -} - /* This callback is called from the menu bar pulldown menu when the user makes a selection. Figure out what the user chose @@ -2536,6 +2525,21 @@ #endif /* HAVE_MENUS */ +/* 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 on selected frame. */) + () +{ +#ifdef HAVE_MENUS + FRAME_PTR f; + f = SELECTED_FRAME (); + return (f->output_data.w32->menubar_active > 0) ? Qt : Qnil; +#else + return Qnil; +#endif /* HAVE_MENUS */ +} + void syms_of_w32menu () { globals_of_w32menu ();
--- a/src/xmenu.c Mon Nov 06 16:47:07 2006 +0000 +++ b/src/xmenu.c Mon Nov 06 16:47:33 2006 +0000 @@ -1414,7 +1414,7 @@ gtk_menu_shell_select_item (GTK_MENU_SHELL (menubar), GTK_WIDGET (children->data)); - + popup_activated_flag = 1; g_list_free (children); } @@ -1496,15 +1496,6 @@ return popup_activated_flag; } -/* 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. */) - () -{ - return (popup_activated ()) ? Qt : Qnil; -} - /* This callback is invoked when the user selects a menubar cascade pushbutton, but before the pulldown menu is posted. */ @@ -3770,6 +3761,20 @@ #endif /* not USE_X_TOOLKIT */ #endif /* HAVE_MENUS */ + + +/* 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. */) + () +{ +#ifdef HAVE_MENUS + return (popup_activated ()) ? Qt : Qnil; +#else + return Qnil; +#endif /* HAVE_MENUS */ +} void syms_of_xmenu ()