Mercurial > hg > nginx-tests

comparison dav_chunked.t @ 317:a9621dbbd0d4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 8dac281ff522
children 9d0a2fa47ac6
comparison
equal deleted inserted replaced
316:f36c3532a117 317:a9621dbbd0d4
53 53
54 $t->run(); 54 $t->run();
55 55
56 ############################################################################### 56 ###############################################################################
57 57
58 TODO: {
59 local $TODO = 'not yet' unless $t->has_version('1.3.9');
60
61 my $r; 58 my $r;
62 59
63 $r = http(<<EOF); 60 $r = http(<<EOF);
64 PUT /file HTTP/1.1 61 PUT /file HTTP/1.1
65 Host: localhost 62 Host: localhost
100 EOF 97 EOF
101 98
102 like($r, qr/204 No Content/, 'put chunked big'); 99 like($r, qr/204 No Content/, 'put chunked big');
103 is(read_file($t->testdir() . '/file'), '1234567890' x 1024, 'put big content'); 100 is(read_file($t->testdir() . '/file'), '1234567890' x 1024, 'put big content');
104 101
105 }
106
107 ############################################################################### 102 ###############################################################################
108 103
109 sub read_file { 104 sub read_file {
110 my ($file) = @_; 105 my ($file) = @_;
111 open FILE, $file 106 open FILE, $file