From c822fb8e3467c86f47a93710761fff1a30e7195b Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Wed, 6 May 2015 09:50:15 +0200
Subject: download: Reinstate buffering on connection sockets.

* guix/build/download.scm (open-connection-for-uri): Reinstate call to
  'setvbuf' inadvertently removed in d17551d9.
---
 guix/build/download.scm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'guix')

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 @@ (define https?
                          (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)))))
-- 
cgit v1.2.3