From 52411bfabda0c0700608f9a1b057eacdb9535781 Mon Sep 17 00:00:00 2001 From: plugwash Date: Mon, 13 Apr 2009 00:16:07 +0000 Subject: [PATCH] fix screwup in previous commit git-svn-id: file:///svnroot/lcore/trunk@46 b1de8a11-f9be-4011-bde0-cc7ace90066a --- dnswin.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/dnswin.pas b/dnswin.pas index 573c888..9f66cda 100755 --- a/dnswin.pas +++ b/dnswin.pas @@ -233,7 +233,7 @@ var getnameinforesult : integer; begin - makeinaddrv(sa,ip); + makeinaddrv(ip,'1',sa); populateprocvars; setlength(result,1025); getnameinforesult := getnameinfo(@sa,sizeof(tinetsockaddrv),pchar(result),length(result),nil,0,0); -- 2.30.2