2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 23:06:37 +00:00

HttpUtils.pm: fixing gethostbyname (Forum #53406)

git-svn-id: https://svn.fhem.de/fhem/trunk@11517 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
rudolfkoenig 2016-05-25 19:50:14 +00:00
parent ab0dcca5d5
commit aadb8bf44e

View File

@ -136,9 +136,9 @@ HttpUtils_gethostbyname($$$)
my $iaddr = inet_aton($host);
my $err;
if(!defined($iaddr)) {
my @addr = gethostbyname($host); # This is still blocking
$err = ($addr[0] ? undef : "gethostbyname $host failed");
$iaddr = $addr[4];
$iaddr = gethostbyname($host); # This is still blocking
$err = (($iaddr && length($iaddr)==4) ?
undef : "gethostbyname $host failed");
}
$fn->($hash, $err, $iaddr);
return;