02/03: services: libvirt: Add qemu field.

[guix-commits]

bricewge pushed a commit to branch master
in repository guix.

commit d0fcce8baf716f8661508db50eaf23b2d5a64a58
Author: Brice Waegeneire <brice@waegenei.re>
AuthorDate: Tue Feb 16 22:23:44 2021 +0100

    services: libvirt: Add qemu field.
    
    * gnu/services/virtualization.scm (libvirt-configuration): Add 'qemu'
    field.
    (libvirt-service-type): Replace 'qemu' package with the one specified in
    the service configuration.
---
 gnu/services/virtualization.scm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/gnu/services/virtualization.scm b/gnu/services/virtualization.scm
index 0c75614..b0df048 100644
--- a/gnu/services/virtualization.scm
+++ b/gnu/services/virtualization.scm
@@ -131,6 +131,10 @@
   (libvirt
    (package libvirt)
    "Libvirt package.")
+  (qemu
+   (package qemu)
+   "Qemu package.")
+
   (listen-tls?
    (boolean #t)
    "Flag listening for secure TLS connections on the public TCP/IP port.
@@ -485,7 +489,7 @@ potential infinite waits blocking libvirt."))
                                      (lambda (config)
                                        (list
                                         (libvirt-configuration-libvirt config)
-                                        qemu)))
+                                        (libvirt-configuration-qemu config))))
                   (service-extension activation-service-type
                                      %libvirt-activation)
                   (service-extension shepherd-root-service-type