summaryrefslogtreecommitdiff
path: root/gnu/tests
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2021-12-13 23:30:06 +0100
committerLudovic Courtès <ludo@gnu.org>2021-12-13 23:37:30 +0100
commit6601cc78bb728f19cb181b1bd3f78cccce23ec4b (patch)
tree7b8bfb2ab0f130743557f544c46da746ec147daf /gnu/tests
parent95447b293d52189056224076c25299fca1338018 (diff)
downloadguix-patches-6601cc78bb728f19cb181b1bd3f78cccce23ec4b.tar
guix-patches-6601cc78bb728f19cb181b1bd3f78cccce23ec4b.tar.gz
tests: static-networking: Adjust to new style.
* gnu/tests/networking.scm (run-static-networking-test)[test]: Remove 'mkdir', 'chdir', and 'exit' calls'. Add 'test-runner-current' call.
Diffstat (limited to 'gnu/tests')
-rw-r--r--gnu/tests/networking.scm8
1 files changed, 2 insertions, 6 deletions
diff --git a/gnu/tests/networking.scm b/gnu/tests/networking.scm
index 2bcc7f70dc..3f3f653b8a 100644
--- a/gnu/tests/networking.scm
+++ b/gnu/tests/networking.scm
@@ -64,9 +64,7 @@
(make-marionette
'(#$vm "-nic" "user,model=virtio-net-pci")))
- (mkdir #$output)
- (chdir #$output)
-
+ (test-runner-current (system-test-runner #$output))
(test-begin "static-networking")
(test-assert "service is up"
@@ -109,9 +107,7 @@
(logand flags IFF_UP))
marionette))
- (test-end)
-
- (exit (= (test-runner-fail-count (test-runner-current)) 0)))))
+ (test-end))))
(gexp->derivation "static-networking" test))