diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps_interactive.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index cadb871be..e137f9a85 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -190,7 +190,6 @@ sub selectInstallClass { ), if_($o->{meta_class} ne 'desktop', _("Customized") => "specific", - _("Expert") => "expert", ), ); %c = @c = (_("Expert") => "expert") if $::expert && !$clicked; @@ -213,7 +212,7 @@ are you ready to answer that kind of questions?"), first(list2kv(@c)), ${{reverse %c}}{$::beginner ? "beginner" : $::expert ? "expert" : "specific"}, [ __("Install"), __("Update") ], $o->{isUpgrade} ? "Update" : "Install") eq "Update"; - if ($::corporate || $::beginner) { + if ($::corporate || !$::expert) { delete $o->{installClass}; } else { my %c = ( |