summaryrefslogtreecommitdiff
path: root/shepherd
diff options
context:
space:
mode:
Diffstat (limited to 'shepherd')
-rw-r--r--shepherd/shepherd/init.d/exercise.scm17
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)