diff options
| author | Clément Lassieur <clement@lassieur.org> | 2018-11-07 09:03:48 +0100 |
|---|---|---|
| committer | Clément Lassieur <clement@lassieur.org> | 2018-11-07 09:05:15 +0100 |
| commit | 6b7f456f9c7065cf6c02a3dcc4eb7a4fb2fb8a2d (patch) | |
| tree | f7819a33479c1b5037b245f0cc67be2a19b6342a | |
| parent | be489a26c0e6a5f23a48142a87728a0ec8bc3c9c (diff) | |
| download | cuirass-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.scm | 3 |
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))))) |