summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xguix-web4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-web b/guix-web
index 0b322e9..81595c1 100755
--- a/guix-web
+++ b/guix-web
@@ -70,8 +70,8 @@
(define (render-json json)
(list '((content-type . (application/json)))
- (with-output-to-string
- (cut scm->json json))))
+ (lambda (port)
+ (scm->json json port))))
(define (request-path-components request)
(split-and-decode-uri-path (uri-path (request-uri request))))