From d37842ebe0e150119c4d54b7520d09f35c8c571d Mon Sep 17 00:00:00 2001 From: Todd Lyons Date: Mon, 4 Jun 2012 06:05:29 -0700 Subject: [PATCH] Test system - parse ipv6 addresses with no :: in them. --- test/runtest | 2 ++ 1 file changed, 2 insertions(+) diff --git a/test/runtest b/test/runtest index aa242d589..b88e71e60 100755 --- a/test/runtest +++ b/test/runtest @@ -3104,6 +3104,8 @@ if ($have_ipv6 && $parm_ipv6 ne "::1") $exp_v6 = $1 . ':0' x (8-length($exp_v6)) . ':' . $2; } elsif ( $parm_ipv6 =~ /^::(.+[^:])$/ ) { $exp_v6 = '0:' x (9-length($exp_v6)) . $1; + } else { + $exp_v6 = $parm_ipv6; } my(@components) = split /:/, $exp_v6; my(@nibbles) = reverse (split /\s*/, shift @components); -- 2.30.2