Mercurial > hg > xemacs-beta
comparison src/gui-x.h @ 231:557eaa0339bf r20-5b14
Import from CVS: tag r20-5b14
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:13:48 +0200 |
parents | 2d532a89d707 |
children | c5d627a313b1 |
comparison
equal
deleted
inserted
replaced
230:39ed1d2bdd9d | 231:557eaa0339bf |
---|---|
29 widget_value *xmalloc_widget_value (void); | 29 widget_value *xmalloc_widget_value (void); |
30 | 30 |
31 extern LWLIB_ID new_lwlib_id (void); | 31 extern LWLIB_ID new_lwlib_id (void); |
32 | 32 |
33 #ifdef HAVE_POPUPS | 33 #ifdef HAVE_POPUPS |
34 | |
35 extern int popup_up_p; | |
36 | 34 |
37 /* Each frame has one of these, and they are also contained in | 35 /* Each frame has one of these, and they are also contained in |
38 Vpopup_callbacks. | 36 Vpopup_callbacks. |
39 It doesn't really need to be an lrecord (it's not lisp-accessible) | 37 It doesn't really need to be an lrecord (it's not lisp-accessible) |
40 but it makes marking slightly more modular. | 38 but it makes marking slightly more modular. |
74 void popup_selection_callback (Widget widget, LWLIB_ID ignored_id, | 72 void popup_selection_callback (Widget widget, LWLIB_ID ignored_id, |
75 XtPointer client_data); | 73 XtPointer client_data); |
76 int button_item_to_widget_value (Lisp_Object desc, widget_value *wv, | 74 int button_item_to_widget_value (Lisp_Object desc, widget_value *wv, |
77 int allow_text_field_p, int no_keys_p); | 75 int allow_text_field_p, int no_keys_p); |
78 Lisp_Object menu_name_to_accelerator (char *name); | 76 Lisp_Object menu_name_to_accelerator (char *name); |
79 Boolean separator_string_p (CONST char *s); | |
80 char *menu_separator_style (CONST char *s); | 77 char *menu_separator_style (CONST char *s); |
81 Lisp_Object widget_value_unwind (Lisp_Object closure); | 78 Lisp_Object widget_value_unwind (Lisp_Object closure); |
82 | 79 |
83 #endif /* HAVE_POPUPS */ | 80 #endif /* HAVE_POPUPS */ |
84 | 81 |