mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-07 07:26:13 -05:00
services: polkit: Migrate to (gnu system privilege).
* gnu/services/dbus.scm (polkit-setuid-programs): Rename this… (polkit-privileged-programs): …to this. (polkit-service-type): Extend PRIVILEGED-PROGRAM-SERVICE-TYPE with it. Change-Id: Iae742ada6162301cdca9df5df5502f70037aaef2
This commit is contained in:
parent
c6fe8424e4
commit
67f4a3ddfd
1 changed files with 3 additions and 4 deletions
|
@ -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-configuration> polkit packages)
|
||||
`(("polkit-1" ,(polkit-directory (cons polkit packages)))))))
|
||||
|
||||
(define polkit-setuid-programs
|
||||
(define polkit-privileged-programs
|
||||
(match-lambda
|
||||
(($ <polkit-configuration> 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}.
|
||||
|
|
Loading…
Reference in a new issue