GNU bug report logs - #49348
[PATCH] pack: Allow embedding custom control files in deb packs.

Previous Next

Full log

Message #17 received at 49348 <at> debbugs.gnu.org (full text, mbox):

From: Maxim Cournoyer <maxim.cournoyer <at> gmail.com>
To: 49348 <at> debbugs.gnu.org
Cc: Maxim Cournoyer <maxim.cournoyer <at> gmail.com>
Subject: [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

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.