diff options
| -rw-r--r-- | perl-install/install/NEWS | 2 | ||||
| -rw-r--r-- | perl-install/install/steps_interactive.pm | 10 |
2 files changed, 11 insertions, 1 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index e6479bc09..6754e1c4b 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,4 +1,6 @@ - don't crash install when mounting CD fails (#33421) +- don't ask for desktop and go directly to choose groups if kde and gnome are + not available on media (useful for mini iso) Version 10.4.211 - 24 September 2007, by Pascal "Pixel" Rigaux diff --git a/perl-install/install/steps_interactive.pm b/perl-install/install/steps_interactive.pm index b02f066e8..d650c7d82 100644 --- a/perl-install/install/steps_interactive.pm +++ b/perl-install/install/steps_interactive.pm @@ -365,7 +365,15 @@ sub choosePackages { my $min_mark = 4; my ($individual, $chooseGroups); - _chooseDesktop($o, $o->{rpmsrate_flags_chosen}, \$chooseGroups) if !$o->{upgrade}; + if (!$o->{upgrade}) { + if (install::pkgs::packageByName($o->{packages}, 'task-kde') && + install::pkgs::packageByName($o->{packages}, 'task-gnome-minimal')) { + _chooseDesktop($o, $o->{rpmsrate_flags_chosen}, \$chooseGroups); + } else { + # don't ask for desktop if kde and gnome are not available on media (useful for mini iso) + $chooseGroups = 1; + } + } chooseGroups: $o->chooseGroups($o->{packages}, $o->{compssUsers}, $min_mark, \$individual) if $chooseGroups; |