From ec95ff29a94bb30c34bcf16a2f445c4dcf708121 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 28 Mar 2006 18:20:09 +0000
Subject: (check_server_response) log all server answers

---
 mdkonline.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/mdkonline.pm b/mdkonline.pm
index 9a1e44d6..11c3c930 100644
--- a/mdkonline.pm
+++ b/mdkonline.pm
@@ -200,6 +200,7 @@ sub check_server_response {
     my $code = $response->{code} || '99';
     my $answer = $response->{code} eq 0 ? 'OK' : $hash_ret->{$code}[0] . ' : ' . $hash_ret->{$code}[1] . "\n\n" . $response->{message};
     $answer eq 'OK' and write_conf($response);
+    log::explanations(qq(the server returned "$answer"));
     return $answer;
     
 }
-- 
cgit v1.2.1