summaryrefslogtreecommitdiff
path: root/guix/build/download.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2015-05-06 09:50:15 +0200
committerLudovic Courtès <ludo@gnu.org>2015-05-06 09:50:15 +0200
commitc822fb8e3467c86f47a93710761fff1a30e7195b (patch)
tree8e3b2876d14c4fe0dbf95dc0d09a3cd5c92db6e5 /guix/build/download.scm
parent0ffcf7cc80e57bd039395791b98187db9a51294b (diff)
download: Reinstate buffering on connection sockets.
* guix/build/download.scm (open-connection-for-uri): Reinstate call to 'setvbuf' inadvertently removed in d17551d9.
Diffstat (limited to 'guix/build/download.scm')
-rw-r--r--guix/build/download.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/guix/build/download.scm b/guix/build/download.scm
index 2e0b019d38..7b8e1aac3b 100644
--- a/guix/build/download.scm
+++ b/guix/build/download.scm
@@ -218,6 +218,9 @@ host name without trailing dot."
(thunk)))))))
(with-https-proxy
(let ((s (open-socket-for-uri uri)))
+ ;; Buffer input and output on this port.
+ (setvbuf s _IOFBF %http-receive-buffer-size)
+
(if https?
(tls-wrap s (uri-host uri))
s)))))