diff options
author | Bruno Victal <mirai@makinata.eu> | 2023-02-25 18:58:04 +0000 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2023-03-03 17:55:34 +0100 |
commit | ffc5d42fc2589c349579c00e9dd11fabdff2663b (patch) | |
tree | ea2dd2e1b87933bae294af794627a951b23cee26 /gnu | |
parent | c3dc13e29c624609b851ef50db343074fad2d7cb (diff) | |
download | guix-ffc5d42fc2589c349579c00e9dd11fabdff2663b.tar.gz |
services: dbus: Deprecate 'polkit-service' procedure.
* doc/guix.texi (Desktop Services): Replace 'polkit-service' with 'polkit-service-type'. * gnu/services/dbus.scm (polkit-service): Deprecate procedure. * gnu/tests/docker.scm (%docker-os): Use polkit-service-type. * gnu/tests/virtualization.scm (%libvirt-os): Ditto. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/services/dbus.scm | 6 | ||||
-rw-r--r-- | gnu/tests/docker.scm | 2 | ||||
-rw-r--r-- | gnu/tests/virtualization.scm | 2 |
3 files changed, 6 insertions, 4 deletions
diff --git a/gnu/services/dbus.scm b/gnu/services/dbus.scm index 5efd6bdadf..ea2593501f 100644 --- a/gnu/services/dbus.scm +++ b/gnu/services/dbus.scm @@ -28,6 +28,7 @@ #:use-module ((gnu packages glib) #:select (dbus)) #:use-module (gnu packages polkit) #:use-module (gnu packages admin) + #:use-module (guix deprecation) #:use-module (guix gexp) #:use-module ((guix packages) #:select (package-name)) #:use-module (guix records) @@ -43,7 +44,7 @@ polkit-configuration polkit-configuration? polkit-service-type - polkit-service)) + polkit-service)) ; deprecated ;;; ;;; D-Bus. @@ -404,7 +405,8 @@ management service}, which allows system administrators to grant access to privileged operations in a structured way. Polkit is a requirement for most desktop environments, such as GNOME."))) -(define* (polkit-service #:key (polkit polkit)) +(define-deprecated (polkit-service #:key (polkit polkit)) + polkit-service-type "Return a service that runs the @uref{http://www.freedesktop.org/wiki/Software/polkit/, Polkit privilege management service}, which allows system administrators to grant access to diff --git a/gnu/tests/docker.scm b/gnu/tests/docker.scm index 4267ff89a8..e464ec587e 100644 --- a/gnu/tests/docker.scm +++ b/gnu/tests/docker.scm @@ -49,7 +49,7 @@ (simple-operating-system (service dhcp-client-service-type) (dbus-service) - (polkit-service) + (service polkit-service-type) (service elogind-service-type) (service docker-service-type))) diff --git a/gnu/tests/virtualization.scm b/gnu/tests/virtualization.scm index 60789fbb5b..6749ade4bd 100644 --- a/gnu/tests/virtualization.scm +++ b/gnu/tests/virtualization.scm @@ -50,7 +50,7 @@ (simple-operating-system (service dhcp-client-service-type) (dbus-service) - (polkit-service) + (service polkit-service-type) (service libvirt-service-type))) (define (run-libvirt-test) |