summaryrefslogtreecommitdiffstats
path: root/perl-install/install_steps_interactive.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2006-03-08 12:36:02 +0000
committerPascal Rigaux <pixel@mandriva.com>2006-03-08 12:36:02 +0000
commite80c6bc54b1d64c53edf57f417bee30132e95d36 (patch)
tree7ac5eb8126a7619163684aad8cffce67cd75ba8b /perl-install/install_steps_interactive.pm
parenta5323893d8857901416e8feab3ed88ce2a0a28ba (diff)
downloaddrakx-backup-do-not-use-e80c6bc54b1d64c53edf57f417bee30132e95d36.tar
drakx-backup-do-not-use-e80c6bc54b1d64c53edf57f417bee30132e95d36.tar.gz
drakx-backup-do-not-use-e80c6bc54b1d64c53edf57f417bee30132e95d36.tar.bz2
drakx-backup-do-not-use-e80c6bc54b1d64c53edf57f417bee30132e95d36.tar.xz
drakx-backup-do-not-use-e80c6bc54b1d64c53edf57f417bee30132e95d36.zip
- rename DOCS to CAT_MINIMAL_DOCS
- cuz otherwise DOCS is a "always" flag and modifying it afterwise is useless - CAT_DOCS would be not precise enough - simplify the "changed" callback
Diffstat (limited to 'perl-install/install_steps_interactive.pm')
-rw-r--r--perl-install/install_steps_interactive.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index 1b193c203..2a348fdea 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -582,14 +582,14 @@ Please choose the minimal installation you want:"),
{ val => \$docs, type => 'bool', text => N("With basic documentation (recommended!)"), disabled => sub { $minimal } },
{ val => \$minimal, type => 'bool', text => N("Truly minimal install (especially no urpmi)") },
],
- changed => sub { $o->{rpmsrate_flags_chosen}{CAT_X} = $docs = 0 if $minimal },
) or return &chooseGroups;
if ($minimal) {
- $o->{rpmsrate_flags_chosen}{CAT_X} = $docs = 0; #- redo it in "changed" was not called
+ $o->{rpmsrate_flags_chosen}{CAT_X} = $docs = 0;
$o->{rpmsrate_flags_chosen}{CAT_SYSTEM} = 0;
}
$o->{excludedocs} = !$docs;
+ $o->{rpmsrate_flags_chosen}{CAT_MINIMAL_DOCS} = $docs;
install_any::unselectMostPackages($o);
}