diff --git a/guix/scripts/publish.scm b/guix/scripts/publish.scm index a589f149d3..8864c2ef8b 100644 --- a/guix/scripts/publish.scm +++ b/guix/scripts/publish.scm @@ -455,7 +455,8 @@ requested using POOL." (call-with-gzip-output-port (open-output-file (string-append nar ".tmp")) (lambda (port) (write-file item port)) - #:level (compression-level compression)) + #:level (compression-level compression) + #:buffer-size (* 128 1024)) (rename-file (string-append nar ".tmp") nar)) ('none ;; When compression is disabled, we retrieve files directly from the