18 lines
451 B
Org Mode
18 lines
451 B
Org Mode
|
Mcron is a guile-based cron service. Define a service for it and start it up!
|
||
|
|
|
||
|
|
#+begin_src scheme
|
||
|
|
(define mcron
|
||
|
|
(make <service>
|
||
|
|
#:provides '(mcron)
|
||
|
|
#:docstring "Run `mcron'"
|
||
|
|
#:start (make-forkexec-constructor
|
||
|
|
'("mcron")
|
||
|
|
#:log-file (string-append (getenv "HOME") "/.logs/mcron.log"))
|
||
|
|
#:stop (make-kill-destructor)
|
||
|
|
#:respawn? #t))
|
||
|
|
|
||
|
|
(register-services mcron)
|
||
|
|
|
||
|
|
(start mcron)
|
||
|
|
#+end_src
|