100ms auto connect timeout

2014-01-17 10:59:25 +01:00 · 2014-01-17 10:59:25 +01:00 · c4adeb8e10
commit c4adeb8e10
parent ea489db31c
1 changed files with 1 additions and 0 deletions
--- a/IdHTTPWebsocketClient.pas
+++ b/IdHTTPWebsocketClient.pas
@ -325,6 +325,7 @@ begin
        if (IOHandler <> nil) then
          IOHandler.Clear;

+        Self.ConnectTimeout := 100;
        Self.Connect;
        TryUpgradeToWebsocket;
      except