services: nfs: Fix statd and mountd ports.

* gnu/services/nfs.scm (nfs-shepherd-services): Fix rpcstatd-port and
rpcmountd-port arguments.
This commit is contained in:
Mathieu Othacehe 2021-12-22 18:28:43 +01:00
parent 102c360624
commit 207ee9d9cd
No known key found for this signature in database
GPG key ID: 8354763531769CA6

View file

@ -304,7 +304,7 @@ (define (nfs-shepherd-services config)
'()) '())
"--foreground" "--foreground"
#$@(if rpcstatd-port #$@(if rpcstatd-port
'("--port" (number->string rpcstatd-port)) #~("--port" #$(number->string rpcstatd-port))
'())) '()))
#:pid-file "/var/run/rpc.statd.pid")) #:pid-file "/var/run/rpc.statd.pid"))
(stop #~(make-kill-destructor))) (stop #~(make-kill-destructor)))
@ -320,7 +320,7 @@ (define (nfs-shepherd-services config)
'("--debug" "all") '("--debug" "all")
'()) '())
#$@(if rpcmountd-port #$@(if rpcmountd-port
'("--port" (number->string rpcmountd-port)) #~("--port" #$(number->string rpcmountd-port))
'())))) '()))))
(stop #~(make-kill-destructor))) (stop #~(make-kill-destructor)))
(shepherd-service (shepherd-service