aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDanny Milosavljevic <dannym@scratchpost.org>2019-04-17 08:47:54 +0200
committerDanny Milosavljevic <dannym@scratchpost.org>2019-04-17 08:51:11 +0200
commit0682f084635cdc289aabafc4b2583639e00a28b3 (patch)
tree934e7e0a9780f766df4fda8f6e05ce34a4b70af5
parent38dd8b60585fea6749a4fcd35ce167bdee8fb2e6 (diff)
downloadguix-0682f084635cdc289aabafc4b2583639e00a28b3.tar
guix-0682f084635cdc289aabafc4b2583639e00a28b3.tar.gz
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.
-rw-r--r--gnu/services/authentication.scm8
1 files changed, 6 insertions, 2 deletions
diff --git a/gnu/services/authentication.scm b/gnu/services/authentication.scm
index ab54aaf698..6a9dab9185 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.")))