diff options
author | Ludovic Courtès <ludo@gnu.org> | 2018-11-21 16:19:09 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2018-11-21 23:26:59 +0100 |
commit | d422cbb3d6a1cc7e4553a2335b113475a05d68ad (patch) | |
tree | fce053b15b69cd3512187208302d2c72c9c77dbc /gnu/system/vm.scm | |
parent | a29ce1f97dc8336e5a063f14d98d673b33b4bff4 (diff) | |
download | patches-d422cbb3d6a1cc7e4553a2335b113475a05d68ad.tar patches-d422cbb3d6a1cc7e4553a2335b113475a05d68ad.tar.gz |
linux-initrd: 'expression->initrd' returns the complete file name.
Previously 'expression->initrd' would return the directory that contains
the 'initrd' file; now it returns the complete file name for that file.
* gnu/system/linux-initrd.scm (expression->initrd)[builder]: Change
output file name to "initrd.cpio.gz". Tail-call 'file-append' to return
the complete file name.
* gnu/system.scm (operating-system-initrd-file): Remove 'file-append'
call.
* gnu/build/linux-initrd.scm (write-cpio-archive): Check whether OUTPUT
already has the ".gz" suffix; rename if before invoking GZIP if it does,
and otherwise after.
* gnu/system/vm.scm (expression->derivation-in-linux-vm)[builder]: Do
not append "/initrd" to #$initrd.
Diffstat (limited to 'gnu/system/vm.scm')
-rw-r--r-- | gnu/system/vm.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gnu/system/vm.scm b/gnu/system/vm.scm index 8e310a1607..9400e6310d 100644 --- a/gnu/system/vm.scm +++ b/gnu/system/vm.scm @@ -213,7 +213,7 @@ made available under the /xchg CIFS share." (let* ((inputs '#$(list qemu (canonical-package coreutils))) (linux (string-append #$linux "/" #$(system-linux-image-file-name))) - (initrd (string-append #$initrd "/initrd")) + (initrd #$initrd) (loader #$loader) (graphs '#$(match references-graphs (((graph-files . _) ...) graph-files) |