diff options
Diffstat (limited to 'shepherd')
-rw-r--r-- | shepherd/shepherd/init.d/exercise.scm | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/shepherd/shepherd/init.d/exercise.scm b/shepherd/shepherd/init.d/exercise.scm new file mode 100644 index 0000000..c00b879 --- /dev/null +++ b/shepherd/shepherd/init.d/exercise.scm @@ -0,0 +1,17 @@ +(define config (or (getenv "XDG_CONFIG_HOME") + (string-append (getenv "HOME") "/.config"))) + +(define exercise + (service + '(exercise) + #:documentation "When you are in the computer, you should pause and do some +exercise. Dude, come on" + #:start (make-forkexec-constructor + `("guile" "-e" "(reminder)" "--" "-c" + ,(string-append config "/reminder/exercise.scm")) + #:log-file (string-append config "/reminder/exercise.log")) + #:stop (make-kill-destructor) + #:respawn? #t)) +(register-services exercise) + +(start exercise) |