summary refs log tree commit diff
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2019-01-20 15:24:22 +0200
committerEfraim Flashner <efraim@flashner.co.il>2019-01-20 16:11:05 +0200
commit178bce41d8bd7fd25ea33c7e3f10add339746061 (patch)
treeff527d19ee151a70be2bf1ebacc90d3043eb50dc
parentfd779db9e4f95031627efed5a6fc2ffa554d443e (diff)
downloadguix-178bce41d8bd7fd25ea33c7e3f10add339746061.tar.gz
gnu: %base-services: Use login-service-type.
* gnu/services/base.scm (login-service-type)[default-value]: New field.
(%base-services): Replace login-service with login-service-type.
-rw-r--r--gnu/services/base.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/services/base.scm b/gnu/services/base.scm
index 17c953f0d7..5817562860 100644
--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -819,6 +819,7 @@ Return a service that sets up Unicode support in @var{tty} and loads
   (service-type (name 'login)
                 (extensions (list (service-extension pam-root-service-type
                                                      login-pam-service)))
+                (default-value (login-configuration))
                 (description
                  "Provide a console log-in service as specified by its
 configuration value, a @code{login-configuration} object.")))
@@ -2296,7 +2297,7 @@ to handle."
 
 (define %base-services
   ;; Convenience variable holding the basic services.
-  (list (login-service)
+  (list (service login-service-type)
 
         (service virtual-terminal-service-type)
         (service console-font-service-type