This commit is contained in:
Jean-François GUILLAUME 2022-11-30 16:55:39 +01:00
parent e99355981d
commit b14fd052dc
GPG key ID: 38751DAE145EFB5A

View file

@ -18,16 +18,16 @@
<squid-configuration> <squid-configuration>
squid-configuration make-squid-configuration squid-configuration make-squid-configuration
squid-configuration? squid-configuration?
(pkg squid-pkg (default squid)) (pkg pkg (default squid))
(port squid-port (default 3128)) (port port (default 3128))
(loglevel squid-loglevel (default 1)) (loglevel loglevel (default 1))
(config-file squid-config-file (default (file-append squid "/etc/squid.conf"))) (config-file config-file (default (file-append squid "/etc/squid.conf")))
(pid-file squid-pid-file (default "/var/run/squid/squid.pid")) (pid-file pid-file (default "/var/run/squid/squid.pid"))
(log-file squid-log-file (default "/var/log/squid/squid.log"))) (log-file log-file (default "/var/log/squid/squid.log")))
(define squid-shepherd-service (define squid-shepherd-service
(match-lambda (match-lambda
(($ <squid-configuration> squid-pkg squid-port squid-loglevel squid-config-file pid-file log-file) (($ <squid-configuration> pkg port loglevel config-file pid-file log-file)
(list (list
(shepherd-service (shepherd-service
(provision '(squid)) (provision '(squid))