paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 17:49:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* initialize Result variable of THTTPSysHandler.WaitForRequest

Browse Source
This commit is contained in:
Sven Barth 2021-09-06 22:36:29 +02:00
parent 4acf8d36b8
commit 2650049b2c
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-web/src/base/custhttpsys.pp
View File

@ -635,6 +635,8 @@ var
readsize: ULONG;
res: ULONG;
begin
Result := False;
if not Assigned(fBuffer) then begin
InitUrls;