mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
services: elogind, gnome, mate, xfce: Fix config type predicate identifiers.
* 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:
parent
73f0ed8dbf
commit
00850bb836
1 changed files with 4 additions and 4 deletions
|
@ -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)
|
||||||
|
|
Loading…
Reference in a new issue