From 5aec7c8b70e86d124cc01436a50a9ae5f97e8aec Mon Sep 17 00:00:00 2001 From: Sebastien Dupont Date: Tue, 11 Dec 2001 08:48:12 +0000 Subject: fix wizard step2 problems, and add configuration button. --- perl-install/standalone/drakbackup | 21 +++++++++++++++------ 1 file changed, 15 insertions(+), 6 deletions(-) diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index c67014354..998b67f82 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -43,9 +43,9 @@ # cdrw: /sys/dev/cdrom/info # /scsi/host0/bus0/target4/lun0 # # tar --use-compress-prog=bzip2 xf foo.tar.bz2 - -# todo today; new gi -# ftp +# +# don't forget to build floppy boot +# @@ -1040,17 +1040,26 @@ sub wizard_step2 { 0, gtkpack_(new Gtk::HBox(0, 15), 0, my $check_restore_sys = new Gtk::CheckButton(_("on Hard Drive")), 1, new Gtk::VBox(0, 5), - 0, gtksignal_connect(new Gtk::Button(_("Configure it")), clicked => sub {filedialog() }), + 0, gtksignal_connect(new Gtk::Button(_("Configure it")), clicked => sub { + ${$central_widget}->destroy(); + advanced_where_hd(); + }), ), 0, gtkpack_(new Gtk::HBox(0, 15), 0, my $check_restore_user = new Gtk::CheckButton(_("across Network")), 1, new Gtk::VBox(0, 5), - 0, gtksignal_connect(new Gtk::Button(_("Configure it")), clicked => sub {filedialog() }), + 0, gtksignal_connect(new Gtk::Button(_("Configure it")), clicked => sub { + ${$central_widget}->destroy(); + advanced_where_net(); + }), ), 0, gtkpack_(new Gtk::HBox(0, 15), 0, my $check_restore_other = new Gtk::CheckButton(_("on CDROM")), 1, new Gtk::VBox(0, 5), - 0, gtksignal_connect(new Gtk::Button(_("Configure it")), clicked => sub {filedialog() }), + 0, gtksignal_connect(new Gtk::Button(_("Configure it")), clicked => sub { + ${$central_widget}->destroy(); + advanced_where_cd(); + }), ), 1, new Gtk::VBox(0, 5), ), -- cgit v1.2.1