summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-08-05 16:17:43 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-08-05 16:17:43 +0000
commite5a66e073f26536a114b633504c475b5b1b8c845 (patch)
tree2bf3e6ab1088a37f3609f127f11bc9cc2ebf87f7 /perl-install
parent2fb7069b06ed67dd299c09d3c36529ad053478de (diff)
downloaddrakx-e5a66e073f26536a114b633504c475b5b1b8c845.tar
drakx-e5a66e073f26536a114b633504c475b5b1b8c845.tar.gz
drakx-e5a66e073f26536a114b633504c475b5b1b8c845.tar.bz2
drakx-e5a66e073f26536a114b633504c475b5b1b8c845.tar.xz
drakx-e5a66e073f26536a114b633504c475b5b1b8c845.zip
fix an old typo
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 4eaa6f7e3..01f52337f 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -719,7 +719,7 @@ sub selectCountry {
[ if_(@best, { val => \$country, type => 'list', format => \&lang::c2name,
list => \@best, sort => 1 }),
{ val => \$ext_country, type => 'list', format => \&lang::c2name,
- list => [ difference2(\@countries, \@best) ], advanced => @best }
+ list => [ difference2(\@countries, \@best) ], advanced => scalar(@best) }
]) or return;
$locale->{country} = $other || !@best ? $ext_country : $country;