diff --git a/glicid/services/networking.scm b/glicid/services/networking.scm index c72ada1..0bf22af 100644 --- a/glicid/services/networking.scm +++ b/glicid/services/networking.scm @@ -18,10 +18,10 @@ squid-configuration make-squid-configuration squid-configuration? - (squid-pkg squid-pkg (default squid)) - (squid-port squid-port (default 3128)) - (squid-loglevel squid-loglevel (default 1)) - (squid-config-file squid-config-file (default (file-append squid "/etc/squid.conf"))) + (pkg squid-pkg (default squid)) + (port squid-port (default 3128)) + (loglevel squid-loglevel (default 1)) + (config-file squid-config-file (default (file-append squid "/etc/squid.conf"))) (pid-file squid-pid-file (default "/var/run/squid/squid.pid")) (log-file squid-log-file (default "/var/log/squid/squid.log"))) @@ -36,8 +36,8 @@ (respawn? #t) (start #~(make-forkexec-constructor (list - #$(file-append squid-pkg "/sbin/squid") - "-f" #$squid-config-file + #$(file-append pkg "/sbin/squid") + "-f" #$config-file ) #:pid-file #$pid-file #:log-file #$log-file