adding a rc-local like service

This commit is contained in:
Jean-François GUILLAUME 2021-12-01 14:35:04 +01:00
parent a8cef196af
commit 5055d2ba28
GPG key ID: 38751DAE145EFB5A

View file

@ -23,14 +23,14 @@
(define-record-type* <rc-local-configuration> (define-record-type* <rc-local-configuration>
rc-local-configuration make-rc-local-configuration rc-local-configuration make-rc-local-configuration
rc-local-configuration? rc-local-configuration?
(config-file rc-local-configuration-config-file ; string (config-file rc-local-config-file ; string
(default %default-rc-local-conf) (default %default-rc-local-conf)
) )
) )
(define rc-local-service (define rc-local-service
(match-lambda (match-lambda
(($ <rc-local-configuration> rc-local arguments logflags log-file pid-file config-file schema-dir) (($ <rc-local-configuration> config-file)
(list (list
(shepherd-service (shepherd-service
(provision '(rc-local) ) (provision '(rc-local) )