Mercurial > emacs
view move-if-change @ 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 | 354e0c45cedf |
children | 14a97ab281d5 |
line wrap: on
line source
#!/bin/sh if test -r $2 then if cmp $1 $2 > /dev/null then echo $2 is unchanged rm -f $1 else mv -f $1 $2 fi else mv -f $1 $2 fi