aboutsummaryrefslogtreecommitdiff
path: root/web
diff options
context:
space:
mode:
Diffstat (limited to 'web')
-rw-r--r--web/webserver.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/web/webserver.scm b/web/webserver.scm
index d4044a8..c13397e 100644
--- a/web/webserver.scm
+++ b/web/webserver.scm
@@ -172,8 +172,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 (invalid-data? data target)
(if (string? (assoc-ref data target))