From 02c4150b64f6c76c8e5282b4ead401c05422bcba Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 6 Sep 2001 16:18:42 +0000 Subject: fix keyboard config + some cleanup --- 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 c16e04d49..3e61b1470 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -155,7 +155,8 @@ sub selectKeyboard { my $l = keyboard::lang2keyboards($o->{lang}); #- good guess, don't ask - return if !$::expert && !$clicked && $l->[0][1] > 90; + return install_steps::selectKeyboard($o) + if !$::expert && !$clicked && $l->[0][1] > 90; my @best = map { $_->[0] } @$l; push @best, 'us_intl' if !member('us_intl', @best); -- cgit v1.2.1