summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-07-08 05:20:51 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-07-08 05:20:51 +0000
commitce235aeb8dcbb0ef6934602602c78b915c97574c (patch)
tree30420a51d43ab4f886e7db08493417716ea3717b
parentc5b9c52a2e49c0d109d72b87c8adda657cf5ee1a (diff)
downloaddrakx-backup-do-not-use-ce235aeb8dcbb0ef6934602602c78b915c97574c.tar
drakx-backup-do-not-use-ce235aeb8dcbb0ef6934602602c78b915c97574c.tar.gz
drakx-backup-do-not-use-ce235aeb8dcbb0ef6934602602c78b915c97574c.tar.bz2
drakx-backup-do-not-use-ce235aeb8dcbb0ef6934602602c78b915c97574c.tar.xz
drakx-backup-do-not-use-ce235aeb8dcbb0ef6934602602c78b915c97574c.zip
selectCountry doesn't really need a $o, a $in is enough
-rw-r--r--perl-install/any.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index f49318924..bc15a0da5 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -669,7 +669,7 @@ when your installation is complete and you restart your system.")),
}
sub selectCountry {
- my ($o, $locale) = @_;
+ my ($in, $locale) = @_;
my $country = $locale->{country};
my @countries = lang::list_countries(exclude_non_installed => !$::isInstall);
@@ -682,7 +682,7 @@ sub selectCountry {
my ($other, $ext_country);
member($country, @best) or ($ext_country, $country) = ($country, $ext_country);
- $o->ask_from_(
+ $in->ask_from_(
{ title => N("Country / Region"),
messages => N("Please choose your country."),
interactive_help_id => 'selectCountry',