diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2014-09-07 03:44:53 +0200 |
---|---|---|
committer | Pascal Terjan <pterjan@gmail.com> | 2014-10-20 21:29:56 +0000 |
commit | 86ed1dbac37685ddf52c9513d601604003df4fe5 (patch) | |
tree | cadbab378de764655bdde38234d76ade492850e3 /perl-install/install/steps_interactive.pm | |
parent | 58c61943ef3825bf7228d0ea98a5eda3be7c7b23 (diff) | |
download | drakx-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.pm | 10 |
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); |