ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-11 21:59:08 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

services: bluetooth: Make public and searchable.

Browse source 
Until now 'guix system search bluetooth' would turn up nothing.

* gnu/services/desktop.scm (bluetooth-service-type)
(bluetooth-configuration): Make public.
(bluetooth-service-type)[description]: New field.
This commit is contained in:
Ludovic Courtès 2019-04-30 11:59:47 +02:00
parent 5dd0d1f8b3
commit 7614193099
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
gnu/services/desktop.scm
View file

@ -93,6 +93,9 @@ (define-module (gnu services desktop)
geoclue-service geoclue-service
geoclue-service-type geoclue-service-type
bluetooth-service-type
bluetooth-configuration
bluetooth-configuration?
bluetooth-service bluetooth-service
elogind-configuration elogind-configuration
@ -452,7 +455,9 @@ (define bluetooth-service-type
`(("bluetooth" `(("bluetooth"
,(bluetooth-directory config))))) ,(bluetooth-directory config)))))
(service-extension shepherd-root-service-type (service-extension shepherd-root-service-type
(compose list bluetooth-shepherd-service)))))) (compose list bluetooth-shepherd-service))))
(description "Run the @command{bluetoothd} daemon, which manages all the
Bluetooth devices and provides a number of D-Bus interfaces.")))
(define* (bluetooth-service #:key (bluez bluez) (auto-enable? #f)) (define* (bluetooth-service #:key (bluez bluez) (auto-enable? #f))
"Return a service that runs the @command{bluetoothd} daemon, which manages "Return a service that runs the @command{bluetoothd} daemon, which manages