aboutsummaryrefslogtreecommitdiff
path: root/shepherd/init.d/test-upgrade.scm
blob: 6750ede460fd7114693efe109b81f0614efb1f78 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
(define test-upgrade
  (make <service>
	#:provides '(test-upgrade)
	#: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"
		    "-L" "/home/shepherd/guix-past/modules"
		    "genenetwork1" "httpd22-with-mod-python"
		    ;"bnw" octave-3.4.3 FTBFS
		    "gitea"
		    "go-ipfs"
		    "edirect"
		    "bxd-power-calculator-app"
		    "rn6-assembly-error-app"
		    "singlecellrshiny"
		    "virtuoso-ose"
		    "hrdp-project"
		    "bh20-seq-resource")
		    ;(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)