about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--web/webserver.scm4
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