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.
This commit is contained in:
Efraim Flashner 2019-01-20 15:25:45 +02:00
parent 178bce41d8
commit 76a2b2db1a
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351

View file

@ -2305,22 +2305,22 @@ (define %base-services
(cons tty %default-console-font)) (cons tty %default-console-font))
'("tty1" "tty2" "tty3" "tty4" "tty5" "tty6"))) '("tty1" "tty2" "tty3" "tty4" "tty5" "tty6")))
(agetty-service (agetty-configuration (service agetty-service-type (agetty-configuration
(extra-options '("-L")) ; no carrier detect (extra-options '("-L")) ; no carrier detect
(term "vt100") (term "vt100")
(tty #f))) ; automatic (tty #f))) ; automatic
(mingetty-service (mingetty-configuration (service mingetty-service-type (mingetty-configuration
(tty "tty1"))) (tty "tty1")))
(mingetty-service (mingetty-configuration (service mingetty-service-type (mingetty-configuration
(tty "tty2"))) (tty "tty2")))
(mingetty-service (mingetty-configuration (service mingetty-service-type (mingetty-configuration
(tty "tty3"))) (tty "tty3")))
(mingetty-service (mingetty-configuration (service mingetty-service-type (mingetty-configuration
(tty "tty4"))) (tty "tty4")))
(mingetty-service (mingetty-configuration (service mingetty-service-type (mingetty-configuration
(tty "tty5"))) (tty "tty5")))
(mingetty-service (mingetty-configuration (service mingetty-service-type (mingetty-configuration
(tty "tty6"))) (tty "tty6")))
(service static-networking-service-type (service static-networking-service-type