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.

2 files changed, 5 insertions, 0 deletions

diff --git a/gnu/services.scm b/gnu/services.scm
index d6c7ad0553a..31eba9f035a 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 8d428bf743d..4a8cc87f0f1 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.")))