diff options
| author | Daouda Lo <daouda@mandriva.com> | 2004-10-01 07:32:20 +0000 |
|---|---|---|
| committer | Daouda Lo <daouda@mandriva.com> | 2004-10-01 07:32:20 +0000 |
| commit | 38c16f6a4ddbc5f3e20889e661e9dd495ebc709d (patch) | |
| tree | 2af66dcba0e73476db7b05c8228b4104cd352141 /mdkonline_tui | |
| parent | 75fdaeecf684eb9731d72840368daae8e9b93bfd (diff) | |
| download | mgaonline-38c16f6a4ddbc5f3e20889e661e9dd495ebc709d.tar mgaonline-38c16f6a4ddbc5f3e20889e661e9dd495ebc709d.tar.gz mgaonline-38c16f6a4ddbc5f3e20889e661e9dd495ebc709d.tar.bz2 mgaonline-38c16f6a4ddbc5f3e20889e661e9dd495ebc709d.tar.xz mgaonline-38c16f6a4ddbc5f3e20889e661e9dd495ebc709d.zip | |
- fixed format interactive
Diffstat (limited to 'mdkonline_tui')
| -rwxr-xr-x | mdkonline_tui | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mdkonline_tui b/mdkonline_tui index 4e6334f8..8cc3212d 100755 --- a/mdkonline_tui +++ b/mdkonline_tui @@ -52,6 +52,7 @@ my $choice = $choices{account}; my ($wiz, $login, $nlogin, $password, $npassword, $boxname, $cfmpassword, $email, $is_success, $key, $r, $createaccount, $sendconfres, $country); my %countries = map { lang::c2name($_) => $_ } lang::list_countries(); +$country = lang::c2name(lang::read('', $>)->{country}); sub read_conf() { my $wideconf = '/etc/sysconfig/mdkonline'; @@ -171,8 +172,7 @@ $wiz = { data => sub { if ($sendconfres eq 'TRUE' && $key) { [ - { label => N("Country"), val => \$country, format => \&lang::c2name(lang::read('', $>)->{country}) , type => "combo", - list => [ sort keys %countries ], not_edit => 0 } + { label => N("Country"), val => \$country, type => "combo", list => [ sort keys %countries ], not_edit => 0 } ] } }, |