From eef667ea8e5273489db049f8b48971085288eb0d Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 25 Feb 2002 20:04:04 +0000 Subject: sort the list of keyboards --- perl-install/install_steps_interactive.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm index faf9cad81..b263d6634 100644 --- a/perl-install/install_steps_interactive.pm +++ b/perl-install/install_steps_interactive.pm @@ -208,7 +208,7 @@ sub selectKeyboard { advanced_label => _("More"), callbacks => { changed => sub { $other = $_[0]==1 } }, }, - [ if_(@best > 1, { val => \$o->{keyboard}, type => 'list', format => $format, + [ if_(@best > 1, { val => \$o->{keyboard}, type => 'list', format => $format, sort => 1, list => [ @best ] }), { val => \$ext_keyboard, type => 'list', format => $format, list => [ keyboard::keyboards ], advanced => @best > 1 } -- cgit v1.2.1