diff options
author | Thierry Vignaud <tv@mandriva.org> | 2008-08-18 12:45:24 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2008-08-18 12:45:24 +0000 |
commit | 9c3d8a5a3398fc4495296f6f30acd2c967397ff6 (patch) | |
tree | 17ff12ac406c8d82cb5cbf5560b363d7416124f5 /perl-install | |
parent | 437db384617efd6241a83b50f1391c9b82f22105 (diff) | |
download | drakx-9c3d8a5a3398fc4495296f6f30acd2c967397ff6.tar drakx-9c3d8a5a3398fc4495296f6f30acd2c967397ff6.tar.gz drakx-9c3d8a5a3398fc4495296f6f30acd2c967397ff6.tar.bz2 drakx-9c3d8a5a3398fc4495296f6f30acd2c967397ff6.tar.xz drakx-9c3d8a5a3398fc4495296f6f30acd2c967397ff6.zip |
(default_packages) fix selecting locales-XX for locales that specify
scripting (#42663)
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install/NEWS | 1 | ||||
-rw-r--r-- | perl-install/install/any.pm | 4 |
2 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index bf9986d43..c8c14ecd3 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,5 +1,6 @@ - 2009.0 beta 2 logo - l10n: + o fix selecting locales-XX for locales that specify scripting (#42663) o update list of locales o update list of KDE languages for KDE4 diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm index cee100845..9eef9b195 100644 --- a/perl-install/install/any.pm +++ b/perl-install/install/any.pm @@ -530,7 +530,9 @@ sub default_packages { push @l, uniq(grep { $_ } map { fs::format::package_needed_for_partition_type($_) } @{$o->{fstab}}); push @l, 'ntfs-3g' if any { $_->{fs_type} eq 'ntfs-3g' } @{$o->{fstab}}; - my @locale_pkgs = map { URPM::packages_providing($o->{packages}, 'locales-' . $_) } lang::langsLANGUAGE($o->{locale}{langs}); + # handle locales with specified scripting: + my @languages = map { s/\@.*//; $_ } lang::langsLANGUAGE($o->{locale}{langs}); + my @locale_pkgs = map { URPM::packages_providing($o->{packages}, 'locales-' . $_) } @languages; unshift @l, uniq(map { $_->name } @locale_pkgs); @l; |