summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorStew Benedict <stewb@mandriva.org>2003-09-22 16:43:16 +0000
committerStew Benedict <stewb@mandriva.org>2003-09-22 16:43:16 +0000
commit44ef472af70baf909958e9363a3b68b5532604b4 (patch)
treed29a03130039f00ae0a2f0de966a0a89a664e448 /perl-install/standalone
parent635e1d3e945c7c29b64d21a7004827d84d497d1f (diff)
downloaddrakx-backup-do-not-use-44ef472af70baf909958e9363a3b68b5532604b4.tar
drakx-backup-do-not-use-44ef472af70baf909958e9363a3b68b5532604b4.tar.gz
drakx-backup-do-not-use-44ef472af70baf909958e9363a3b68b5532604b4.tar.bz2
drakx-backup-do-not-use-44ef472af70baf909958e9363a3b68b5532604b4.tar.xz
drakx-backup-do-not-use-44ef472af70baf909958e9363a3b68b5532604b4.zip
Bug 5916, all users overrides individual selection in wizard.
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/drakbackup6
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/standalone/drakbackup b/perl-install/standalone/drakbackup
index f6339aee1..e6eb24a49 100755
--- a/perl-install/standalone/drakbackup
+++ b/perl-install/standalone/drakbackup
@@ -210,6 +210,7 @@ my $log_buff;
my $comp_mode = 0;
my $backup_sys = 1;
my $backup_user = 1;
+my $manual_user = 0;
my $backup_daemon = 1;
my $backup_sys_versions = 0;
my $backup_user_versions = 0;
@@ -2886,9 +2887,9 @@ sub wizard() {
my $box2;
my $user_string = N("Backup Users");
$user_string .= N(" (Default is all users)") if !$nonroot_user;
- if ($backup_user) {
+ if ($backup_user && !$manual_user) {
@user_list = @user_list_all;
- } else {
+ } elsif (!$manual_user) {
@user_list = ();
}
@@ -2901,6 +2902,7 @@ sub wizard() {
0, my $check_wizard_sys = new Gtk2::CheckButton(N("Backup System")),
0, my $check_wizard_user = new Gtk2::CheckButton($user_string),
0, gtksignal_connect(Gtk2::Button->new(N("Select user manually")), clicked => sub {
+ $manual_user = 1;
destroy_widget();
advanced_what_user(\&wizard);
}),