02/03: download: Reinstate buffering on connection sockets.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit c822fb8e3467c86f47a93710761fff1a30e7195b
Author: Ludovic Courtès <address@hidden>
Date:   Wed May 6 09:50:15 2015 +0200

    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 files changed, 3 insertions(+), 0 deletions(-)

diff --git a/guix/build/download.scm b/guix/build/download.scm
index 2e0b019..7b8e1aa 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)))))