Mercurial > hg > nginx-tests

comparison http-server-name.t @ 115:cb1b04d8de29

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: server name regexps are handled correctly in 0.8.29.
author Maxim Dounin <mdounin@mdounin.ru>
date Tue, 01 Dec 2009 19:29:48 +0300
parents 44b281ac4bc6
children 8ac1faaddd2c
comparison
equal deleted inserted replaced
114:44b281ac4bc6 115:cb1b04d8de29
19 ############################################################################### 19 ###############################################################################
20 20
21 select STDERR; $| = 1; 21 select STDERR; $| = 1;
22 select STDOUT; $| = 1; 22 select STDOUT; $| = 1;
23 23
24 my $t = Test::Nginx->new()->has('rewrite') 24 my $t = Test::Nginx->new()->has('rewrite')->plan(9)
25 ->write_file_expand('nginx.conf', <<'EOF'); 25 ->write_file_expand('nginx.conf', <<'EOF');
26 26
27 %%TEST_GLOBALS%% 27 %%TEST_GLOBALS%%
28 28
29 master_process off; 29 master_process off;
88 } 88 }
89 } 89 }
90 90
91 EOF 91 EOF
92 92
93 eval {
94
95 $t->run(); 93 $t->run();
96
97 };
98
99 if ($@) {
100 plan(skip_all => 'not patched yet');
101 }
102
103 $t->plan(9);
104 94
105 ############################################################################### 95 ###############################################################################
106 96
107 sub http_server($) { 97 sub http_server($) {
108 my ($host) = @_; 98 my ($host) = @_;