X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/52411bfabda0c0700608f9a1b057eacdb9535781..a688d5e42f5131d40b38ab4bb9d98329cb898578:/dnswin.pas diff --git a/dnswin.pas b/dnswin.pas old mode 100755 new mode 100644 index 9f66cda..e9c2a16 --- a/dnswin.pas +++ b/dnswin.pas @@ -233,7 +233,7 @@ var getnameinforesult : integer; begin - makeinaddrv(ip,'1',sa); + makeinaddrv(ip,'1',sa); populateprocvars; setlength(result,1025); getnameinforesult := getnameinfo(@sa,sizeof(tinetsockaddrv),pchar(result),length(result),nil,0,0);