tests: libvirt: Catch issues with incorrect /var and /etc in package.

* gnu/tests/virtualization.scm (run-libvirt-test): Chdir to "/tmp" before
running test.  Add "connect" test.
This commit is contained in:
Pierre Langlois 2021-04-02 11:11:10 +01:00
parent 8b578c217f
commit 81f65a3a2c
No known key found for this signature in database
GPG key ID: A8FC9E447F4F7D54

View file

@ -2,6 +2,7 @@
;;; Copyright © 2017 Christopher Baines <mail@cbaines.net>
;;; Copyright © 2020 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2021 Pierre Langlois <pierre.langlois@gmx.com>
;;;
;;; This file is part of GNU Guix.
;;;
@ -92,10 +93,20 @@ (define marionette
0
(marionette-eval
`(begin
(chdir "/tmp")
(system* ,(string-append #$libvirt "/bin/virsh")
"-c" "qemu:///system" "version"))
marionette))
(test-eq "connect"
0
(marionette-eval
`(begin
(chdir "/tmp")
(system* ,(string-append #$libvirt "/bin/virsh")
"-c" "qemu:///system" "connect"))
marionette))
(test-end)
(exit (= (test-runner-fail-count (test-runner-current)) 0)))))