X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/52411bfabda0c0700608f9a1b057eacdb9535781..f8e139db970666e906db30417763f81e2ae5e801:/dnswin.pas?ds=sidebyside 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);