aboutsummaryrefslogtreecommitdiff
path: root/gnu/services/sddm.scm
diff options
context:
space:
mode:
authorJakub Kądziołka <kuba@kadziolka.net>2020-02-16 12:58:33 +0100
committerJakub Kądziołka <kuba@kadziolka.net>2020-03-01 14:13:27 +0100
commit50be0da7bfd5c108697679effeb2a893d2f37598 (patch)
tree092388b5abe80212ac84096e255a4fb9f5fb747d /gnu/services/sddm.scm
parent9b9ab657cc9df579cdb2ff9282a7117a86212d31 (diff)
downloadpatches-50be0da7bfd5c108697679effeb2a893d2f37598.tar
patches-50be0da7bfd5c108697679effeb2a893d2f37598.tar.gz
services: set-xorg-configuration: handle slim and sddm
* gnu/services/xorg.scm (handle-xorg-configuration): New syntax. (gdm-service-type, slim-service-type): Use handle-xorg-configuration. * gnu/services/sddm.scm (sddm-service-type): Likewise.
Diffstat (limited to 'gnu/services/sddm.scm')
-rw-r--r--gnu/services/sddm.scm34
1 files changed, 18 insertions, 16 deletions
diff --git a/gnu/services/sddm.scm b/gnu/services/sddm.scm
index 473b4876a1..1921afce95 100644
--- a/gnu/services/sddm.scm
+++ b/gnu/services/sddm.scm
@@ -2,6 +2,7 @@
;;; Copyright © 2016 David Craven <david@craven.ch>
;;; Copyright © 2019 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2019 Jesse Gildersleve <jessejohngildersleve@protonmail.com>
+;;; Copyright © 2020 Jakub Kądziołka <kuba@kadziolka.net>
;;;
;;; This file is part of GNU Guix.
;;;
@@ -306,22 +307,23 @@ Relogin=" (if (sddm-configuration-relogin? config)
(compose list sddm-configuration-sddm))
(define sddm-service-type
- (service-type (name 'sddm)
- (extensions
- (list (service-extension shepherd-root-service-type
- sddm-shepherd-service)
- (service-extension etc-service-type
- sddm-etc-service)
- (service-extension pam-root-service-type
- sddm-pam-services)
- (service-extension account-service-type
- (const %sddm-accounts))
- (service-extension profile-service-type
- sddm-profile-service)))
- (default-value (sddm-configuration))
- (description
- "Run SDDM, a display and log-in manager for X11 and
-Wayland.")))
+ (handle-xorg-configuration sddm-configuration
+ (service-type (name 'sddm)
+ (extensions
+ (list (service-extension shepherd-root-service-type
+ sddm-shepherd-service)
+ (service-extension etc-service-type
+ sddm-etc-service)
+ (service-extension pam-root-service-type
+ sddm-pam-services)
+ (service-extension account-service-type
+ (const %sddm-accounts))
+ (service-extension profile-service-type
+ sddm-profile-service)))
+ (default-value (sddm-configuration))
+ (description
+ "Run SDDM, a display and log-in manager for X11 and
+Wayland."))))
(define-deprecated (sddm-service #:optional (config (sddm-configuration)))
sddm-service-type