blob: dc36730bb8a7ee3cc3acd00b7810a2bdfbde6cf3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
(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))
(register-services pluto)
(start pluto)
|