comparison body_chunked.t @ 317:a9621dbbd0d4

Tests: remove TODOs with 1.3.x version checks.
author Maxim Dounin <mdounin@mdounin.ru>
date Tue, 23 Jul 2013 20:25:05 +0400
parents 970bb423e59f
children 202de1d281e5
comparison
equal deleted inserted replaced
316:f36c3532a117 317:a9621dbbd0d4
97 97
98 $t->run(); 98 $t->run();
99 99
100 ############################################################################### 100 ###############################################################################
101 101
102 TODO: {
103 local $TODO = 'not yet' unless $t->has_version('1.3.9');
104
105 like(http_get_body('/', '0123456789'), 102 like(http_get_body('/', '0123456789'),
106 qr/X-Body: 0123456789\x0d?$/ms, 'body'); 103 qr/X-Body: 0123456789\x0d?$/ms, 'body');
107 104
108 like(http_get_body('/', '0123456789' x 128), 105 like(http_get_body('/', '0123456789' x 128),
109 qr/X-Body: (0123456789){128}\x0d?$/ms, 'body in two buffers'); 106 qr/X-Body: (0123456789){128}\x0d?$/ms, 'body in two buffers');
133 130
134 # proxy_next_upstream 131 # proxy_next_upstream
135 132
136 like(http_get_body('/next', '0123456789'), 133 like(http_get_body('/next', '0123456789'),
137 qr/X-Body: 0123456789\x0d?$/ms, 'body chunked next upstream'); 134 qr/X-Body: 0123456789\x0d?$/ms, 'body chunked next upstream');
138
139 }
140 135
141 ############################################################################### 136 ###############################################################################
142 137
143 sub read_body_file { 138 sub read_body_file {
144 my ($r) = @_; 139 my ($r) = @_;