Display the request in one go
Otherwise, concurrent requests can cause the output to be interleaved.
This commit is contained in:
parent
5323f24133
commit
3a073d402d
1 changed files with 4 additions and 3 deletions
|
|
@ -37,9 +37,10 @@
|
|||
body)))
|
||||
|
||||
(define (handler request body controller)
|
||||
(format #t "~a ~a\n"
|
||||
(display
|
||||
(format #f "~a ~a\n"
|
||||
(request-method request)
|
||||
(uri-path (request-uri request)))
|
||||
(uri-path (request-uri request))))
|
||||
(apply values
|
||||
(run-controller controller request body)))
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue