From c306c5006a1ebe61cf804e57ff4033a888689007 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 15 Feb 2003 01:01:03 +0000 Subject: fix gc's typo --- perl-install/install_any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 6a7e2ee4c..50cdb648f 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -397,7 +397,7 @@ sub setDefaultPackages { push @{$o->{default_packages}}, "locales-$_"; $o->{compssUsersChoice}{qq(LOCALES"$_")} = 1; #- mainly for zh in case of zh_TW.Big5 } - push @{$o->{default_packages}}, 'locales-' . substr(lang::c2locale($o->{locale}{country}, 0, 2)); + push @{$o->{default_packages}}, 'locales-' . substr(lang::c2locale($o->{locale}{country}), 0, 2); foreach (lang::langsLANGUAGE($o->{locale}{langs})) { $o->{compssUsersChoice}{qq(LOCALES"$_")} = 1; } -- cgit v1.2.1