mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-06-10 15:58:35 +02:00
* Remove debug statement
git-svn-id: trunk@27542 -
This commit is contained in:
parent
b9af57b97a
commit
352f7cf47b
@ -414,7 +414,6 @@ begin
|
|||||||
FLastError := 0;
|
FLastError := 0;
|
||||||
FSSLLastErrorString:='';
|
FSSLLastErrorString:='';
|
||||||
repeat
|
repeat
|
||||||
Writeln(pchar(@buffer));
|
|
||||||
Result:=FSsl.Write(@Buffer,Count);
|
Result:=FSsl.Write(@Buffer,Count);
|
||||||
e:=FSsl.GetError(Result);
|
e:=FSsl.GetError(Result);
|
||||||
until Not (e in [SSL_ERROR_WANT_READ,SSL_ERROR_WANT_WRITE]);
|
until Not (e in [SSL_ERROR_WANT_READ,SSL_ERROR_WANT_WRITE]);
|
||||||
|
Loading…
Reference in New Issue
Block a user