freebsd fixups

[lcore.git] / dnsasync.pas

diff --git a/dnsasync.pas b/dnsasync.pas
old mode 100755 (executable)
new mode 100644 (file)
index a8e1aa6..fab858d
--- 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