EReadTimeout fixed

2014-01-17 15:30:09 +01:00 · 2014-01-17 15:30:09 +01:00 · e1d2ad094b
parent c712228bbc
commit e1d2ad094b
1 changed files with 2 additions and 0 deletions
--- a/IdIOHandlerWebsocket.pas
+++ b/IdIOHandlerWebsocket.pas
@ -545,6 +545,8 @@ end;

 function TIdIOHandlerWebsocket.Readable(AMSec: Integer): Boolean;
 begin
+  if FWSInputBuffer.Size > 0 then Exit(True);
+
  if not FSelectLock.TryEnter then Exit(False);
  try
    Result := inherited Readable(AMSec);