summary refs log tree commit diff
diff options
context:
space:
mode:
authorMathieu Lirzin <mthl@gnu.org>2016-03-22 19:54:07 +0100
committerMathieu Lirzin <mthl@gnu.org>2016-03-24 00:05:01 +0100
commit41fa926f307af824f539fa3e6ae36fac00579f22 (patch)
tree872fca07b21df3a6313e971b43e1be4b0c3f4d0f
parent385b1be8d03b0ae4e50ad9050d147298f163811a (diff)
downloadguix-41fa926f307af824f539fa3e6ae36fac00579f22.tar.gz
tests: Silence %cpio-program.
* tests/cpio.scm ("bit-identical to GNU cpio's output"): Silence
%cpio-program call to avoid polluting the temporary files.
-rw-r--r--tests/cpio.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/cpio.scm b/tests/cpio.scm
index cf65f9808d..b6ae1b212c 100644
--- a/tests/cpio.scm
+++ b/tests/cpio.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -63,7 +64,7 @@
        (call-with-temporary-output-file
         (lambda (ref-file _)
           (let ((pipe (open-pipe* OPEN_WRITE %cpio-program "-o" "-O" ref-file
-                                  "-H" "newc" "--null")))
+                                  "-H" "newc" "--null" "--quiet")))
             (for-each (lambda (file)
                         (format pipe "~a\0" file))
                       files)