diff options
Diffstat (limited to 'perl-install/install_any.pm')
| -rw-r--r-- | perl-install/install_any.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 3686893b8..dd3c5431d 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -328,9 +328,10 @@ sub setPackages { foreach (map { substr($_, 0, 2) } lang::langs($o->{langs})) { pkgs::packageByName($o->{packages}, "locales-$_") or next; push @{$o->{default_packages}}, "locales-$_"; + } + foreach (lang::langs($o->{langs})) { $o->{compssUsersChoice}{qq(LOCALES"$_")} = 1; } - #- for the first time, select package to upgrade. #- TOCHECK this may not be the best place for that as package are selected at some other point. $o->selectPackagesToUpgrade if $o->{isUpgrade}; |