services: %base-services: Use udev-service-type.

* gnu/services/base.scm (udev-configuration): Fix typo.
(udev-service-type)[default-value]: New field.
(%base-services): Replace udev-service with udev-service-type.
This commit is contained in:
Efraim Flashner 2019-01-20 15:18:36 +02:00
parent db9035492b
commit fd779db9e4
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351

View file

@ -1815,7 +1815,7 @@ (define-record-type* <udev-configuration>
udev-configuration make-udev-configuration udev-configuration make-udev-configuration
udev-configuration? udev-configuration?
(udev udev-configuration-udev ;<package> (udev udev-configuration-udev ;<package>
(default udev)) (default eudev))
(rules udev-configuration-rules ;list of <package> (rules udev-configuration-rules ;list of <package>
(default '()))) (default '())))
@ -1998,6 +1998,7 @@ (define udev-service-type
(udev-configuration (udev-configuration
(udev udev) (udev udev)
(rules (append initial-rules rules))))))) (rules (append initial-rules rules)))))))
(default-value (udev-configuration))
(description (description
"Run @command{udev}, which populates the @file{/dev} "Run @command{udev}, which populates the @file{/dev}
directory dynamically. Get extra rules from the packages listed in the directory dynamically. Get extra rules from the packages listed in the
@ -2334,7 +2335,9 @@ (define %base-services
;; The LVM2 rules are needed as soon as LVM2 or the device-mapper is ;; The LVM2 rules are needed as soon as LVM2 or the device-mapper is
;; used, so enable them by default. The FUSE and ALSA rules are ;; used, so enable them by default. The FUSE and ALSA rules are
;; less critical, but handy. ;; less critical, but handy.
(udev-service #:rules (list lvm2 fuse alsa-utils crda)) (service udev-service-type
(udev-configuration
(rules (list lvm2 fuse alsa-utils crda))))
(service special-files-service-type (service special-files-service-type
`(("/bin/sh" ,(file-append (canonical-package bash) `(("/bin/sh" ,(file-append (canonical-package bash)