diff options
author | Efraim Flashner | 2022-10-13 18:28:28 +0300 |
---|---|---|
committer | Efraim Flashner | 2022-10-13 18:28:28 +0300 |
commit | 1454b86d292b284b61ff9044dfb4221719732a60 (patch) | |
tree | 6bb14e45e9254e5dd014cc4aee1c76852e92e0f3 | |
parent | b891e579f1d111c29396a9669798eebebe967963 (diff) | |
download | gn-shepherd-services-1454b86d292b284b61ff9044dfb4221719732a60.tar.gz |
Update pluto service
-rw-r--r-- | pluto-channels.scm | 26 | ||||
-rwxr-xr-x | run_pluto.sh | 2 | ||||
-rw-r--r-- | shepherd/init.d/pluto.scm | 17 |
3 files changed, 34 insertions, 11 deletions
diff --git a/pluto-channels.scm b/pluto-channels.scm new file mode 100644 index 0000000..10257cf --- /dev/null +++ b/pluto-channels.scm @@ -0,0 +1,26 @@ +(list + (channel + (name 'gn-bioinformatics) + (url "https://gitlab.com/genenetwork/guix-bioinformatics") + (commit + "ac5eef9bfb431fac6fdfc60dd06ef44607787b76")) + (channel + (name 'guix-past) + (url "https://gitlab.inria.fr/guix-hpc/guix-past") + (commit + "247a14c67af91febfbd5b7f60be9f64945fba713") + (introduction + (make-channel-introduction + "0c119db2ea86a389769f4d2b9c6f5c41c027e336" + (openpgp-fingerprint + "3CE4 6455 8A84 FDC6 9DB4 0CFB 090B 1199 3D9A EBB5")))) + (channel + (name 'guix) + (url "https://git.savannah.gnu.org/git/guix.git") + (commit + "79358a99cd46a27fdc716309ccee2596483ab9af") + (introduction + (make-channel-introduction + "9edb3f66fd807b096b48283debdcddccfea34bad" + (openpgp-fingerprint + "BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA"))))) diff --git a/run_pluto.sh b/run_pluto.sh deleted file mode 100755 index a0f4cfe..0000000 --- a/run_pluto.sh +++ /dev/null @@ -1,2 +0,0 @@ -#!/bin/sh -$(/home/shepherd/guix-profiles/pluto/bin/guix system container -L /home/shepherd/guix-past/modules/ -L /home/shepherd/guix-bioinformatics/ /home/shepherd/guix-bioinformatics/gn/services/pluto.scm --network) diff --git a/shepherd/init.d/pluto.scm b/shepherd/init.d/pluto.scm index dc36730..81c7fe6 100644 --- a/shepherd/init.d/pluto.scm +++ b/shepherd/init.d/pluto.scm @@ -1,14 +1,13 @@ (define pluto (make <service> - #:provides '(pluto) - #:docstring "Run a pluto web server" - #:start (make-forkexec-constructor - '("/home/shepherd/run_pluto.sh") - #:log-file "/home/shepherd/logs/pluto.log") - #:stop (make-kill-destructor) - ;; currently running in a screen session - #:auto-start? #f - #:respawn? #t)) + #:provides '(pluto) + #:docstring "Run a pluto web server" + #:start (make-forkexec-constructor + ;; Update the path to runpluto as the guix-profile changes. + '("/home/shepherd/guix-profiles/pluto/bin/guix" "shell" "--container" "--network" "--no-cwd" "julia-visuals" "--" "/gnu/store/wbci39sd5pqrjrb5ak0lkmv9jhnl35kv-julia-visuals-0.0.0-1.e7d670e/runpluto.sh") + #:log-file "/home/shepherd/logs/pluto.log") + #:stop (make-kill-destructor) + #:respawn? #t)) (register-services pluto) (start pluto) |