diff options
-rw-r--r-- | web/webserver.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/web/webserver.scm b/web/webserver.scm index c13397e..6f40614 100644 --- a/web/webserver.scm +++ b/web/webserver.scm @@ -214,8 +214,8 @@ otherwise search for set/group data" (lambda (key . args) (let ((msg (car args))) (build-json-response 400 - `(("error" ,key) - ("msg" ,msg))))))) + `(("error" . ,key) + ("msg" . ,msg))))))) (define (controller request body) (match-lambda |