ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 13:58:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

services: elogind, gnome, mate, xfce: Fix config type predicate identifiers.

Browse source 
* gnu/services/desktop.scm (<elogind-configuration>): Add question mark
in type predicate identifier.
(<gnome-desktop-configuration>): Likewise.
(<mate-desktop-configuration>): Likewise.
(<xfce-desktop-configuration>): Likewise.
This commit is contained in:
Ludovic Courtès 2019-10-22 17:29:35 +02:00
parent 73f0ed8dbf
commit 00850bb836
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
gnu/services/desktop.scm
View file

@ -580,7 +580,7 @@ (define* (udisks-service #:key (udisks udisks))
(define-record-type* <elogind-configuration> elogind-configuration (define-record-type* <elogind-configuration> elogind-configuration
make-elogind-configuration make-elogind-configuration
elogind-configuration elogind-configuration?
(elogind elogind-package (elogind elogind-package
(default elogind)) (default elogind))
(kill-user-processes? elogind-kill-user-processes? (kill-user-processes? elogind-kill-user-processes?
@ -834,7 +834,7 @@ (define cups-pk-helper-service-type
(define-record-type* <gnome-desktop-configuration> gnome-desktop-configuration (define-record-type* <gnome-desktop-configuration> gnome-desktop-configuration
make-gnome-desktop-configuration make-gnome-desktop-configuration
gnome-desktop-configuration gnome-desktop-configuration?
(gnome-package gnome-package (default gnome))) (gnome-package gnome-package (default gnome)))
(define (gnome-polkit-settings config) (define (gnome-polkit-settings config)
@ -872,7 +872,7 @@ (define-deprecated (gnome-desktop-service #:key (config
(define-record-type* <mate-desktop-configuration> mate-desktop-configuration (define-record-type* <mate-desktop-configuration> mate-desktop-configuration
make-mate-desktop-configuration make-mate-desktop-configuration
mate-desktop-configuration mate-desktop-configuration?
(mate-package mate-package (default mate))) (mate-package mate-package (default mate)))
(define mate-desktop-service-type (define mate-desktop-service-type
@ -905,7 +905,7 @@ (define-deprecated (mate-desktop-service #:key
(define-record-type* <xfce-desktop-configuration> xfce-desktop-configuration (define-record-type* <xfce-desktop-configuration> xfce-desktop-configuration
make-xfce-desktop-configuration make-xfce-desktop-configuration
xfce-desktop-configuration xfce-desktop-configuration?
(xfce xfce-package (default xfce))) (xfce xfce-package (default xfce)))
(define (xfce-polkit-settings config) (define (xfce-polkit-settings config)