mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
services: xorg: Properly handle the case where ~/.xession is used.
Fixes a regression introduced in
65c0f43649
in the case where users provide
~/.xsession and SESSION is #f.
* gnu/services/xorg.scm (xinitrc): In the XSESSION-FILE case, check
whether SESSION is #f.
This commit is contained in:
parent
78bae62a25
commit
617e87bff1
1 changed files with 2 additions and 1 deletions
|
@ -390,7 +390,8 @@ (define (find-session profile)
|
||||||
x))))
|
x))))
|
||||||
(if (file-exists? xsession-file)
|
(if (file-exists? xsession-file)
|
||||||
;; Run ~/.xsession when it exists.
|
;; Run ~/.xsession when it exists.
|
||||||
(apply exec-from-login-shell xsession-file session)
|
(apply exec-from-login-shell xsession-file
|
||||||
|
(or session '()))
|
||||||
;; Otherwise, start the specified session or a fallback.
|
;; Otherwise, start the specified session or a fallback.
|
||||||
(apply exec-from-login-shell
|
(apply exec-from-login-shell
|
||||||
(or session
|
(or session
|
||||||
|
|
Loading…
Reference in a new issue