services: elogind: Provide '%elogind-file-systems' by extension.

* gnu/system/file-systems.scm (%base-file-systems): Remove
%ELOGIND-FILE-SYSTEMS.
* gnu/services/desktop.scm (elogind-service-type): Extend
FILE-SYSTEM-SERVICE-TYPE to provide %ELOGIND-FILE-SYSTEMS.
This commit is contained in:
Ludovic Courtès 2016-08-21 19:03:29 +02:00
parent aa1145df8d
commit 3cf319a3f8
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 7 additions and 2 deletions

View file

@ -27,6 +27,8 @@ (define-module (gnu services desktop)
#:use-module (gnu services avahi)
#:use-module (gnu services xorg)
#:use-module (gnu services networking)
#:use-module ((gnu system file-systems)
#:select (%elogind-file-systems))
#:use-module (gnu system shadow)
#:use-module (gnu system pam)
#:use-module (gnu packages glib)
@ -760,7 +762,11 @@ (define elogind-service-type
;; Extend PAM with pam_elogind.so.
(service-extension pam-root-service-type
pam-extension-procedure)))))
pam-extension-procedure)
;; We need /run/user, /run/systemd, etc.
(service-extension file-system-service-type
(const %elogind-file-systems))))))
(define* (elogind-service #:key (config (elogind-configuration)))
"Return a service that runs the @command{elogind} login and seat management

View file

@ -257,7 +257,6 @@ (define %base-file-systems
(append (list %pseudo-terminal-file-system
%shared-memory-file-system
%immutable-store)
%elogind-file-systems
%control-groups))
;; File systems for Linux containers differ from %base-file-systems in that