X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/a83971b64b0b20f6774cf3ccedd05202ad0bdb0e..27e903c56380abcb11b5a0b8d7ccab88a14b5cde:/dnswin.pas

diff --git a/dnswin.pas b/dnswin.pas
index 847f0fd..567ea68 100644
--- a/dnswin.pas
+++ b/dnswin.pas
@@ -21,7 +21,6 @@ type
   tdnswinasync=class(tthread)
   private
     freverse : boolean;
-    error : integer;
     freewhendone : boolean;
     hadevent : boolean;
   protected
@@ -88,6 +87,7 @@ var
   hostent : phostent;
   addrlist:^pointer;
 begin
+  output := nil;
   if hints.ai_family <> af_inet6 then begin
     result := 0;
 
@@ -264,6 +264,7 @@ begin
     if assigned (dwas.onrequestdone) then dwas.onrequestdone(dwas,awparam);
     dwas.hadevent := true;
     if dwas.freewhendone then dwas.free;
+    result := 0; {added returning 0 when handling --beware}
   end else begin
     //not passing unknown messages on to defwindowproc will cause window
     //creation to fail! --plugwash