summaryrefslogtreecommitdiffstats
path: root/perl-install/install/steps_interactive.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2014-09-07 03:44:53 +0200
committerPascal Terjan <pterjan@gmail.com>2014-10-20 21:29:56 +0000
commit86ed1dbac37685ddf52c9513d601604003df4fe5 (patch)
treecadbab378de764655bdde38234d76ade492850e3 /perl-install/install/steps_interactive.pm
parent58c61943ef3825bf7228d0ea98a5eda3be7c7b23 (diff)
downloaddrakx-86ed1dbac37685ddf52c9513d601604003df4fe5.tar
drakx-86ed1dbac37685ddf52c9513d601604003df4fe5.tar.gz
drakx-86ed1dbac37685ddf52c9513d601604003df4fe5.tar.bz2
drakx-86ed1dbac37685ddf52c9513d601604003df4fe5.tar.xz
drakx-86ed1dbac37685ddf52c9513d601604003df4fe5.zip
rename variable for consistency
Diffstat (limited to 'perl-install/install/steps_interactive.pm')
-rw-r--r--perl-install/install/steps_interactive.pm10
1 files changed, 5 insertions, 5 deletions
diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm
index e03cd2480..e8f1e0ebb 100644
--- a/perl-install/install/steps_interactive.pm
+++ b/perl-install/install/steps_interactive.pm
@@ -567,7 +567,7 @@ sub offer_minimal_options {
my ($o) = @_;
my $docs = !$o->{excludedocs};
state $minimal;
- my $suggests = !$o->{no_recommends};
+ my $recommends = !$o->{no_recommends};
$o->ask_from_({ title => N("Type of install"),
message => N("You have not selected any group of packages.
@@ -576,20 +576,20 @@ Please choose the minimal installation you want:"),
},
[
{ val => \$o->{rpmsrate_flags_chosen}{CAT_X}, type => 'bool', text => N("With X"), disabled => sub { $minimal } },
- { val => \$suggests, type => 'bool', text => N("Install suggested packages"), disabled => sub { $minimal } },
+ { val => \$recommends, type => 'bool', text => N("Install suggested packages"), disabled => sub { $minimal } },
{ 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)") },
],
) or return 0;
if ($minimal) {
- $o->{rpmsrate_flags_chosen}{CAT_X} = $docs = $suggests = 0;
+ $o->{rpmsrate_flags_chosen}{CAT_X} = $docs = $recommends = 0;
$o->{rpmsrate_flags_chosen}{CAT_SYSTEM} = 0;
}
$o->{excludedocs} = !$docs;
$o->{rpmsrate_flags_chosen}{CAT_MINIMAL_DOCS} = $docs;
- $o->{no_recommends} = !$suggests;
- $o->{compssListLevel} = pkgs::rpmsrate_rate_max() if !$suggests;
+ $o->{no_recommends} = !$recommends;
+ $o->{compssListLevel} = pkgs::rpmsrate_rate_max() if !$recommends;
log::l("install settings: no_recommends=$o->{no_recommends}, excludedocs=$o->{excludedocs}, really_minimal_install=$minimal");
install::any::unselectMostPackages($o);