From 0c7e1d806dd19fd59c3511fcdab322478e1d1bfd Mon Sep 17 00:00:00 2001
From: "Paul \"LeoNerd\" Evans" <leonerd@leonerd.org.uk>
Date: Thu, 25 Nov 2010 18:19:29 +0000
Subject: [PATCH] Adjust unit tests to cope with new sockaddr_in6 functions in
 Socket (pulled in via IO::Socket)

---
 ext/B/t/concise-xs.t | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ext/B/t/concise-xs.t b/ext/B/t/concise-xs.t
index 68abad1..9b42325 100644
--- a/ext/B/t/concise-xs.t
+++ b/ext/B/t/concise-xs.t
@@ -213,12 +213,13 @@ my $testpkgs = {
 			     register_domain recv protocol peername
 			     new listen import getsockopt croak
 			     connected connect configure confess close
-			     carp bind atmark accept
+			     carp bind atmark accept sockaddr_in6
 			     /, $] > 5.009 ? ('blocking') : () ],
 
 		    XS => [qw/ unpack_sockaddr_un unpack_sockaddr_in
 			   sockatmark sockaddr_family pack_sockaddr_un
 			   pack_sockaddr_in inet_ntoa inet_aton
+			   unpack_sockaddr_in6 pack_sockaddr_in6
 			   /],
             # skip inet_ntop and inet_pton as they're not exported by default
 		},
-- 
1.8.3.1