guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

branch master updated: tests: cuirass: Remove cuirass simple test.


From: guix-commits
Subject: branch master updated: tests: cuirass: Remove cuirass simple test.
Date: Wed, 10 Mar 2021 03:38:02 -0500

This is an automated email from the git hooks/post-receive script.

mothacehe pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new 207ef1a  tests: cuirass: Remove cuirass simple test.
207ef1a is described below

commit 207ef1a2b4f6ffd4781d1f5aab8e5984bc515f4c
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Wed Mar 10 09:37:11 2021 +0100

    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.
---
 gnu/tests/cuirass.scm | 33 +--------------------------------
 1 file changed, 1 insertion(+), 32 deletions(-)

diff --git a/gnu/tests/cuirass.scm b/gnu/tests/cuirass.scm
index 04a7a71..ea5db34 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)))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]