civodul pushed a commit to branch master
in repository guix.
commit be1435d6687d6597e09676c2d6edd286cc4d5ad8
Author: Bruno Victal <[email protected]>
AuthorDate: Sat Feb 25 18:58:07 2023 +0000
services: desktop: Deprecate 'bluetooth-service' procedure.
* doc/guix.texi (Desktop Services): Remove mention of 'bluetooth-service'.
* gnu/services/desktop.scm (bluetooth-service): Deprecate procedure.
Signed-off-by: Ludovic Courtès <[email protected]>
---
doc/guix.texi | 9 ---------
gnu/services/desktop.scm | 5 +++--
2 files changed, 3 insertions(+), 11 deletions(-)
diff --git a/doc/guix.texi b/doc/guix.texi
index 74238cc150..dabd71f18c 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -23646,15 +23646,6 @@ The value for this service is a
@code{<geoclue-configuration>} object.
@c TODO: Document <geoclue-configuration>, preferably by refactoring this to
use
@c define-configuration and generating documentation from it.
-@deffn {Scheme Procedure} bluetooth-service [#:bluez @var{bluez}] @
- [@w{#:auto-enable? #f}]
-Return a service that runs the @command{bluetoothd} daemon, which
-manages all the Bluetooth devices and provides a number of D-Bus
-interfaces. When AUTO-ENABLE? is true, the bluetooth controller is
-powered automatically at boot, which can be useful when using a
-bluetooth keyboard or mouse.
-@end deffn
-
@defvar bluetooth-service-type
This is the type for the @uref{https://bluez.org/, Linux Bluetooth Protocol
Stack} (BlueZ) system, which generates the @file{/etc/bluetooth/main.conf}
diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index 073e0132e1..3ec746cdbd 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -112,7 +112,7 @@
bluetooth-service-type
bluetooth-configuration
bluetooth-configuration?
- bluetooth-service
+ bluetooth-service ; deprecated
elogind-configuration
elogind-configuration?
@@ -859,7 +859,8 @@ site} for more information."
(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-deprecated (bluetooth-service #:key (bluez bluez) (auto-enable? #f))
+ bluetooth-service-type
"Return a service that runs the @command{bluetoothd} daemon, which manages
all the Bluetooth devices and provides a number of D-Bus interfaces. When
AUTO-ENABLE? is true, the bluetooth controller is powered automatically at
