nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

publish: Use a larger zlib buffer for compression with '--cache'. 

* guix/scripts/publish.scm (bake-narinfo+nar): Pass #:buffer-size to
'call-with-gzip-output-port'.
master
Ludovic Courtès 2017-05-01 22:05:29 +02:00
parent 7020a6ab8b
commit e723178a10
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
guix/scripts/publish.scm
View File

@ -455,7 +455,8 @@ requested using POOL."
(call-with-gzip-output-port (open-output-file (string-append nar ".tmp")) (call-with-gzip-output-port (open-output-file (string-append nar ".tmp"))
(lambda (port) (lambda (port)
(write-file item port)) (write-file item port))
#:level (compression-level compression)) #:level (compression-level compression)
#:buffer-size (* 128 1024))
(rename-file (string-append nar ".tmp") nar)) (rename-file (string-append nar ".tmp") nar))
('none ('none
;; When compression is disabled, we retrieve files directly from the ;; When compression is disabled, we retrieve files directly from the