diff options
author | Mathieu Othacehe <othacehe@gnu.org> | 2021-03-10 09:37:11 +0100 |
---|---|---|
committer | Mathieu Othacehe <othacehe@gnu.org> | 2021-03-10 09:37:48 +0100 |
commit | 207ef1a2b4f6ffd4781d1f5aab8e5984bc515f4c (patch) | |
tree | 9ac67385484221a25ee1d89ee7fe97f72de238a4 /gnu | |
parent | 6c883d0f1deacff4fc227a4f925414a3733efc6e (diff) |
tests: cuirass: Remove cuirass simple test.
This is a follow-up of 6c883d0f1deacff4fc227a4f925414a3733efc6e.
* gnu/tests/cuirass.scm (simple-cuirass-service, %cuirass-simple-test): Remove
them.
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/tests/cuirass.scm | 33 |
1 files changed, 1 insertions, 32 deletions
diff --git a/gnu/tests/cuirass.scm b/gnu/tests/cuirass.scm index 04a7a71dcf..ea5db34515 100644 --- a/gnu/tests/cuirass.scm +++ b/gnu/tests/cuirass.scm @@ -35,8 +35,7 @@ #:use-module (guix gexp) #:use-module (guix store) #:export (%cuirass-test - %cuirass-remote-test - %cuirass-simple-test)) + %cuirass-remote-test)) (define %derivation-file (scheme-file @@ -298,33 +297,3 @@ (name "cuirass-remote") (description "Connect to a Cuirass server with remote build.") (value (run-cuirass-test name os))))) - -(define simple-cuirass-service - (service cuirass-service-type - (cuirass-configuration - (specifications - (simple-cuirass-configuration->specs - (simple-cuirass-configuration - (build 'all) - (channels - (list (channel - (name 'guix) - (url "file:///tmp/cuirass-main/"))))))) - (host "0.0.0.0") - (use-substitutes? #t)))) - -(define %cuirass-simple-test - (let ((os (operating-system - (inherit %simple-os) - (services - (append - (list cow-service - (service dhcp-client-service-type) - git-service - simple-cuirass-service) - (operating-system-user-services %simple-os)))))) - (system-test - (name "cuirass-simple") - (description "Connect to a simple Cuirass server.") - (value - (run-cuirass-test name os))))) |