diff --git a/tests/containers.scm b/tests/containers.scm index ccd122ac7922eaa945369eff99915666ea369969..745b56b710da4725b1ed0a2338e6d1e4aa16bc76 100644 --- a/tests/containers.scm +++ b/tests/containers.scm @@ -84,7 +84,8 @@ (define (skip-if-unsupported) (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 @@ (define (skip-if-unsupported) (device "/does-not-exist") (mount-point "/foo") (type "none") - (flags '(bind-mount)))) + (flags '(bind-mount)) + (check? #f))) (const #t) #:namespaces '(user mnt))) (lambda args