01/04: linux-initrd: Compress cpio archives deterministically.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit 0334ef2ab06952df5c6a7582781d16d807e09ea7
Author: Ludovic Courtès <address@hidden>
Date:   Wed Sep 9 23:01:51 2015 +0200

    linux-initrd: Compress cpio archives deterministically.
    
    * gnu/build/linux-initrd.scm (write-cpio-archive): Use '--no-name'.
---
 gnu/build/linux-initrd.scm |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/gnu/build/linux-initrd.scm b/gnu/build/linux-initrd.scm
index e26c067..c65b5aa 100644
--- a/gnu/build/linux-initrd.scm
+++ b/gnu/build/linux-initrd.scm
@@ -72,7 +72,9 @@ COMPRESS? is true, compress it using GZIP.  On success, 
return OUTPUT."
                                #:file->header cpio:file->cpio-header*)))
 
   (or (not compress?)
-      (and (zero? (system* gzip "--best" output))
+      ;; Use '--no-name' so that gzip records neither a file name nor a time
+      ;; stamp in its output.
+      (and (zero? (system* gzip "--best" "--no-name" output))
            (rename-file (string-append output ".gz")
                         output))
       output))