services: Add home-polkit-gnome-service-type.

* modules/rosenthal/services/desktop.scm (%home-polkit-gnome-shepherd): New
procedure.
(home-noctalia-shell-service-type): New variable.
This commit is contained in:
Hilton Chain 2026-02-10 20:01:30 +08:00
parent a30c11dcea
commit 178a9d43fb
No known key found for this signature in database
GPG Key ID: ACC66D09CA528292

View File

@ -37,6 +37,7 @@
#:use-module (gnu packages gnome)
#:use-module (gnu packages linux)
#:use-module (gnu packages networking)
#:use-module (gnu packages polkit)
#:use-module (gnu packages qt)
#:use-module (gnu packages wm)
#:use-module (gnu packages xorg)
@ -59,6 +60,8 @@
home-noctalia-shell-configuration
home-noctalia-shell-service-type
home-polkit-gnome-service-type
home-rofi-configuration
home-rofi-service-type
@ -334,6 +337,28 @@ compositor.")))
(default-value (home-noctalia-shell-configuration))
(description "")))
;;;
;;; polkit-gnome
;;;
(define (%home-polkit-gnome-shepherd _)
(list (shepherd-service
(provision '(polkit-gnome))
(start
#~(make-forkexec-constructor
(list #$(file-append polkit-gnome "/libexec/polkit-gnome-authentication-agent-1"))))
(stop #~(make-kill-destructor)))))
(define home-polkit-gnome-service-type
(service-type
(name 'home-polkit-gnome)
(extensions
(list (service-extension home-shepherd-service-type
%home-polkit-gnome-shepherd)))
(default-value #f)
(description "")))
;;;
;;; rofi