From aa86fcb7d92857ddbd9c0cde40f3d730d4606d62 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Fri, 17 Mar 2017 23:37:57 +0100
Subject: [PATCH] web: Avoid deprecated '_IOFBF'.

* module/web/client.scm (open-socket-for-uri): Use 'block instead of
_IOFBF.
---
 module/web/client.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/module/web/client.scm b/module/web/client.scm
index ab635c478..0c055abe9 100644
--- a/module/web/client.scm
+++ b/module/web/client.scm
@@ -218,7 +218,7 @@ host name without trailing dot."
     (with-https-proxy
      (let ((s (open-socket)))
        ;; Buffer input and output on this port.
-       (setvbuf s _IOFBF %http-receive-buffer-size)
+       (setvbuf s 'block %http-receive-buffer-size)
 
        (if https?
            (tls-wrap s (uri-host uri))