summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorClément Lassieur <clement@lassieur.org>2018-11-07 09:03:48 +0100
committerClément Lassieur <clement@lassieur.org>2018-11-07 09:05:15 +0100
commit6b7f456f9c7065cf6c02a3dcc4eb7a4fb2fb8a2d (patch)
treef7819a33479c1b5037b245f0cc67be2a19b6342a
parentbe489a26c0e6a5f23a48142a87728a0ec8bc3c9c (diff)
downloadcuirass-6b7f456f9c7065cf6c02a3dcc4eb7a4fb2fb8a2d.tar
cuirass-6b7f456f9c7065cf6c02a3dcc4eb7a4fb2fb8a2d.tar.gz
http: Remove useless lambda expression.
* src/cuirass/http.scm (run-cuirass-server): Remove useless lambda expression.
-rw-r--r--src/cuirass/http.scm3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/cuirass/http.scm b/src/cuirass/http.scm
index bf171ee..92f1ca6 100644
--- a/src/cuirass/http.scm
+++ b/src/cuirass/http.scm
@@ -377,7 +377,6 @@ Hydra format."
(spawn-fiber
(lambda ()
(let-values (((response body state)
- (handle-request (cut url-handler <> <>)
- request body '())))
+ (handle-request url-handler request body '())))
(write-client impl server client response body)))))
(loop)))))