diff options
Diffstat (limited to 'guix-build-coordinator/agent-messaging/http.scm')
-rw-r--r-- | guix-build-coordinator/agent-messaging/http.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-build-coordinator/agent-messaging/http.scm b/guix-build-coordinator/agent-messaging/http.scm index f223f66..1576c0f 100644 --- a/guix-build-coordinator/agent-messaging/http.scm +++ b/guix-build-coordinator/agent-messaging/http.scm @@ -302,7 +302,7 @@ (with-time-logging (simple-format #f "sending ~A" file) (dump-port file-port port - #:buffer-size 32768))) + #:buffer-size 65536))) #:headers `((Authorization . ,auth-value))))) (when (>= (response-code response) 400) (raise-exception @@ -354,7 +354,7 @@ (call-with-input-file file (lambda (file-port) (dump-port file-port request-port - #:buffer-size 32768)) + #:buffer-size 65536)) #:binary #t)) #:headers `((Authorization . ,auth-value))))) (if (>= (response-code response) 400) |