summaryrefslogtreecommitdiff
path: root/guix/scripts
diff options
context:
space:
mode:
authorRicardo Wurmus <rekado@elephly.net>2020-05-19 23:14:30 +0200
committerRicardo Wurmus <rekado@elephly.net>2020-05-19 23:15:41 +0200
commit5e3d169945935b53325e6b738a307ba286751259 (patch)
tree469638b593618d0a578eb69f3c3c15e9c4a89eb5 /guix/scripts
parentf523eaba7b5460937a230a824550243d75e5f1dc (diff)
publish: Improve performance by increasing buffer size.
* guix/scripts/publish.scm (http-write): Increase socket send buffer.
Diffstat (limited to 'guix/scripts')
-rw-r--r--guix/scripts/publish.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/guix/scripts/publish.scm b/guix/scripts/publish.scm
index f5b2f5fd4e..a00f08f9d9 100644
--- a/guix/scripts/publish.scm
+++ b/guix/scripts/publish.scm
@@ -851,6 +851,7 @@ blocking."
size)
client))
(output (response-port response)))
+ (setsockopt client SOL_SOCKET SO_SNDBUF (* 128 1024))
(if (file-port? output)
(sendfile output input size)
(dump-port input output))