Mercurial > emacs
comparison lwlib/lwlib.c @ 12744:0c5625e91a11
(lw_popup_menu): New arg event, passed along.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 02 Aug 1995 07:13:19 +0000 |
parents | 18d061c3d0dd |
children | 2422ceecd9d2 |
comparison
equal
deleted
inserted
replaced
12743:d9dc148cd8ac | 12744:0c5625e91a11 |
---|---|
1088 { | 1088 { |
1089 lw_pop_all_widgets (id, False); | 1089 lw_pop_all_widgets (id, False); |
1090 } | 1090 } |
1091 | 1091 |
1092 void | 1092 void |
1093 lw_popup_menu (widget) | 1093 lw_popup_menu (widget, event) |
1094 Widget widget; | 1094 Widget widget; |
1095 XEvent *event; | |
1095 { | 1096 { |
1096 #if defined (USE_LUCID) | 1097 #if defined (USE_LUCID) |
1097 if (lw_lucid_widget_p (widget)) | 1098 if (lw_lucid_widget_p (widget)) |
1098 xlw_popup_menu (widget); | 1099 xlw_popup_menu (widget, event); |
1099 #endif | 1100 #endif |
1100 #if defined (USE_MOTIF) | 1101 #if defined (USE_MOTIF) |
1101 if (lw_motif_widget_p (widget)) | 1102 if (lw_motif_widget_p (widget)) |
1102 xm_popup_menu (widget); | 1103 xm_popup_menu (widget, event); |
1103 #endif | 1104 #endif |
1104 #if defined (USE_OLIT) | 1105 #if defined (USE_OLIT) |
1105 if (lw_olit_widget_p (widget)) | 1106 if (lw_olit_widget_p (widget)) |
1106 xol_popup_menu (widget); | 1107 xol_popup_menu (widget, event); |
1107 #endif | 1108 #endif |
1108 #if defined (USE_XAW) | 1109 #if defined (USE_XAW) |
1109 if (lw_xaw_widget_p (widget)) | 1110 if (lw_xaw_widget_p (widget)) |
1110 xaw_popup_menu (widget); | 1111 xaw_popup_menu (widget, event); |
1111 #endif | 1112 #endif |
1112 } | 1113 } |
1113 | 1114 |
1114 /* get the values back */ | 1115 /* get the values back */ |
1115 static Boolean | 1116 static Boolean |