[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
08/12: scripts: system: Pass the volatile field to VM generation.
From: |
guix-commits |
Subject: |
08/12: scripts: system: Pass the volatile field to VM generation. |
Date: |
Wed, 22 Dec 2021 12:35:31 -0500 (EST) |
mothacehe pushed a commit to branch wip-image
in repository guix.
commit 6471b50f0bb482d0eaaf7fe277f5f2d810477fbd
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Thu Dec 16 13:45:00 2021 +0100
scripts: system: Pass the volatile field to VM generation.
* guix/scripts/system.scm (system-derivation-for-action): Add new volatile?
argument and pass it to system-qemu-image/shared-store-script.
(perform-action): Add new volatile? argument and pass it to
system-derivation-for-action.
(process-action): Pass the volatile? argument to perform-action.
---
guix/scripts/system.scm | 5 +++++
1 file changed, 5 insertions(+)
diff --git a/guix/scripts/system.scm b/guix/scripts/system.scm
index a5d9bb4..a73fe55 100644
--- a/guix/scripts/system.scm
+++ b/guix/scripts/system.scm
@@ -689,6 +689,7 @@ checking this by themselves in their 'check' procedure."
(define* (system-derivation-for-action image action
#:key
full-boot?
+ volatile?
(graphic? #t)
container-shared-network?
mappings)
@@ -707,6 +708,7 @@ checking this by themselves in their 'check' procedure."
((vm)
(system-qemu-image/shared-store-script os
#:full-boot? full-boot?
+ #:volatile? volatile?
#:graphic? graphic?
#:disk-image-size
(if full-boot?
@@ -772,6 +774,7 @@ and TARGET arguments."
dry-run? derivations-only?
use-substitutes? target
full-boot?
+ volatile?
(graphic? #t)
container-shared-network?
(mappings '())
@@ -826,6 +829,7 @@ static checks."
(mlet* %store-monad
((sys (system-derivation-for-action image action
#:full-boot? full-boot?
+ #:volatile? volatile?
#:graphic? graphic?
#:container-shared-network?
container-shared-network?
#:mappings mappings))
@@ -1277,6 +1281,7 @@ resulting from command-line parsing."
#:validate-reconfigure
(assoc-ref opts 'validate-reconfigure)
#:full-boot? (assoc-ref opts 'full-boot?)
+ #:volatile? (assoc-ref opts 'volatile-root?)
#:graphic? (not (assoc-ref opts 'no-graphic?))
#:container-shared-network?
(assoc-ref opts 'container-shared-network?)
- branch wip-image created (now ecca3c7), guix-commits, 2021/12/22
- 01/12: build: image: Add optional closure copy support., guix-commits, 2021/12/22
- 03/12: image: Add a shared-network? field., guix-commits, 2021/12/22
- 05/12: system: vm: Use the image API to generate QEMU images., guix-commits, 2021/12/22
- 07/12: scripts: system: Deprecate the docker-image command., guix-commits, 2021/12/22
- 02/12: image: Add a shared-store? field., guix-commits, 2021/12/22
- 04/12: system: image: Add docker support., guix-commits, 2021/12/22
- 08/12: scripts: system: Pass the volatile field to VM generation.,
guix-commits <=
- 06/12: Remove VM generation dead-code., guix-commits, 2021/12/22
- 09/12: scripts: system: Use the disk-image size argument for VM generation., guix-commits, 2021/12/22
- 10/12: tests: docker: Fix it., guix-commits, 2021/12/22
- 12/12: tests: nfs: Fix nfs-root-fs test., guix-commits, 2021/12/22
- 11/12: services: nfs: Fix statd and mountd ports., guix-commits, 2021/12/22