summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2003-10-15 17:17:46 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2003-10-15 17:17:46 +0000
commitd9595379deacc6aadf8e8049c5c01e50ff5b3dc7 (patch)
tree8cbf79bfb9f1792b8ecc45a579656fcfc128ad91 /perl-install
parent5ee4800d3a457d276a6955ab25344eabf6ee60e9 (diff)
downloaddrakx-d9595379deacc6aadf8e8049c5c01e50ff5b3dc7.tar
drakx-d9595379deacc6aadf8e8049c5c01e50ff5b3dc7.tar.gz
drakx-d9595379deacc6aadf8e8049c5c01e50ff5b3dc7.tar.bz2
drakx-d9595379deacc6aadf8e8049c5c01e50ff5b3dc7.tar.xz
drakx-d9595379deacc6aadf8e8049c5c01e50ff5b3dc7.zip
sorting according to transliteration in languages-selection-as-images is broken, can't remember if I did that special on purpose, seems it was just dumb from me, nothing more
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 2a8ca998b..e33aeb1fb 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -686,7 +686,7 @@ sub selectLanguage {
my @langs = map { my $l = $_; uniq_ { $_->[0] } map { [ ($::move ? $l : "$_|$l"), $_, $l ] } lang::l2location($l) } lang::list_langs();
#- since gtk version will use images (function image2f) we need to sort differently
my $sort_func = $using_images ? \&lang::l2transliterated : \&lang::l2name;
- @langs = map { $_->[0] } sort { $a->[1] cmp $b->[1] || $sort_func->($a->[2]) cmp $sort_func->($b->[2]) } @langs;
+ @langs = map { $_->[0] } sort { $sort_func->($a->[2]) cmp $sort_func->($b->[2]) } @langs;
add2hash($common, { cancel => '',
advanced_messages => formatAlaTeX(N("Mandrake Linux can support multiple languages. Select