me
/
guix
Archived
1
0
Fork 0

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.
master
Danny Milosavljevic 2019-04-17 08:47:54 +02:00
parent 38dd8b6058
commit 0682f08463
No known key found for this signature in database
GPG Key ID: E71A35542C30BAA5
1 changed files with 6 additions and 2 deletions

View File

@ -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.")))