;; init.scm -- default shepherd configuration file.

(use-modules ((ice-9 ftw) #:select (scandir))
             (shepherd service)
             (shepherd service log-rotation)
             (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" <>)))

;; Send shepherd into the background
(perform-service-action root-service 'daemonize)

(register-services
 (list
  ;; Create a service that rotates log files once a week.
  (log-rotation-service)))

;; Services to start when shepherd starts:
;; Add the name of each service that should be started to the list
;; below passed to 'for-each'.
(start-in-the-background '(habit-logs roam-semantic-db log-rotation))