summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2001-02-07 17:17:07 +0000
committerFrancois Pons <fpons@mandriva.com>2001-02-07 17:17:07 +0000
commit0e7736e6833b2b692dec32a13b8f8493821f5534 (patch)
treeb33ce86a60a31f8eb039587a28e2acc1e89b4028 /perl-install/install_any.pm
parent19b70bd0538e2dae570096b24e8a3336b4f462b4 (diff)
downloaddrakx-0e7736e6833b2b692dec32a13b8f8493821f5534.tar
drakx-0e7736e6833b2b692dec32a13b8f8493821f5534.tar.gz
drakx-0e7736e6833b2b692dec32a13b8f8493821f5534.tar.bz2
drakx-0e7736e6833b2b692dec32a13b8f8493821f5534.tar.xz
drakx-0e7736e6833b2b692dec32a13b8f8493821f5534.zip
fixed unknown package ARRAY... and locales selection according to langs.
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index e2089b2aa..1094d82a1 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -311,7 +311,8 @@ sub setPackages {
$o->{compssUsersChoice}{SYSTEM} = 1;
foreach (map { substr($_, 0, 2) } lang::langs($o->{langs})) {
- push @{$o->{default_packages}}, pkgs::packageByName($o->{packages}, "locales-$_") || next;
+ pkgs::packageByName($o->{packages}, "locales-$_") or next;
+ push @{$o->{default_packages}}, "locales-$_";
$o->{compssUsersChoice}{qq(LOCALES"$_")} = 1;
}