diff options
author | Stew Benedict <stewb@mandriva.org> | 2004-09-13 11:01:15 +0000 |
---|---|---|
committer | Stew Benedict <stewb@mandriva.org> | 2004-09-13 11:01:15 +0000 |
commit | a0de793b6947257509c0edab093825c6c36f7e33 (patch) | |
tree | 2c0a6217d3b25298f3da67fd98f2ceb44034e3dd /perl-install/standalone | |
parent | f74615697b0e051ee6cdbd95eae0040f68372919 (diff) | |
download | drakx-a0de793b6947257509c0edab093825c6c36f7e33.tar drakx-a0de793b6947257509c0edab093825c6c36f7e33.tar.gz drakx-a0de793b6947257509c0edab093825c6c36f7e33.tar.bz2 drakx-a0de793b6947257509c0edab093825c6c36f7e33.tar.xz drakx-a0de793b6947257509c0edab093825c6c36f7e33.zip |
Fix crashes in CD/Tape setup. Fix UI behavior in wizard. (Nicolas Adenis-Lamarre)
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-x | perl-install/standalone/drakbackup | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup index fbd0e4d7e..1c92f310d 100755 --- a/perl-install/standalone/drakbackup +++ b/perl-install/standalone/drakbackup @@ -1748,8 +1748,7 @@ sub advanced_where_cd { $dev_codes{$cd_devices{$key}{rec_dev}} = $key; } - my $combo_where_cd_device = Gtk2::ComboBox->new_with_strings(%cd_devices ? [ sort keys %dev_codes ] : \@no_devices); - + my $combo_where_cd_device = Gtk2::ComboBox->new_with_strings(%cd_devices ? [ sort keys %dev_codes ] : \@no_devices); my $combo_where_cd_time = Gtk2::ComboBox->new_with_strings([ "650 MB", "700 MB", "750 MB", "800 MB", "4.7 GB" ]); gtkpack($advanced_box, @@ -1823,10 +1822,10 @@ sub advanced_where_cd { } }); - $combo_where_cd_time->entry->set_text($conf{CD_TIME}); + $combo_where_cd_time->entry->set_text($conf{CD_TIME}) if $conf{CD_TIME}; $combo_where_cd_time->entry->signal_connect('changed', sub { $conf{CD_TIME} = $combo_where_cd_time->entry->get_text }); - $combo_where_cd_device->entry->set_text($conf{CD_DEVICE}); + $combo_where_cd_device->entry->set_text($conf{CD_DEVICE}) if $conf{CD_DEVICE}; $combo_where_cd_device->entry->signal_connect('changed', sub { $conf{CD_DEVICE} = $combo_where_cd_device->entry->get_text; $std_device = $dev_codes{$conf{CD_DEVICE}}; @@ -1933,7 +1932,7 @@ sub advanced_where_tape { destroy_widget(); $current_widget->($previous_function); }); - $combo_where_tape_device->entry->set_text($conf{TAPE_DEVICE}); + $combo_where_tape_device->entry->set_text($conf{TAPE_DEVICE}) if $conf{TAPE_DEVICE}; $combo_where_tape_device->entry->signal_connect('changed', sub { $conf{TAPE_DEVICE} = $combo_where_tape_device->entry->get_text; }); @@ -2285,7 +2284,9 @@ sub wizard_step3() { my $no_device = 1 if $conf{USE_CD} && $conf{CD_DEVICE} eq '' || $conf{USE_TAPE} && $conf{TAPE_DEVICE} eq '' || $conf{USE_NET} && $conf{NET_PROTO} eq ''; if ($no_device) { show_warning("f", N("Backup destination not configured...")); - wizard_step2(); + advanced_where_net_types(\&wizard_step2) if $conf{USE_NET}; + advanced_where_cd(\&wizard_step2) if $conf{USE_CD}; + advanced_where_tape(\&wizard_step2) if $conf{USE_TAPE}; return; } if (check_pkg_needs()) { |