From 8c4a3788c867abd17b52f44cc9f23e009e0664ba Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Fri, 19 Jan 2001 10:34:10 +0000 Subject: removed expert mode and install class. --- perl-install/install_steps_interactive.pm | 3 +-- 1 file changed, 1 insertion(+), 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 = ( -- cgit v1.2.1