From be1435d6687d6597e09676c2d6edd286cc4d5ad8 Mon Sep 17 00:00:00 2001 From: Bruno Victal Date: Sat, 25 Feb 2023 18:58:07 +0000 Subject: services: desktop: Deprecate 'bluetooth-service' procedure. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * doc/guix.texi (Desktop Services): Remove mention of 'bluetooth-service'. * gnu/services/desktop.scm (bluetooth-service): Deprecate procedure. Signed-off-by: Ludovic Courtès --- 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{} object. @c TODO: Document , 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 -- cgit 1.4.1