diff --git a/gnu/services/dbus.scm b/gnu/services/dbus.scm index f9529f2934..76e04bf221 100644 --- a/gnu/services/dbus.scm +++ b/gnu/services/dbus.scm @@ -24,7 +24,6 @@ (define-module (gnu services dbus) #:use-module (gnu services) #:use-module (gnu services shepherd) #:use-module (gnu system privilege) - #:use-module (gnu system setuid) #:use-module (gnu system shadow) #:use-module (gnu system pam) #:use-module ((gnu packages glib) #:select (dbus)) @@ -390,7 +389,7 @@ (define polkit-etc-files (($ polkit packages) `(("polkit-1" ,(polkit-directory (cons polkit packages))))))) -(define polkit-setuid-programs +(define polkit-privileged-programs (match-lambda (($ polkit) (map file-like->setuid-program @@ -410,8 +409,8 @@ (define polkit-service-type polkit-configuration-polkit)) (service-extension etc-service-type polkit-etc-files) - (service-extension setuid-program-service-type - polkit-setuid-programs))) + (service-extension privileged-program-service-type + polkit-privileged-programs))) ;; Extensions are lists of packages that provide polkit rules ;; or actions under share/polkit-1/{actions,rules.d}.