diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2023-09-16 18:29:23 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2023-10-01 22:58:19 +0200 |
| commit | bab6434f5855b92631615fdd8a2d2a225da28359 (patch) | |
| tree | 5240069df24f0216129de06f76baf5ef673ed184 /gnu/tests | |
| parent | 416933cde5b4e45a0e3214f2713cfe3974b07fb8 (diff) | |
services: hurd-vm: ‘image’ field has to be an <image> record.
* gnu/services/virtualization.scm (<hurd-vm-configuration>)[image]:
Document as being an <image> record.
(hurd-vm-disk-image): Remove call to ‘system-image’.
(hurd-vm-shepherd-service): Add call to ‘system-image’.
* gnu/tests/virtualization.scm (hurd-vm-disk-image-raw): Remove call to
‘system-image’.
* doc/guix.texi (Virtualization Services): Adjust accordingly.
Diffstat (limited to 'gnu/tests')
| -rw-r--r-- | gnu/tests/virtualization.scm | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/gnu/tests/virtualization.scm b/gnu/tests/virtualization.scm index 73c8099b794..41253968e95 100644 --- a/gnu/tests/virtualization.scm +++ b/gnu/tests/virtualization.scm | |||
| @@ -230,12 +230,11 @@ | |||
| 230 | (let ((os ((@@ (gnu services virtualization) secret-service-operating-system) | 230 | (let ((os ((@@ (gnu services virtualization) secret-service-operating-system) |
| 231 | (hurd-vm-configuration-os config))) | 231 | (hurd-vm-configuration-os config))) |
| 232 | (disk-size (hurd-vm-configuration-disk-size config))) | 232 | (disk-size (hurd-vm-configuration-disk-size config))) |
| 233 | (system-image | 233 | (image |
| 234 | (image | 234 | (inherit hurd-disk-image) |
| 235 | (inherit hurd-disk-image) | 235 | (format 'disk-image) |
| 236 | (format 'disk-image) | 236 | (size disk-size) |
| 237 | (size disk-size) | 237 | (operating-system os)))) |
| 238 | (operating-system os))))) | ||
| 239 | 238 | ||
| 240 | (define %childhurd-os | 239 | (define %childhurd-os |
| 241 | (simple-operating-system | 240 | (simple-operating-system |