blob: 11bef698660c6c13e7f294ae8b01e092a2f2fe8c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
Define a service for shepherd that starts up Emacs.
#+begin_src scheme
(define emacs
(make <service>
#:provides '(emacs)
#:docstring "Run `emacs --daemon'"
#:start (make-forkexec-constructor
'("emacs" "--fg-daemon")
#:log-file (string-append (getenv "HOME") "/.logs/emacs.log"))
#:stop (make-kill-destructor)))
(register-services emacs)
(start emacs)
#+end_src
|