update to shepherd 1.0

1 files changed, 7 insertions, 12 deletions

diff --git a/config/shepherd/init.scm b/config/shepherd/init.scm
index 3d47bd4..6b16623 100644
--- a/config/shepherd/init.scm
+++ b/config/shepherd/init.scm
@@ -1,25 +1,20 @@
 ;; init.scm -- default shepherd configuration file.
 
 (use-modules ((ice-9 ftw) #:select (scandir))
+             (shepherd service)
              (srfi srfi-26))
 
 ;; Load all the files in the directory 'init.d' with a suffix '.scm'.
 (for-each
-  (lambda (file)
-    (load (string-append "init.d/" file)))
-  (scandir (string-append (dirname (current-filename)) "/init.d")
-           (cut string-suffix? ".scm" <>)))
-
-
-;; Services known to shepherd:
-;; Add new services (defined using 'make <service>') to shepherd here by
-;; providing them as arguments to 'register-services'.
-(register-services)
+ (lambda (file)
+   (load (string-append "init.d/" file)))
+ (scandir (string-append (dirname (current-filename)) "/init.d")
+          (cut string-suffix? ".scm" <>)))
 
 ;; Send shepherd into the background
-(action 'shepherd 'daemonize)
+(perform-service-action root-service 'daemonize)
 
 ;; Services to start when shepherd starts:
 ;; Add the name of each service that should be started to the list
 ;; below passed to 'for-each'.
-(for-each start '(habit-logs roam-semantic-db))
+(start-in-the-background '(habit-logs roam-semantic-db))