services: virtualization: Export hurd-vm-configuration accessors.

* gnu/services/virtualization.scm (hurd-vm-id, hurd-vm-options): Rename export
to ...
(hurd-vm-configuration-id, hurd-vm-configuration-options): ... these correct
accessor names.
(hurd-vm-configuration?, hurd-vm-configuration-os, hurd-vm-configuration-qemu,
hurd-vm-configuration-image, hurd-vm-configuration-disk-size,
hurd-vm-configuration-memory-size, hurd-vm-configuration-options,
hurd-vm-configuration-id, hurd-vm-configuration-net-options): Export record
predicate and accessors.

diff --git a/gnu/services/virtualization.scm b/gnu/services/virtualization.scm
index 36b1738..b93ed70 100644 (file)
--- a/gnu/services/virtualization.scm
+++ b/gnu/services/virtualization.scm
@@ -52,10 +52,17 @@
 
   #:export (%hurd-vm-operating-system
             hurd-vm-configuration
+            hurd-vm-configuration?
+            hurd-vm-configuration-os
+            hurd-vm-configuration-qemu
+            hurd-vm-configuration-image
+            hurd-vm-configuration-disk-size
+            hurd-vm-configuration-memory-size
+            hurd-vm-configuration-options
+            hurd-vm-configuration-id
+            hurd-vm-configuration-net-options
             hurd-vm-disk-image
-            hurd-vm-id
             hurd-vm-net-options
-            hurd-vm-options
             hurd-vm-service-type
 
             libvirt-configuration