Mercurial > hg > nginx-tests

comparison access.t @ 292:2da774b0fc7d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: skip access.t on platforms without ipv6 support.
author Sergey Kandaurov <pluknet@nginx.com>
date Fri, 31 May 2013 20:26:31 +0400
parents 03d5be12bc3b
children c28ecaef065f
comparison
equal deleted inserted replaced
291:03d5be12bc3b 292:2da774b0fc7d
24 select STDOUT; $| = 1; 24 select STDOUT; $| = 1;
25 25
26 my $t = Test::Nginx->new()->has(qw/http proxy access ipv6/); 26 my $t = Test::Nginx->new()->has(qw/http proxy access ipv6/);
27 27
28 plan(skip_all => 'new syntax "unix:"') unless $t->has_version('1.5.1'); 28 plan(skip_all => 'new syntax "unix:"') unless $t->has_version('1.5.1');
29 plan(skip_all => 'win32') if $^O eq 'MSWin32';
30 29
31 $t->plan(12)->write_file_expand('nginx.conf', <<'EOF'); 30 $t->write_file_expand('nginx.conf', <<'EOF');
32 31
33 %%TEST_GLOBALS%% 32 %%TEST_GLOBALS%%
34 33
35 daemon off; 34 daemon off;
36 35
81 } 80 }
82 } 81 }
83 82
84 EOF 83 EOF
85 84
86 $t->run(); 85 eval {
86 open OLDERR, ">&", \*STDERR; close STDERR;
87 $t->run();
88 open STDERR, ">&", \*OLDERR;
89 };
90 plan(skip_all => 'no inet6 and/or unix support') if $@;
91
92 $t->plan(12);
87 93
88 ############################################################################### 94 ###############################################################################
89 95
90 # tests with inet socket 96 # tests with inet socket
91 97