fix line endings

[lcore.git] / dnsasync.pas

diff --git a/dnsasync.pas b/dnsasync.pas
index a8e1aa654b6d56778f3b9c9c11c3062bc534d4d8..fab858d5033ac969c72580652e85f97b0908c036 100755 (executable)
--- a/dnsasync.pas
+++ b/dnsasync.pas
@@ -100,14 +100,14 @@ var
   socketno : integer;\r
 begin\r
   for socketno := 0 to numsock -1 do begin\r
-    if assigned(sockets[socketno]) then begin
+    if assigned(sockets[socketno]) then begin\r
       if dnsserverids[socketno] >= 0 then begin\r
         reportlag(dnsserverids[socketno],-1);\r
         dnsserverids[socketno] := -1;\r
       end;\r
       sockets[socketno].release;\r
       setstate_request_init('',states[socketno]);\r
-    end;
+    end;\r
   end;\r
   inherited destroy;\r
 end;\r