make-request path should be a string even in failure case

This commit is contained in:
Alex Shinn 2022-08-09 14:02:19 +09:00
parent 51beea2bb6
commit 9993b27486

View file

@ -64,7 +64,7 @@
(let restart ((request request))
(servlet cfg request servlet-bad-request restart)))))))
(else
(let ((request (make-request command #f #f in out sock addr)))
(let ((request (make-request command "" #f in out sock addr)))
(servlet-respond request 400 "bad request")))))))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;