diff options
author | Liliana Marie Prikler <liliana.prikler@gmail.com> | 2023-09-24 12:19:01 +0200 |
---|---|---|
committer | Liliana Marie Prikler <liliana.prikler@gmail.com> | 2023-09-24 12:19:01 +0200 |
commit | b18b2d13488f2a92331ccad2dc8cbb54ee15582f (patch) | |
tree | fe841af2c61142cf065f4bd0f9d5b8668ae90823 /gnu/tests/virtualization.scm | |
parent | afa9da84255d32d9f457be381c12666b69ac3f69 (diff) | |
parent | 35fd25af9bbcce84908101a9f487ba106a8d6df7 (diff) |
Merge branch 'master' into gnome-team
Diffstat (limited to 'gnu/tests/virtualization.scm')
-rw-r--r-- | gnu/tests/virtualization.scm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/gnu/tests/virtualization.scm b/gnu/tests/virtualization.scm index effdeb4cfa..73c8099b79 100644 --- a/gnu/tests/virtualization.scm +++ b/gnu/tests/virtualization.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2017 Christopher Baines <mail@cbaines.net> -;;; Copyright © 2020-2022 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2020-2023 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2021 Pierre Langlois <pierre.langlois@gmx.com> ;;; Copyright © 2022 Marius Bakke <marius@gnu.org> @@ -301,7 +301,9 @@ (test-assert "service running" (marionette-eval '(begin - (use-modules (gnu services herd)) + (use-modules (gnu services herd) + (ice-9 match)) + (match (start-service 'childhurd) (#f #f) (('service response-parts ...) @@ -316,7 +318,8 @@ ;; to the host won't work because QEMU listens on 127.0.0.1. (marionette-eval '(begin - (use-modules (ice-9 match)) + (use-modules (ice-9 match) + (ice-9 textual-ports)) (let loop ((n 60)) (if (zero? n) |