01/02: services: bluetooth: Make public and searchable.

[guix-commits]

civodul pushed a commit to branch version-1.0.0
in repository guix.

commit 7614193099b7a3aa097df903b9da8345581c3289
Author: Ludovic Courtès <address@hidden>
Date:   Tue Apr 30 11:59:47 2019 +0200

    services: bluetooth: Make public and searchable.
    
    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.
---
 gnu/services/desktop.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index f31dbc1..12c62f0 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -93,6 +93,9 @@
             geoclue-service
             geoclue-service-type
 
+            bluetooth-service-type
+            bluetooth-configuration
+            bluetooth-configuration?
             bluetooth-service
 
             elogind-configuration
@@ -452,7 +455,9 @@ site} for more information."
                                `(("bluetooth"
                                   ,(bluetooth-directory config)))))
           (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))
   "Return a service that runs the @command{bluetoothd} daemon, which manages