# HG changeset patch # User Sergey Kandaurov # Date 1463065431 -10800 # Node ID 54680c434afae585d73f64f231e29cbba5c9abe8 # Parent 9239393e73c8e6b91b96bc38f99a655f142e6a8b Tests: fixed proxy.t on platforms without IPv6 support. diff -r 9239393e73c8 -r 54680c434afa proxy.t --- a/proxy.t Thu May 12 14:07:10 2016 +0300 +++ b/proxy.t Thu May 12 18:03:51 2016 +0300 @@ -11,6 +11,8 @@ use Test::More; +use Socket; + BEGIN { use FindBin; chdir($FindBin::Bin); } use lib 'lib'; @@ -72,7 +74,8 @@ like(http_get('/var?b=u/'), qr/SEE-THIS/, 'proxy with variables to upstream'); SKIP: { -skip 'no ipv6', 1 unless $t->has_module('ipv6'); +skip 'no ipv6', 1 unless $t->has_module('ipv6') + and socket(my $s, &AF_INET6, &SOCK_STREAM, 0); TODO: { todo_skip 'heap-buffer-overflow', 1