[tests] simulate slow, small packets more quickly

simulate slow, small packets more quickly 1ms between chars is plenty slow; 100ms is excessive fixup
3 years ago · dc51e9d61c
parent 96abd9cfb8
commit dc51e9d61c
1 changed files with 5 additions and 5 deletions
--- 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);
 		}

 	}