From df50b9ade238e19ef27748a4a037b384d70bdf0a Mon Sep 17 00:00:00 2001
From: sebres <sebres@users.sourceforge.net>
Date: Mon, 5 Sep 2022 10:30:34 +0000
Subject: closes [2641672fff], httpd - don't parse delay argument by error 400
 (wrong URI/proto)

---
 tests/httpd | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/tests/httpd b/tests/httpd
index 682556b..48e14ea 100644
--- a/tests/httpd
+++ b/tests/httpd
@@ -64,15 +64,15 @@ proc httpdRead { sock } {
 		-> data(proto) data(url) data(query) data(httpversion)]} {
 	    set data(state) mime
 	    httpd_log $sock Query $line
+	    if {[regexp {(?:^|[\?&])delay=([^&]+)} $data(query) {} val]} {
+		fileevent $sock readable {}
+		after $val [list fileevent $sock readable [list httpdRead $sock]]
+	    }
 	} else {
 	    httpdError $sock 400
 	    httpd_log $sock Error "bad first line:$line"
 	    httpdSockDone $sock
 	}
-	if {[regexp {(?:^|[\?&])delay=([^&]+)} $data(query) {} val]} {
-	    fileevent $sock readable {}
-	    after $val [list fileevent $sock readable [list httpdRead $sock]]
-	}
 	return
     } elseif {$data(state) == "mime"} {
 
-- 
cgit v0.12