summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
author宋文武 <iyzsong@member.fsf.org>2025-01-12 14:05:16 +0800
committer宋文武 <iyzsong@member.fsf.org>2025-01-12 14:18:03 +0800
commit5d6c8767f67885bc9b2c8f18ab1f667d0065346b (patch)
tree02fdef460be302aa58100729abd7da4ffe64bdba
parenta9a13ebccc1479e334630a811cec255eab0abe00 (diff)
gnu: xfce: Enable xfce4-screensaver.
This fixes <https://issues.guix.gnu.org/75288>. * gnu/packages/xfce.scm (xfce)[inputs]: Add xfce4-screensaver. * gnu/services/desktop.scm (xfce-pam-services): New procedure. (xfce-desktop-service-type): Add a extension for pam-root-service-type. Change-Id: I4bdf5088f4ccc743afdcfdd2d68541c2d883552d
-rw-r--r--gnu/packages/xfce.scm1
-rw-r--r--gnu/services/desktop.scm5
2 files changed, 6 insertions, 0 deletions
diff --git a/gnu/packages/xfce.scm b/gnu/packages/xfce.scm
index c2f4392f76..43722cf484 100644
--- a/gnu/packages/xfce.scm
+++ b/gnu/packages/xfce.scm
@@ -1375,6 +1375,7 @@ for and start applications.")
xfce4-notifyd ;for pop-up notifications
xfce4-panel
xfce4-power-manager
+ xfce4-screensaver
xfce4-screenshooter
xfce4-session
xfce4-settings
diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index fa1a516768..2e9fa1be7d 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -1660,12 +1660,17 @@ rules."
'("thunar"
"xfce4-power-manager"))))
+(define (xfce-pam-services config)
+ (list (unix-pam-service "xfce4-screensaver")))
+
(define xfce-desktop-service-type
(service-type
(name 'xfce-desktop)
(extensions
(list (service-extension polkit-service-type
xfce-polkit-settings)
+ (service-extension pam-root-service-type
+ xfce-pam-services)
(service-extension profile-service-type
(compose list xfce-package))))
(default-value (xfce-desktop-configuration))