From: Michael Tremer Date: Sun, 23 Jun 2013 20:42:04 +0000 (+0200) Subject: DNS check: Only use the IPv4 version. X-Git-Tag: v2.13-core70~11^2 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=0aa0cdcde0a2d7d8963bb951c0f21fd1aebb58dd;p=people%2Fms%2Fipfire-2.x.git DNS check: Only use the IPv4 version. --- diff --git a/config/cfgroot/general-functions.pl b/config/cfgroot/general-functions.pl index 9c6d460e66..b1b47abcb0 100644 --- a/config/cfgroot/general-functions.pl +++ b/config/cfgroot/general-functions.pl @@ -858,7 +858,7 @@ sub FetchPublicIp { Net::SSLeay::set_proxy($peer,$peerport,$proxysettings{'UPSTREAM_USER'},$proxysettings{'UPSTREAM_PASSWORD'} ); } my $user_agent = &MakeUserAgent(); - my ($out, $response) = Net::SSLeay::get_http( 'checkip.dns.lightningwirelabs.com', + my ($out, $response) = Net::SSLeay::get_http( 'checkip4.dns.lightningwirelabs.com', 80, "/", Net::SSLeay::make_headers('User-Agent' => $user_agent )