Description: in IPv6 check, test for :1 instead of ::
Origin: vendor
Bug-Debian: https://bugs.debian.org/1127380
Forwarded: no
Author: gregor herrmann <gregoa@debian.org>
Last-Update: 2026-02-08

--- a/t/NetServerTest.pm
+++ b/t/NetServerTest.pm
@@ -15,9 +15,9 @@
 
 sub skip_without_ipv6 {
     my $err = "";
-    if (!eval { require IO::Socket::IP; IO::Socket::IP->new(LocalAddr=>"[::]",Listen=>1) or die ($@ || "IP CRASH $!") } and
+    if (!eval { require IO::Socket::IP; IO::Socket::IP->new(LocalAddr=>"[:1]",Listen=>1) or die ($@ || "IP CRASH $!") } and
         do { delete $INC{'IO/Socket/IP.pm'}; ($err=$@)=~s/\s*$//; 1 } and
-        !eval { require IO::Socket::INET6; IO::Socket::INET6->new(LocalAddr=>"[::]",Listen=>1)}) {
+        !eval { require IO::Socket::INET6; IO::Socket::INET6->new(LocalAddr=>"[:1]",Listen=>1)}) {
         my $reason = "SKIP ".(shift || "IPv6 is not supported");
         $reason .= "\nIP - $err" if $err;
         $reason .= "\nINET6 - $@" if $@;