comparison proxy_store.t @ 236:5ac875a3088e

Tests: improve proxy_store.t timeouts a bit. Now we wait a bit more on slow hosts to avoid spurious failures.
author Maxim Dounin <mdounin@mdounin.ru>
date Tue, 25 Sep 2012 18:53:03 +0400
parents 1a5574d84917
children 6a0d934950bc
comparison
equal deleted inserted replaced
235:8d58b624a142 236:5ac875a3088e
81 } 81 }
82 82
83 ok(scalar @{[ glob $t->testdir() . '/proxy_temp/*' ]} == 0, 'no temp files'); 83 ok(scalar @{[ glob $t->testdir() . '/proxy_temp/*' ]} == 0, 'no temp files');
84 84
85 http_get('/store-index-big.html', aborted => 1, sleep => 0.1); 85 http_get('/store-index-big.html', aborted => 1, sleep => 0.1);
86
86 select(undef, undef, undef, 0.5); 87 select(undef, undef, undef, 0.5);
88 select(undef, undef, undef, 2.5)
89 if scalar @{[ glob $t->testdir() . '/proxy_temp/*' ]};
87 90
88 ok(scalar @{[ glob $t->testdir() . '/proxy_temp/*' ]} == 0, 91 ok(scalar @{[ glob $t->testdir() . '/proxy_temp/*' ]} == 0,
89 'no temp files after aborted request'); 92 'no temp files after aborted request');
90 93
91 http_get('/ssi.html', aborted => 1, sleep => 0.1); 94 http_get('/ssi.html', aborted => 1, sleep => 0.1);
95
92 select(undef, undef, undef, 0.5); 96 select(undef, undef, undef, 0.5);
97 select(undef, undef, undef, 2.5)
98 if scalar @{[ glob $t->testdir() . '/proxy_temp/*' ]};
93 99
94 ok(scalar @{[ glob $t->testdir() . '/proxy_temp/*' ]} == 0, 100 ok(scalar @{[ glob $t->testdir() . '/proxy_temp/*' ]} == 0,
95 'no temp files after aborted ssi'); 101 'no temp files after aborted ssi');
96 102
97 ############################################################################### 103 ###############################################################################