diff options
author | Glenn Strauss <gstrauss@gluelogic.com> | 2020-10-10 20:02:23 -0400 |
---|---|---|
committer | Glenn Strauss <gstrauss@gluelogic.com> | 2020-10-19 21:40:14 -0400 |
commit | dc51e9d61c1799892c2c9d5a8582905249f3951c (patch) | |
tree | 108bba063db841a64116c383b021331e35962617 | |
parent | 96abd9cfb886679ce85e9cb94ff45a7c42def30a (diff) | |
download | lighttpd-git-dc51e9d61c1799892c2c9d5a8582905249f3951c.tar.gz |
[tests] simulate slow, small packets more quickly
simulate slow, small packets more quickly
1ms between chars is plenty slow; 100ms is excessive
fixup
-rw-r--r-- | tests/LightyTest.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/LightyTest.pm b/tests/LightyTest.pm index baad6d99..5b5d60af 100644 --- a/tests/LightyTest.pm +++ b/tests/LightyTest.pm @@ -234,15 +234,15 @@ sub handle_http { print $remote $_; diag("<< ".$_."\n") if $is_debug; - select(undef, undef, undef, 0.1); + select(undef, undef, undef, 0.001); print $remote "\015"; - select(undef, undef, undef, 0.1); + select(undef, undef, undef, 0.001); print $remote "\012"; - select(undef, undef, undef, 0.1); + select(undef, undef, undef, 0.001); print $remote "\015"; - select(undef, undef, undef, 0.1); + select(undef, undef, undef, 0.001); print $remote "\012"; - select(undef, undef, undef, 0.1); + select(undef, undef, undef, 0.001); } } |