aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFrederick Muriuki Muriithi2024-11-01 11:51:20 -0500
committerFrederick Muriuki Muriithi2024-11-01 11:51:20 -0500
commitce3c07b554dfa71f17aae7c95650b809f221fbd3 (patch)
treef56b6a9d63745c79ed66ef53769b2dec33dc8c75
parent9b3a2172c63578bf7ca6224da10be5ad951a2de1 (diff)
downloadgn-guile-main.tar.gz
Make error details into pairs.HEADmain
-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