~ruther/guix-local: tests: Don't check file-systems in container tests.

a24b56fa8d64d9c6b8348c439cc988dbcebc911f — Andy Patterson 9 years ago c25a51d

tests: Don't check file-systems in container tests.

Hello,

The containers test was hanging for me, and this patch fixed the
problem.

--
Andy

From 945ad44acf489b7f3a398d4ab739ec2b48477502 Mon Sep 17 00:00:00 2001
From: Andy Patterson <ajpatter@uwaterloo.ca>
Date: Sat, 12 Nov 2016 22:10:01 -0500
Subject: [PATCH] tests: Don't check file-systems in container tests.

* tests/containers.scm ("call-with-container, mnt namespace"): Don't
check file-system in 'call-with-container' call.
* tests/containers.scm
("call-with-container, mnt namespace, wrong bindmount"): Likewise.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>

patch browse .tar.gz

1 files changed, 4 insertions(+), 2 deletions(-)

M tests/containers.scm

M tests/containers.scm => tests/containers.scm +4 -2

@@ 84,7 84,8 @@
    (call-with-container (list (file-system
                                 (device "none")
                                 (mount-point "/testing")
-                                (type "tmpfs")))
+                                (type "tmpfs")
+                                (check? #f)))
      (lambda ()
        (assert-exit (file-exists? "/testing")))
      #:namespaces '(user mnt))))


@@ 99,7 100,8 @@
                                    (device "/does-not-exist")
                                    (mount-point "/foo")
                                    (type "none")
-                                   (flags '(bind-mount))))
+                                   (flags '(bind-mount))
+                                   (check? #f)))
         (const #t)
         #:namespaces '(user mnt)))
     (lambda args