diff --git a/blcksock.pas b/blcksock.pas
index 075ae6f..ca1b679 100644
--- a/blcksock.pas
+++ b/blcksock.pas
@@ -3904,7 +3904,7 @@ begin
       FHTTPTunnel := s[10] = '2';
   until (s = '') or (s = #$0d);
   if (FLasterror = 0) and not FHTTPTunnel then
-    FLastError := WSASYSNOTREADY;
+    FLastError := WSAECONNREFUSED;
   FHTTPTunnelRemoteIP := IP;
   FHTTPTunnelRemotePort := Port;
   ExceptCheck;