guix-commits
[Top][All Lists]
Advanced

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

01/01: hydra: bayfront: Add Cuirass service.


From: Ludovic Courtès
Subject: 01/01: hydra: bayfront: Add Cuirass service.
Date: Mon, 19 Dec 2016 23:16:47 +0000 (UTC)

civodul pushed a commit to branch master
in repository maintenance.

commit 58928a84a049f7741a6ae35fc361697fbe8dd8fd
Author: Ludovic Courtès <address@hidden>
Date:   Tue Dec 20 00:00:12 2016 +0100

    hydra: bayfront: Add Cuirass service.
    
    * hydra/bayfront.scm (%cuirass-specs): New variable.
    <top level> [services]: Use it.
---
 hydra/bayfront.scm |   22 +++++++++++++++++++++-
 1 file changed, 21 insertions(+), 1 deletion(-)

diff --git a/hydra/bayfront.scm b/hydra/bayfront.scm
index cd93f37..2149d92 100644
--- a/hydra/bayfront.scm
+++ b/hydra/bayfront.scm
@@ -1,7 +1,7 @@
 ;; OS configuration for bayfront, the frontend of the compile farm.
 
 (use-modules (gnu) (sysadmin people))
-(use-service-modules base networking admin mcron ssh web)
+(use-service-modules base networking admin mcron ssh web cuirass)
 (use-package-modules admin linux ssh tls vim package-management web wget)
 
 (define %sysadmins
@@ -74,6 +74,21 @@
 
 
 ;;;
+;;; Cuirass.
+;;;
+
+(define %cuirass-specs
+  ;; Cuirass specifications to build Guix.
+  (list `((#:name . "guix")
+          (#:url . "git://git.savannah.gnu.org/guix.git")
+          (#:load-path . ".")
+          (#:file . "tests/gnu-system.scm")
+          (#:proc . hydra-jobs)
+          (#:arguments (subset . "all"))
+          (#:branch . "master"))))
+
+
+;;;
 ;;; Operating system.
 ;;;
 
@@ -128,6 +143,11 @@
                    %nginx-mime-types
                    %nginx-cache-activation
 
+                   (service cuirass-service-type
+                            (cuirass-configuration
+                             (specifications %cuirass-specs)))
+
+
                    ;; Make SSH and HTTP/HTTPS available over Tor.
                    (tor-hidden-service "http"
                                        '((22 "127.0.0.1:22")



reply via email to

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