diff options
| author | Andrew Tropin <andrew@trop.in> | 2023-05-16 17:53:36 +0400 |
|---|---|---|
| committer | Andrew Tropin <andrew@trop.in> | 2023-05-16 19:45:27 +0400 |
| commit | 66ecffbeba0685ff2f1071db8aeb2393986afb97 (patch) | |
| tree | c432f89a8d37ef64e9a217b8d146f6ae7a28cfc9 /gnu | |
| parent | 8659f5e3ee1872da0a853ca6f839eb6f90e10c3d (diff) | |
services: Add default values.
* gnu/services.scm (boot-service-type, activation-service-type,
etc-service-type, profile-service-type): Add default-value.
* gnu/system/shadow.scm (account-service-type): Add default-value.
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/services.scm | 4 | ||||
| -rw-r--r-- | gnu/system/shadow.scm | 1 |
2 files changed, 5 insertions, 0 deletions
diff --git a/gnu/services.scm b/gnu/services.scm index d6c7ad0553..31eba9f035 100644 --- a/gnu/services.scm +++ b/gnu/services.scm @@ -403,6 +403,7 @@ directory." boot-script-entry))) (compose identity) (extend compute-boot-script) + (default-value #f) (description "Produce the operating system's boot script, which is spawned by the initrd once the root file system is mounted."))) @@ -661,6 +662,7 @@ system directory." activation-profile-entry))) (compose identity) (extend second-argument) + (default-value #f) (description "Run @dfn{activation} code at boot time and upon @command{guix system reconfigure} completion."))) @@ -803,6 +805,7 @@ directory." (service-extension system-service-type etc-entry))) (compose concatenate) (extend append) + (default-value '()) (description "Populate the @file{/etc} directory."))) (define-deprecated (etc-service files) @@ -869,6 +872,7 @@ executables, making them setuid and/or setgid."))) packages->profile-entry))) (compose concatenate) (extend append) + (default-value '()) (description "This is the @dfn{system profile}, available as @file{/run/current-system/profile}. It contains packages that the sysadmin diff --git a/gnu/system/shadow.scm b/gnu/system/shadow.scm index 8d428bf743..4a8cc87f0f 100644 --- a/gnu/system/shadow.scm +++ b/gnu/system/shadow.scm @@ -458,6 +458,7 @@ the /etc/skel directory for those." (const '(user-homes))) (service-extension etc-service-type etc-files))) + (default-value #f) (description "Ensure the specified user accounts and groups exist, as well as each account home directory."))) |