diff options
Diffstat (limited to 'guix-data-service/web/render.scm')
-rw-r--r-- | guix-data-service/web/render.scm | 5 |
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)))) |