X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/842bb1621ab7617fe2f47da159d89ac513fbd6e2..ac55319310f2e0b8ac5d848c1591b5e72d49c9b3:/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;