aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/utils.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-05-08 22:04:33 +0100
committerChristopher Baines <mail@cbaines.net>2023-05-08 22:04:33 +0100
commitd8e70c6ce819f1ca3c6ebe389e4c241096c386b1 (patch)
treef54c2586d8827ded909a27d507d18aeec8de082a /guix-build-coordinator/utils.scm
parent1d89a31a23e7817c31deffbc25c56d8bafb9acbb (diff)
downloadbuild-coordinator-d8e70c6ce819f1ca3c6ebe389e4c241096c386b1.tar
build-coordinator-d8e70c6ce819f1ca3c6ebe389e4c241096c386b1.tar.gz
Force sending the request in call-with-streaming-http-request
Diffstat (limited to 'guix-build-coordinator/utils.scm')
-rw-r--r--guix-build-coordinator/utils.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/guix-build-coordinator/utils.scm b/guix-build-coordinator/utils.scm
index 7f4bf0c..a536023 100644
--- a/guix-build-coordinator/utils.scm
+++ b/guix-build-coordinator/utils.scm
@@ -336,6 +336,7 @@
(lambda ()
(let ((request (write-request request port)))
(callback port)
+ (force-output port)
(let ((response (read-response port)))
(let ((body (read-response-body response)))