(send_conf_via_soap) the server expect a 2 letters ISO code, not

country's full name

1 files changed, 1 insertions, 3 deletions

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 =