01/01: services: fprintd: Fix service.

[guix-commits]

dannym pushed a commit to branch master
in repository guix.

commit 0682f084635cdc289aabafc4b2583639e00a28b3
Author: Danny Milosavljevic <address@hidden>
Date:   Wed Apr 17 08:47:54 2019 +0200

    services: fprintd: Fix service.
    
    * gnu/services/authentication.scm (<fprintd-configuration>)[ntp]: Rename 
to...
    [fprintd]: ...this.
    (fprintd-dbus-service): New procedure.
    (fprintd-service-type): Use it.
    [default-value]: Add value.
---
 gnu/services/authentication.scm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/gnu/services/authentication.scm b/gnu/services/authentication.scm
index ab54aaf..6a9dab9 100644
--- a/gnu/services/authentication.scm
+++ b/gnu/services/authentication.scm
@@ -45,14 +45,18 @@
 (define-record-type* <fprintd-configuration>
   fprintd-configuration make-fprintd-configuration
   fprintd-configuration?
-  (ntp      fprintd-configuration-fprintd
+  (fprintd  fprintd-configuration-fprintd
             (default fprintd)))
 
+(define (fprintd-dbus-service config)
+  (list (fprintd-configuration-fprintd config)))
+
 (define fprintd-service-type
   (service-type (name 'fprintd)
                 (extensions
                  (list (service-extension dbus-root-service-type
-                                          list)))
+                                          fprintd-dbus-service)))
+                (default-value (fprintd-configuration))
                 (description
                  "Run fprintd, a fingerprint management daemon.")))