aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndrew Tropin <andrew@trop.in>2023-05-16 17:53:36 +0400
committerAndrew Tropin <andrew@trop.in>2023-05-16 19:45:27 +0400
commit66ecffbeba0685ff2f1071db8aeb2393986afb97 (patch)
treec432f89a8d37ef64e9a217b8d146f6ae7a28cfc9
parent8659f5e3ee1872da0a853ca6f839eb6f90e10c3d (diff)
downloadguix-66ecffbeba0685ff2f1071db8aeb2393986afb97.tar
guix-66ecffbeba0685ff2f1071db8aeb2393986afb97.tar.gz
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.
-rw-r--r--gnu/services.scm4
-rw-r--r--gnu/system/shadow.scm1
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.")))