diff options
author | Ludovic Courtès <ludo@gnu.org> | 2014-11-08 14:49:13 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2014-11-08 15:10:42 +0100 |
commit | 6aa260af122ce445c2b41c2ce5f487724feea917 (patch) | |
tree | 52fe8eaf9f09cebf009fb7f2e2b1b1428df87993 /guix/scripts/system.scm | |
parent | a9967103de2dd16749f365569ee307637eb1b99a (diff) |
vm: Fix 'vm --full-boot' to produce a sufficient disk image.
* gnu/system/vm.scm (system-qemu-image/shared-store): Add
#:disk-image-size and #:full-boot? parameters and honor them. Pass
'#:copy-inputs? full-boot?', and change #:inputs argument.
* guix/scripts/system.scm (system-derivation-for-action): Pass
#:disk-image-size to 'system-qemu-image/shared-store'.
* doc/guix.texi (Invoking guix system): Mention use of '--image-size' in
conjunction with '--full-boot'.
Diffstat (limited to 'guix/scripts/system.scm')
-rw-r--r-- | guix/scripts/system.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm index 7eb86c293d..ebad13e5e0 100644 --- a/guix/scripts/system.scm +++ b/guix/scripts/system.scm @@ -258,7 +258,9 @@ it atomically, and then run OS's activation script." ((vm-image) (system-qemu-image os #:disk-image-size image-size)) ((vm) - (system-qemu-image/shared-store-script os #:full-boot? full-boot?)) + (system-qemu-image/shared-store-script os + #:full-boot? full-boot? + #:disk-image-size image-size)) ((disk-image) (system-disk-image os #:disk-image-size image-size)))) |