From d8e70c6ce819f1ca3c6ebe389e4c241096c386b1 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Mon, 8 May 2023 22:04:33 +0100 Subject: Force sending the request in call-with-streaming-http-request --- guix-build-coordinator/utils.scm | 1 + 1 file changed, 1 insertion(+) (limited to 'guix-build-coordinator/utils.scm') 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))) -- cgit v1.2.3