summaryrefslogtreecommitdiff
path: root/gnu/packages/virtualization.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/packages/virtualization.scm')
-rw-r--r--gnu/packages/virtualization.scm14
1 files changed, 12 insertions, 2 deletions
diff --git a/gnu/packages/virtualization.scm b/gnu/packages/virtualization.scm
index ab364cd1fb..d06c55bd57 100644
--- a/gnu/packages/virtualization.scm
+++ b/gnu/packages/virtualization.scm
@@ -87,7 +87,8 @@
"qemu-CVE-2017-10806.patch"
"qemu-CVE-2017-10911.patch"
"qemu-CVE-2017-11334.patch"
- "qemu-CVE-2017-11434.patch"))
+ "qemu-CVE-2017-11434.patch"
+ "qemu-CVE-2017-12809.patch"))
(sha256
(base32
"08mhfs0ndbkyqgw7fjaa9vjxf4dinrly656f6hjzvmaz7hzc677h"))))
@@ -361,7 +362,16 @@ manage system or application containers.")
(lambda _
(zero? (system* "make" "install"
"sysconfdir=/tmp/etc"
- "localstatedir=/tmp/var")))))))
+ "localstatedir=/tmp/var"))))
+ (add-after 'install 'wrap-libvirtd
+ (lambda* (#:key inputs outputs #:allow-other-keys)
+ (let ((out (assoc-ref outputs "out")))
+ (wrap-program (string-append out "/sbin/libvirtd")
+ `("PATH" = (,(string-append (assoc-ref inputs "iproute")
+ "/sbin")
+ ,(string-append (assoc-ref inputs "qemu")
+ "/bin"))))
+ #t))))))
(inputs
`(("libxml2" ,libxml2)
("gnutls" ,gnutls)