X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/2f03297fba2a10dbc860018fac7ad07c83b08ce8..2d2676149292e4e388bb102a41a3d64349ac88ed:/dnsasync.pas diff --git a/dnsasync.pas b/dnsasync.pas index a8e1aa6..fab858d 100755 --- a/dnsasync.pas +++ b/dnsasync.pas @@ -100,14 +100,14 @@ var socketno : integer; begin for socketno := 0 to numsock -1 do begin - if assigned(sockets[socketno]) then begin + if assigned(sockets[socketno]) then begin if dnsserverids[socketno] >= 0 then begin reportlag(dnsserverids[socketno],-1); dnsserverids[socketno] := -1; end; sockets[socketno].release; setstate_request_init('',states[socketno]); - end; + end; end; inherited destroy; end;