From 6cceefeb89af8318dc50aacb34cab71ab63cc7d6 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 5 Dec 2006 19:32:24 +0000 Subject: (send_conf_via_soap) the server expect a 2 letters ISO code, not country's full name --- mdkonline | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'mdkonline') diff --git a/mdkonline b/mdkonline index 8959c96a..a83365af 100755 --- a/mdkonline +++ b/mdkonline @@ -33,7 +33,6 @@ use wizards; use lang; use Getopt::Long; -use Encode qw(encode); BEGIN { unshift @::textdomains, 'mdkonline', 'drakfirstboot' } @@ -113,8 +112,7 @@ sub get_conf() { sub send_conf_via_soap { my ($login, $password, $boxname, $descboxname, $country) = @_; my $_w = $in->wait_message(N("Please wait"), N("Reading configuration\n")) if $ia; - my $country = encode("UTF-8", $country); - my $reg_host = mdkonline::register_upload_host($login, $password, $boxname, $descboxname, $country); + my $reg_host = mdkonline::register_upload_host($login, $password, $boxname, $descboxname, $locale->{country}); } my $wiz = -- cgit v1.2.1