blob: ed9bf9dacb7f3b649a544148cfa4c5b672be0ea6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
(define bnw
(make <service>
#:provides '(bnw)
#:docstring "Run the Beyesian Network Webserver"
#:start (make-forkexec-constructor
'("/usr/bin/sudo" "/home/shepherd/run_bnw.sh")
#:log-file "/home/shepherd/logs/bnw.log")
#:stop (make-kill-destructor)
#:respawn? #t))
(register-services bnw)
(start bnw)
|
