summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/any.pm2
-rw-r--r--perl-install/install/NEWS4
2 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index d59886d6a..fa8d3c158 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -967,7 +967,7 @@ when your installation is complete and you restart your system.")),
{ val => \$lang, separator => '|',
if_($using_images, image2f => sub { $name2l{$_[0]} =~ /^[a-z]/ && "langs/lang-$name2l{$_[0]}" }),
format => sub { $_[0] =~ /(.*\|)(.*)/ ? $1 . lang::l2name($2) : lang::l2name($_[0]) },
- list => \@langs, changed => sub {
+ list => \@langs, sort => !$in->isa('interactive::gtk'), changed => sub {
#- very special cases for langs which do not like UTF-8
$non_utf8 = $lang =~ /\bzh/ if !$utf8_forced;
}, focus_out => sub { $langs->{$listval2val->($lang)} = 1 } },
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 790a36629..4c8cf45b9 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,7 @@
+- do not sort languages in "choose language" step in graphical mode, since the
+ sort is done on the non-translated strings (eg: we display "Espanol" but we
+ sort on Spanish )
+
Version 10.6.3 - 9 January 2008, by Pascal "Pixel" Rigaux
- 2008.1 alpha2 logo