aboutsummaryrefslogtreecommitdiff
path: root/gnu/services/base.scm
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2019-01-20 15:25:45 +0200
committerEfraim Flashner <efraim@flashner.co.il>2019-01-20 16:11:07 +0200
commit76a2b2db1a5c6a68be994712e5273b2ac4e4c82a (patch)
tree8f9919e80325431bbcc5013b48d30180f0e54fd8 /gnu/services/base.scm
parent178bce41d8bd7fd25ea33c7e3f10add339746061 (diff)
downloadpatches-76a2b2db1a5c6a68be994712e5273b2ac4e4c82a.tar
patches-76a2b2db1a5c6a68be994712e5273b2ac4e4c82a.tar.gz
gnu: %base-services: Use *getty-service-type.
* gnu/services/base.scm (%base-services): Replace agetty-service with agetty-service-type, mingetty-service with mingetty-service-type.
Diffstat (limited to 'gnu/services/base.scm')
-rw-r--r--gnu/services/base.scm34
1 files changed, 17 insertions, 17 deletions
diff --git a/gnu/services/base.scm b/gnu/services/base.scm
index 5817562860..d2baea0dd0 100644
--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -2305,23 +2305,23 @@ to handle."
(cons tty %default-console-font))
'("tty1" "tty2" "tty3" "tty4" "tty5" "tty6")))
- (agetty-service (agetty-configuration
- (extra-options '("-L")) ; no carrier detect
- (term "vt100")
- (tty #f))) ; automatic
-
- (mingetty-service (mingetty-configuration
- (tty "tty1")))
- (mingetty-service (mingetty-configuration
- (tty "tty2")))
- (mingetty-service (mingetty-configuration
- (tty "tty3")))
- (mingetty-service (mingetty-configuration
- (tty "tty4")))
- (mingetty-service (mingetty-configuration
- (tty "tty5")))
- (mingetty-service (mingetty-configuration
- (tty "tty6")))
+ (service agetty-service-type (agetty-configuration
+ (extra-options '("-L")) ; no carrier detect
+ (term "vt100")
+ (tty #f))) ; automatic
+
+ (service mingetty-service-type (mingetty-configuration
+ (tty "tty1")))
+ (service mingetty-service-type (mingetty-configuration
+ (tty "tty2")))
+ (service mingetty-service-type (mingetty-configuration
+ (tty "tty3")))
+ (service mingetty-service-type (mingetty-configuration
+ (tty "tty4")))
+ (service mingetty-service-type (mingetty-configuration
+ (tty "tty5")))
+ (service mingetty-service-type (mingetty-configuration
+ (tty "tty6")))
(service static-networking-service-type
(list (static-networking (interface "lo")