Mercurial > hg > xemacs-beta
comparison src/menubar-x.c @ 243:f220cc83d72e r20-5b20
Import from CVS: tag r20-5b20
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:17:07 +0200 |
parents | 557eaa0339bf |
children | c5d627a313b1 |
comparison
equal
deleted
inserted
replaced
242:fc816b73a05f | 243:f220cc83d72e |
---|---|
214 the call to lw_map_widget_values(); no need | 214 the call to lw_map_widget_values(); no need |
215 to worry. */ | 215 to worry. */ |
216 incr_wv->call_data = LISP_TO_VOID (incremental_data); | 216 incr_wv->call_data = LISP_TO_VOID (incremental_data); |
217 goto menu_item_done; | 217 goto menu_item_done; |
218 } | 218 } |
219 #endif /* LWLIB_MENUBARS_LUCID */ | 219 #endif /* LWLIB_MENUBARS_LUCID || LWLIB_MENUBARS_MOTIF */ |
220 } | 220 } |
221 if (menu_type == POPUP_TYPE && popup_menu_titles && depth == 0) | 221 if (menu_type == POPUP_TYPE && popup_menu_titles && depth == 0) |
222 { | 222 { |
223 /* Simply prepend three more widget values to the contents of | 223 /* Simply prepend three more widget values to the contents of |
224 the menu: a label, and two separators (to get a double | 224 the menu: a label, and two separators (to get a double |
329 restore_in_menu_callback (Lisp_Object val) | 329 restore_in_menu_callback (Lisp_Object val) |
330 { | 330 { |
331 in_menu_callback = XINT(val); | 331 in_menu_callback = XINT(val); |
332 return Qnil; | 332 return Qnil; |
333 } | 333 } |
334 #endif /* LWLIB_MENUBARS_LUCID */ | 334 #endif /* LWLIB_MENUBARS_LUCID || LWLIB_MENUBARS_MOTIF */ |
335 | 335 |
336 | 336 |
337 /* The order in which callbacks are run is funny to say the least. | 337 /* The order in which callbacks are run is funny to say the least. |
338 It's sometimes tricky to avoid running a callback twice, and to | 338 It's sometimes tricky to avoid running a callback twice, and to |
339 avoid returning prematurely. So, this function returns true | 339 avoid returning prematurely. So, this function returns true |