From 7be76d83805ce7c0891996ec2a13c2ad28ee0694 Mon Sep 17 00:00:00 2001
From: Efraim Flashner
Date: Sun, 8 Mar 2020 12:34:10 +0000
Subject: shepherd: update test-upgrade script

---
 shepherd/init.d/test-upgrade.scm | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/shepherd/init.d/test-upgrade.scm b/shepherd/init.d/test-upgrade.scm
index 80ae7dc..4315cb2 100644
--- a/shepherd/init.d/test-upgrade.scm
+++ b/shepherd/init.d/test-upgrade.scm
@@ -4,13 +4,14 @@
 	#:docstring "Build all the services to make sure they work on an upgrade"
 	#:start (make-forkexec-constructor
 		  ;; First attempt to build all the packages and only afterward attempt to build the containers.
-		  (when (zero? (system* "guix" "build" "-L" "/home/shepherd/guix-bioinformatics"
-					"--no-grafts" "bnw" "gitea" "go-ipfs" "edirect-gn"
-					"bxd-power-calculator-app" "rn6-assembly-error-app"
-					"singlecellrshiny"))
-		    (zero? (system* "guix" "system" "-L" "/home/shepherd/guix-bioinformatics"
-				    "container" "/home/shepherd/guix-bioinformatics/gn/services/bnw-container.scm"
-				    "--share=/home/shepherd/logs/bnw-server=/var/log" "--network")))
+		  ;(when (zero? (system*
+		  '("guix" "build" "-L" "/home/shepherd/guix-bioinformatics"
+		    "--no-grafts" "bnw" "gitea" "go-ipfs" "edirect-gn"
+		    "bxd-power-calculator-app" "rn6-assembly-error-app"
+		    "singlecellrshiny")
+		    ;(zero? (system* "guix" "system" "-L" "/home/shepherd/guix-bioinformatics"
+		    ;		    "container" "/home/shepherd/guix-bioinformatics/gn/services/bnw-container.scm"
+		    ;		    "--share=/home/shepherd/logs/bnw-server=/var/log" "--network")))
 		  #:log-file "/home/shepherd/logs/test-upgrade.log")
 	#:one-shot? #t))
 (register-services test-upgrade)
-- 
cgit v1.2.3