me
/
guix
Archived
1
0
Fork 0

scripts: system: Use the disk-image size argument for VM generation.

* guix/scripts/system.scm (system-derivation-for-action): Use the given
image-size unconditionnaly when calling system-qemu-image/shared-store-script.
master
Mathieu Othacehe 2021-12-16 13:46:38 +01:00
parent c37cd41764
commit bce55cec88
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 1 additions and 4 deletions

View File

@ -710,10 +710,7 @@ checking this by themselves in their 'check' procedure."
#:full-boot? full-boot?
#:volatile? volatile?
#:graphic? graphic?
#:disk-image-size
(if full-boot?
image-size
(* 70 (expt 2 20)))
#:disk-image-size image-size
#:mappings mappings))
((image disk-image vm-image docker-image)
(when (eq? action 'disk-image)