1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-24 10:38:38 +00:00

(lw_popup_menu): New arg event, passed along.

This commit is contained in:
Richard M. Stallman 1995-08-02 07:13:19 +00:00
parent 1dc9668c16
commit 5b3b31d608

View File

@ -1090,24 +1090,25 @@ lw_pop_down_all_widgets (id)
}
void
lw_popup_menu (widget)
lw_popup_menu (widget, event)
Widget widget;
XEvent *event;
{
#if defined (USE_LUCID)
if (lw_lucid_widget_p (widget))
xlw_popup_menu (widget);
xlw_popup_menu (widget, event);
#endif
#if defined (USE_MOTIF)
if (lw_motif_widget_p (widget))
xm_popup_menu (widget);
xm_popup_menu (widget, event);
#endif
#if defined (USE_OLIT)
if (lw_olit_widget_p (widget))
xol_popup_menu (widget);
xol_popup_menu (widget, event);
#endif
#if defined (USE_XAW)
if (lw_xaw_widget_p (widget))
xaw_popup_menu (widget);
xaw_popup_menu (widget, event);
#endif
}