From c170abba4735a2c8a6845063fae8bf090975cbf9 Mon Sep 17 00:00:00 2001 From: Maxim Cournoyer Date: Tue, 6 Jul 2021 14:32:56 -0400 Subject: build: pack: Mute error output when checking if tar supports --sort. * 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)) -- cgit v1.2.3