gnu: libvirt: Update to 4.0.0.

* gnu/packages/virtualization.scm (libvirt): Update to 4.0.0.
[arguments]: Substitute INVOKE for SYSTEM*.
This commit is contained in:
Tobias Geerinckx-Rice 2018-01-19 18:46:43 +01:00
parent 162a137400
commit 07378e315a
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 7 additions and 7 deletions

View File

@ -6,7 +6,7 @@
;;; Copyright © 2017 Alex Vong <alexvong1995@gmail.com> ;;; Copyright © 2017 Alex Vong <alexvong1995@gmail.com>
;;; Copyright © 2017 Andy Patterson <ajpatter@uwaterloo.ca> ;;; Copyright © 2017 Andy Patterson <ajpatter@uwaterloo.ca>
;;; Copyright © 2017 Rutger Helling <rhelling@mykolab.com> ;;; Copyright © 2017 Rutger Helling <rhelling@mykolab.com>
;;; Copyright © 2017 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2017, 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -345,14 +345,14 @@ manage system or application containers.")
(define-public libvirt (define-public libvirt
(package (package
(name "libvirt") (name "libvirt")
(version "3.10.0") (version "4.0.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append "https://libvirt.org/sources/libvirt-" (uri (string-append "https://libvirt.org/sources/libvirt-"
version ".tar.xz")) version ".tar.xz"))
(sha256 (sha256
(base32 (base32
"03kb37iv3dvvdlslznlc0njvjpmq082lczmsslz5p4fcwb50kwfz")))) "1j6zzajh4j3zzsaqn5f5mrchm0590xcf6rzkfajvqw3bd4dcms79"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(;; FAIL: virshtest `(;; FAIL: virshtest
@ -362,7 +362,7 @@ manage system or application containers.")
;; FAIL: networkxml2firewalltest ;; FAIL: networkxml2firewalltest
;; FAIL: nwfilterebiptablestest ;; FAIL: nwfilterebiptablestest
;; FAIL: nwfilterxml2firewalltest ;; FAIL: nwfilterxml2firewalltest
;; Times while running commandest. ;; Time-out while running commandtest.
#:tests? #f #:tests? #f
#:configure-flags #:configure-flags
(list "--with-polkit" (list "--with-polkit"
@ -382,9 +382,9 @@ manage system or application containers.")
;; at runtime, we must prevent writing to them at installation ;; at runtime, we must prevent writing to them at installation
;; time. ;; time.
(lambda _ (lambda _
(zero? (system* "make" "install" (invoke "make" "install"
"sysconfdir=/tmp/etc" "sysconfdir=/tmp/etc"
"localstatedir=/tmp/var")))) "localstatedir=/tmp/var")))
(add-after 'install 'wrap-libvirtd (add-after 'install 'wrap-libvirtd
(lambda* (#:key inputs outputs #:allow-other-keys) (lambda* (#:key inputs outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))