From 2fd889c2d9cc5fe117a81dd04c2166d267b5ef71 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 6 Nov 1999 15:30:56 +0000 Subject: no_comment --- perl-install/install_steps_interactive.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install/install_steps_interactive.pm') diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index d2652c092..72468ffcc 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -105,7 +105,7 @@ sub selectInstallClass($@) { ); my $installClass = ${{reverse %c}}{$o->ask_from_list(_("Install Class"), _("What installation class do you want?"), - [ map { $c{$_} } @c ], $c{$o->{installClass}} || $c{specific})}; + [ map { $c{$_} } @c ], $c{$o->{installClass}} || $c{beginner})}; $::expert = $installClass eq "expert"; $::beginner = $installClass eq "beginner"; @@ -113,6 +113,7 @@ sub selectInstallClass($@) { $o->{installClass} = $installClass; } else { my %c = ( + normal => _("Normal"), developer => _("Developement"), server => _("Server"), ); -- cgit v1.2.1