[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#49348] [PATCH v2 4/4] build: pack: Mute error output when checking
From: |
Maxim Cournoyer |
Subject: |
[bug#49348] [PATCH v2 4/4] build: pack: Mute error output when checking if tar supports --sort. |
Date: |
Tue, 6 Jul 2021 17:11:39 -0400 |
* guix/build/pack.scm (tar-base-options) [tar-supports-sort?]: Redirect error
output to void.
---
guix/build/pack.scm | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/guix/build/pack.scm b/guix/build/pack.scm
index 05c7a3c594..3b73d1b227 100644
--- a/guix/build/pack.scm
+++ b/guix/build/pack.scm
@@ -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))
--
2.32.0