diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-02-18 15:29:36 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-02-18 15:29:36 +0000 |
| commit | e0d64fdf2b5e6e16b6037a85dfc1cb38f4848336 (patch) | |
| tree | 84717120d56231c9f15b95dfa6c2cb89566ac850 /perl-install/lang.pm | |
| parent | 3ae38cbfb9cd8ef428ade8f6355f504e7e368ff1 (diff) | |
| download | drakx-e0d64fdf2b5e6e16b6037a85dfc1cb38f4848336.tar drakx-e0d64fdf2b5e6e16b6037a85dfc1cb38f4848336.tar.gz drakx-e0d64fdf2b5e6e16b6037a85dfc1cb38f4848336.tar.bz2 drakx-e0d64fdf2b5e6e16b6037a85dfc1cb38f4848336.tar.xz drakx-e0d64fdf2b5e6e16b6037a85dfc1cb38f4848336.zip | |
(lang2kde_lang): add missing valid_kde_langs
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 36993fe4e..a6be76621 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -479,7 +479,9 @@ sub country2lang { sub lang2kde_lang { my ($lang, $default) = @_; - my @valid_kde_langs = qw(C ca cs da de el en es et fi fr he hu is it ja ko nl no no_NY pl pt pt_BR ro ru sk sr sv tr uk zh_CN.GB2312 zh_TW.Big5); + #- get it using + #- echo C $(rpm -qp --qf "%{name}\n" /RPMS/kde-i18n-* | sed 's/kde-i18n-//') + my @valid_kde_langs = qw(C af az bg ca cs da de el en_GB eo es et fi fr he hu is it ja ko lt lv mt nl no no_NY pl pt pt_BR ro ru sl sk sr sv ta th tr uk xh zh_CN.GB2312 zh_TW.Big5); my %valid_kde_langs; @valid_kde_langs{@valid_kde_langs} = (); my $valid_lang = sub { |