linux-initrd: Compress cpio archives deterministically.

* gnu/build/linux-initrd.scm (write-cpio-archive): Use '--no-name'.
master
Ludovic Courtès 2015-09-09 23:01:51 +02:00
parent 363ccf9fe2
commit 0334ef2ab0
1 changed files with 3 additions and 1 deletions

View File

@ -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))