From 552cd20ce85e7057b031b9ae95de6c273297ba28 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 1 Mar 2006 15:32:12 +0000 Subject: (check_server_response) fix returned error message --- mdkonline.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mdkonline.pm b/mdkonline.pm index e84161ef..7a9949ea 100644 --- a/mdkonline.pm +++ b/mdkonline.pm @@ -193,7 +193,7 @@ sub check_server_response { # print Dumper($response); my $code = $response->{code} || '99'; $response->{status} and write_conf($response); - return $response->{status} ? 'OK' : $hash_ret->{$code}[0] . ' : ' . $hash_ret->{$code}[1] . '\n\n' . $response->{message}; + return $response->{status} ? 'OK' : $hash_ret->{$code}[0] . ' : ' . $hash_ret->{$code}[1] . "\n\n" . $response->{message}; } sub check_valid_email { -- cgit v1.2.1