From 5d4ba49891996df93b4219c9dc9a438cac8f4a71 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Fri, 3 Jan 2020 18:02:02 +0100 Subject: services: nfs: Fix indentation and typo. * gnu/services/nfs.scm (, ): Fix indentation. (): Rename accessor for NFS-UTILS field to IDMAP-CONFIGURATION-NFS-UTILS. (idmap-service-type): Use IDMAP-CONFIGURATION-NFS-UTILS. --- gnu/services/nfs.scm | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'gnu/services') diff --git a/gnu/services/nfs.scm b/gnu/services/nfs.scm index 1b5dcb0e97..451020be31 100644 --- a/gnu/services/nfs.scm +++ b/gnu/services/nfs.scm @@ -130,7 +130,7 @@ (define pipefs-directory (pipefs-configuration-mount-point config)) (define-record-type* gss-configuration make-gss-configuration gss-configuration? - (pipefs-directory gss-configuration-pipefs-directory + (pipefs-directory gss-configuration-pipefs-directory (default default-pipefs-directory)) (nfs-utils gss-configuration-gss (default nfs-utils))) @@ -162,11 +162,11 @@ (define gss-command (define-record-type* idmap-configuration make-idmap-configuration idmap-configuration? - (pipefs-directory idmap-configuration-pipefs-directory + (pipefs-directory idmap-configuration-pipefs-directory (default default-pipefs-directory)) (domain idmap-configuration-domain - (default #f)) - (nfs-utils idmap-configuration-idmap + (default #f)) + (nfs-utils idmap-configuration-nfs-utils (default nfs-utils))) (define idmap-service-type @@ -175,7 +175,7 @@ (define idmap-service-type (lambda (config) (define nfs-utils - (idmap-configuration-idmap config)) + (idmap-configuration-nfs-utils config)) (define pipefs-directory (idmap-configuration-pipefs-directory config)) -- cgit v1.2.3