aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/web/render.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-data-service/web/render.scm')
-rw-r--r--guix-data-service/web/render.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/guix-data-service/web/render.scm b/guix-data-service/web/render.scm
index 94cbf55..248de3c 100644
--- a/guix-data-service/web/render.scm
+++ b/guix-data-service/web/render.scm
@@ -97,8 +97,9 @@
(lambda (port)
(sxml->html sxml port))))
-(define (render-json json)
- (list '((content-type . (application/json)))
+(define* (render-json json #:key (extra-headers '()))
+ (list (append extra-headers
+ '((content-type . (application/json))))
(lambda (port)
(scm->json json port))))