futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

build: pack: Mute error output when checking if tar supports --sort.

Browse Source 
* guix/build/pack.scm (tar-base-options) [tar-supports-sort?]: Redirect error
output to void.
This commit is contained in:
Maxim Cournoyer 2021-07-06 14:32:56 -04:00
parent 11f0698243
commit c170abba47
No known key found for this signature in database
GPG Key ID: 1260E46482E63562
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
guix/build/pack.scm
View File

@ -27,8 +27,10 @@ deterministically. When TAR, a GNU tar command file name, is provided, the
'(\"gzip\" \"-9n\"), is provided, the compressor is explicitly specified via
the `-I' option."
(define (tar-supports-sort? tar)
(zero? (system* tar "cf" "/dev/null" "--files-from=/dev/null"
"--sort=name")))
(with-error-to-port (%make-void-port "w")
(lambda ()
(zero? (system* tar "cf" "/dev/null" "--files-from=/dev/null"
"--sort=name")))))
`(,@(if compressor
(list "-I" (string-join compressor))