Mercurial > emacs
comparison src/ChangeLog @ 58200:3608b64ba20f
* gtkutil.c (xg_file_sel_ok, xg_file_sel_cancel)
(xg_file_sel_destroy): Removed.
(xg_file_response_cb, pop_down_file_dialog,
xg_get_file_name_from_chooser, xg_get_file_name_from_selector):
New functions.
(xg_get_file_with_chooser, xg_get_file_with_selection): Take
new argument func, set it to xg_get_file_name_from_chooser/selector.
Move common code to xg_get_file_name. Return widget created.
(xg_get_file_name): Set name, transient for, modal and destroy
with parent here. Connect response signal to xg_file_response_cb,
connect delete-event to gtk_true. Record pop_down_file_dialog
for unwind. Do event loop and call x_menu_wait_for_event in loop.
(xg_create_widget): Make dialogs modal.
| author | Jan Djärv <jan.h.d@swipnet.se> |
|---|---|
| date | Sat, 13 Nov 2004 23:09:11 +0000 |
| parents | 6c24ca598cb1 |
| children | 54c649507b74 |
comparison
equal
deleted
inserted
replaced
| 58199:3cbfe7441f96 | 58200:3608b64ba20f |
|---|---|
| 1 2004-11-13 Jan Dj,Ad(Brv <jan.h.d@swipnet.se> | 1 2004-11-13 Jan Dj,Ad(Brv <jan.h.d@swipnet.se> |
| 2 | |
| 3 * gtkutil.c (xg_file_sel_ok, xg_file_sel_cancel) | |
| 4 (xg_file_sel_destroy): Removed. | |
| 5 (xg_file_response_cb, pop_down_file_dialog, | |
| 6 xg_get_file_name_from_chooser, xg_get_file_name_from_selector): | |
| 7 New functions. | |
| 8 (xg_get_file_with_chooser, xg_get_file_with_selection): Take | |
| 9 new argument func, set it to xg_get_file_name_from_chooser/selector. | |
| 10 Move common code to xg_get_file_name. Return widget created. | |
| 11 (xg_get_file_name): Set name, transient for, modal and destroy | |
| 12 with parent here. Connect response signal to xg_file_response_cb, | |
| 13 connect delete-event to gtk_true. Record pop_down_file_dialog | |
| 14 for unwind. Do event loop and call x_menu_wait_for_event in loop. | |
| 15 (xg_create_widget): Make dialogs modal. | |
| 2 | 16 |
| 3 * xmenu.c (unuse_menu_items, pop_down_menu): Arg is of type | 17 * xmenu.c (unuse_menu_items, pop_down_menu): Arg is of type |
| 4 Lisp_Object. | 18 Lisp_Object. |
| 5 (popup_get_selection): Move unwind protect ... | 19 (popup_get_selection): Move unwind protect ... |
| 6 (create_and_show_popup_menu, create_and_show_dialog): ... to here. | 20 (create_and_show_popup_menu, create_and_show_dialog): ... to here. |