diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2008-01-11 13:06:22 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2008-01-11 13:06:22 +0000 |
| commit | 8fd384c7c95a38f252fb10b93effb7b8399d8c54 (patch) | |
| tree | b6195ef486c118e9dc94e956e9f61f1003fddf22 /perl-install/any.pm | |
| parent | 910d0bdeb5b5c7b406e8ad2693ed9579c8681ca7 (diff) | |
| download | drakx-backup-do-not-use-8fd384c7c95a38f252fb10b93effb7b8399d8c54.tar drakx-backup-do-not-use-8fd384c7c95a38f252fb10b93effb7b8399d8c54.tar.gz drakx-backup-do-not-use-8fd384c7c95a38f252fb10b93effb7b8399d8c54.tar.bz2 drakx-backup-do-not-use-8fd384c7c95a38f252fb10b93effb7b8399d8c54.tar.xz drakx-backup-do-not-use-8fd384c7c95a38f252fb10b93effb7b8399d8c54.zip | |
- 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 )
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 2 |
1 files changed, 1 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 } }, |