~ruther/guix-local: vm: Export <virtual-machine> accessors.

7a4f585ae1875b1bee29e1f106c7af5ca0cd057d — Ludovic Courtès 2 years ago f7447b1

vm: Export <virtual-machine> accessors.

* gnu/system/vm.scm: Export.

Change-Id: If65d96f4052d070af5baee26f3dd9b233b8480f4

patch browse .tar.gz

1 files changed, 9 insertions(+), 1 deletions(-)

M gnu/system/vm.scm

M gnu/system/vm.scm => gnu/system/vm.scm +9 -1

@@ 72,7 72,15 @@
             system-qemu-image/shared-store-script
 
             virtual-machine
-            virtual-machine?))
+            virtual-machine?
+            virtual-machine-operating-system
+            virtual-machine-qemu
+            virtual-machine-volatile?
+            virtual-machine-graphic?
+            virtual-machine-memory-size
+            virtual-machine-disk-image-size
+            virtual-machine-port-forwardings
+            virtual-machine-date))
 
 
 ;;; Commentary: