Message ID | 016f8f819184b8fb3395ee551f39a856c347fa38.1686653575.git.efraim@flashner.co.il |
---|---|
State | New |
Headers | show |
Series | [bug#64042] gnu: image: Build partitions with only necessary inputs. | expand |
Hi, Efraim Flashner <efraim@flashner.co.il> skribis: > * gnu/system/image.scm (system-disk-image)[partition-image]: Adjust the > inputs used by the image-builder to only use the packages necessary to > build that partition. LGTM! Ludo’.
Patch pushed!
diff --git a/gnu/system/image.scm b/gnu/system/image.scm index 958ba5cbb2..81346495c2 100644 --- a/gnu/system/image.scm +++ b/gnu/system/image.scm @@ -418,7 +418,14 @@ (define* (system-disk-image image (with-imported-modules* (let ((initializer (or #$(partition-initializer partition) initialize-root-partition)) - (inputs '#+(list e2fsprogs fakeroot dosfstools mtools)) + (inputs '#+(cond + ((string-prefix? "ext" type) + (list e2fsprogs fakeroot)) + ((or (string=? type "vfat") + (string-prefix? "fat" type)) + (list dosfstools fakeroot mtools)) + (else + '()))) (image-root "tmp-root")) (sql-schema #$schema)