summary refs log tree commit diff
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2019-01-20 15:18:36 +0200
committerEfraim Flashner <efraim@flashner.co.il>2019-01-20 16:11:05 +0200
commitfd779db9e4f95031627efed5a6fc2ffa554d443e (patch)
tree2b5efefe1a73006956359723df991b6bff8355be
parentdb9035492b26cb646d1eb5e38aa59bd8de18b02a (diff)
downloadguix-fd779db9e4f95031627efed5a6fc2ffa554d443e.tar.gz
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.
-rw-r--r--gnu/services/base.scm7
1 files changed, 5 insertions, 2 deletions
diff --git a/gnu/services/base.scm b/gnu/services/base.scm
index 626c5975de..17c953f0d7 100644
--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -1815,7 +1815,7 @@ archive}).  If that is not the case, the service will fail to start."
   udev-configuration make-udev-configuration
   udev-configuration?
   (udev   udev-configuration-udev                 ;<package>
-          (default udev))
+          (default eudev))
   (rules  udev-configuration-rules                ;list of <package>
           (default '())))
 
@@ -1998,6 +1998,7 @@ the udev rules in use.")
                              (udev-configuration
                               (udev udev)
                               (rules (append initial-rules rules)))))))
+                (default-value (udev-configuration))
                 (description
                  "Run @command{udev}, which populates the @file{/dev}
 directory dynamically.  Get extra rules from the packages listed in the
@@ -2334,7 +2335,9 @@ to handle."
         ;; 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
         ;; 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
                  `(("/bin/sh" ,(file-append (canonical-package bash)