Browse Source

shepherd: update test-upgrade script

master
Efraim Flashner 11 months ago
committed by Shepherd
parent
commit
7be76d8380
1 changed files with 8 additions and 7 deletions
  1. +8
    -7
      shepherd/init.d/test-upgrade.scm

+ 8
- 7
shepherd/init.d/test-upgrade.scm View File

@@ -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)

Loading…
Cancel
Save