diff options
author | Sebastien Dupont <sdupont@mandriva.com> | 2001-12-10 09:05:37 +0000 |
---|---|---|
committer | Sebastien Dupont <sdupont@mandriva.com> | 2001-12-10 09:05:37 +0000 |
commit | b47d1740de5fcd93b39dddf5c8f7793269000493 (patch) | |
tree | a765249df317120ac0a0ef6a03590498171f4e11 /perl-install/standalone | |
parent | 0492a73962bbce163d4861fb01e278befae9cbb6 (diff) | |
download | drakx-backup-do-not-use-b47d1740de5fcd93b39dddf5c8f7793269000493.tar drakx-backup-do-not-use-b47d1740de5fcd93b39dddf5c8f7793269000493.tar.gz drakx-backup-do-not-use-b47d1740de5fcd93b39dddf5c8f7793269000493.tar.bz2 drakx-backup-do-not-use-b47d1740de5fcd93b39dddf5c8f7793269000493.tar.xz drakx-backup-do-not-use-b47d1740de5fcd93b39dddf5c8f7793269000493.zip |
help button box
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-x | perl-install/standalone/drakbackup | 19 |
1 files changed, 17 insertions, 2 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index 837ec5a17..7bff2aa58 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -1231,7 +1231,7 @@ sub restore_box { my $check_restore_other; find_backup_to_restore(); - restore_button_box(); + restore_button_box_main(); @user_list_to_restore = @user_backuped; if ($other_backuped || $sys_backuped || @user_backuped) { gtkpack($advanced_box, @@ -1290,6 +1290,20 @@ sub adv_button_box { ); } +sub restore_button_box_main { + + $button_box_tmp->destroy(); + gtkpack($button_box, + $button_box_tmp = gtkpack_(gtkpack(gtkset_layout(new Gtk::HButtonBox, -start), + gtksignal_connect(new Gtk::Button(_(" Cancel ")), clicked => sub { + ${$central_widget}->destroy(); interactive_mode_box(); }), + gtksignal_connect(new Gtk::Button(_(" Help ")), clicked => sub { + ${$central_widget}->destroy(); adv_help();}), + ), + ), + ); +} + sub restore_button_box { $button_box_tmp->destroy(); @@ -1298,7 +1312,7 @@ sub restore_button_box { 1, gtksignal_connect(new Gtk::Button(_(" Cancel ")), clicked => sub { ${$central_widget}->destroy(); interactive_mode_box(); }), 1, gtksignal_connect(new Gtk::Button(_(" Help ")), clicked => sub { - ${$central_widget}->destroy(); restore_help();}), + ${$central_widget}->destroy(); adv_help();}), 1, new Gtk::HBox(0, 0), 1, gtksignal_connect(new Gtk::Button(_(" Next ")), clicked => sub { ${$central_widget}->destroy(); adv_help(\&$current_widget,$custom_help);}), @@ -1306,6 +1320,7 @@ sub restore_button_box { ); } + sub main_button_box { $button_box_tmp->destroy(); |