aboutsummaryrefslogtreecommitdiffstats
path: root/config/shepherd/init.d/my-daemons.scm
diff options
context:
space:
mode:
Diffstat (limited to 'config/shepherd/init.d/my-daemons.scm')
-rw-r--r--config/shepherd/init.d/my-daemons.scm15
1 files changed, 15 insertions, 0 deletions
diff --git a/config/shepherd/init.d/my-daemons.scm b/config/shepherd/init.d/my-daemons.scm
new file mode 100644
index 0000000..85de6d2
--- /dev/null
+++ b/config/shepherd/init.d/my-daemons.scm
@@ -0,0 +1,15 @@
+
+(register-services
+ (make <service>
+ #:docstring "Habit tracker"
+ #:provides '(habit-logs)
+ #:start (make-forkexec-constructor
+ (list "sbcl" "--load"
+ (string-append (getenv "HOME") "/.sbclrc")
+ "--load"
+ (string-append (getenv "HOME") "/dev/common-lisp/todo-demo/habit.lisp")
+ "--eval" "(habit-log::main)" "--non-interactive")
+ #:directory (string-append (getenv "HOME") "/dev/common-lisp/todo-demo/")
+ #:log-file "/tmp/habits.log")
+ #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C
+ #:respawn? #t))