amend to [2641672fff], guarantees a delay to cause a timeout definitely + switch delay-argument from post to get (it expects delay in query string of url)

1 files changed, 1 insertions, 1 deletions

diff --git a/tests/httpd b/tests/httpd
index 9fd23e7..682556b 100644
--- a/tests/httpd
+++ b/tests/httpd
@@ -69,7 +69,7 @@ proc httpdRead { sock } {
 	    httpd_log $sock Error "bad first line:$line"
 	    httpdSockDone $sock
 	}
-	if {[regexp {[\?&]delay=([^&]+)} val]} {
+	if {[regexp {(?:^|[\?&])delay=([^&]+)} $data(query) {} val]} {
 	    fileevent $sock readable {}
 	    after $val [list fileevent $sock readable [list httpdRead $sock]]
 	}