From 490d1edddbdc645d015e8ad6debc72119d9de8db Mon Sep 17 00:00:00 2001 From: Pablo Saratxaga Date: Thu, 4 Jan 2001 18:40:23 +0000 Subject: fixed the functions doing the lists of languages --- perl-install/install_any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index cab5fec86..7f8383bd7 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -310,7 +310,7 @@ sub setPackages { $o->{compssUsersChoice}{SYSTEM} = 1; $o->{compssUsersChoice}{$_} = 1 foreach map { @{$o->{compssUsers}{$_}} } @{$o->{compssUsersSorted}}; - foreach (@{lang::unpack_langs(lang::pack_langs($o->{langs}))}) { + foreach (@{lang::unpack_lang_codes(lang::pack_langs($o->{langs}))}) { push @{$o->{default_packages}}, pkgs::packageByName($o->{packages}, "locales-$_") || next; $o->{compssUsersChoice}{qq(LOCALES"$_")} = 1; } -- cgit v1.2.1