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:
parent
aa1145df8d
commit
3cf319a3f8
|
@ -27,6 +27,8 @@
|
||||||
#:use-module (gnu services avahi)
|
#:use-module (gnu services avahi)
|
||||||
#:use-module (gnu services xorg)
|
#:use-module (gnu services xorg)
|
||||||
#:use-module (gnu services networking)
|
#:use-module (gnu services networking)
|
||||||
|
#:use-module ((gnu system file-systems)
|
||||||
|
#:select (%elogind-file-systems))
|
||||||
#:use-module (gnu system shadow)
|
#:use-module (gnu system shadow)
|
||||||
#:use-module (gnu system pam)
|
#:use-module (gnu system pam)
|
||||||
#:use-module (gnu packages glib)
|
#:use-module (gnu packages glib)
|
||||||
|
@ -760,7 +762,11 @@ seats.)"
|
||||||
|
|
||||||
;; Extend PAM with pam_elogind.so.
|
;; Extend PAM with pam_elogind.so.
|
||||||
(service-extension pam-root-service-type
|
(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)))
|
(define* (elogind-service #:key (config (elogind-configuration)))
|
||||||
"Return a service that runs the @command{elogind} login and seat management
|
"Return a service that runs the @command{elogind} login and seat management
|
||||||
|
|
|
@ -257,7 +257,6 @@ TARGET in the other system."
|
||||||
(append (list %pseudo-terminal-file-system
|
(append (list %pseudo-terminal-file-system
|
||||||
%shared-memory-file-system
|
%shared-memory-file-system
|
||||||
%immutable-store)
|
%immutable-store)
|
||||||
%elogind-file-systems
|
|
||||||
%control-groups))
|
%control-groups))
|
||||||
|
|
||||||
;; File systems for Linux containers differ from %base-file-systems in that
|
;; File systems for Linux containers differ from %base-file-systems in that
|
||||||
|
|
Loading…
Reference in New Issue