diff options
Diffstat (limited to 'gnu/system/image.scm')
-rw-r--r-- | gnu/system/image.scm | 28 |
1 files changed, 15 insertions, 13 deletions
diff --git a/gnu/system/image.scm b/gnu/system/image.scm index 1012fa6158..6e3fd51294 100644 --- a/gnu/system/image.scm +++ b/gnu/system/image.scm @@ -326,7 +326,8 @@ used in the image." (image-builder (with-imported-modules* (let ((initializer #$(partition-initializer partition)) - (inputs '#+(list e2fsprogs fakeroot dosfstools mtools)) + (inputs '#+(list coreutils e2fsprogs fakeroot dosfstools + mtools util-linux)) (image-root "tmp-root")) (sql-schema #$schema) @@ -338,18 +339,19 @@ used in the image." #+(file-append glibc-utf8-locales "/lib/locale")) (setlocale LC_ALL "en_US.utf8") - (initializer image-root - #:references-graphs '#$graph - #:deduplicate? #f - #:system-directory #$os - #:grub-efi #+grub-efi - #:bootloader-package - #+(bootloader-package bootloader) - #:bootloader-installer - #+(bootloader-installer bootloader) - #:bootcfg #$bootcfg - #:bootcfg-location - #$(bootloader-configuration-file bootloader)) + (when initializer + (initializer image-root + #:references-graphs '#$graph + #:deduplicate? #f + #:system-directory #$os + #:grub-efi #+grub-efi + #:bootloader-package + #+(bootloader-package bootloader) + #:bootloader-installer + #+(bootloader-installer bootloader) + #:bootcfg #$bootcfg + #:bootcfg-location + #$(bootloader-configuration-file bootloader))) (make-partition-image #$(partition->gexp partition) #$output image-root))))) |