ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-24 11:39:46 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

services: xorg: Assume STARTX is a regular value.

Browse source 
* gnu/services/xorg.scm (slim-service): Expect STARTX to be a regular value,
  not a monadic value.
This commit is contained in:
Ludovic Courtès 2015-05-21 22:22:12 +02:00
parent 12422c9d38
commit 1eca6c36ad
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gnu/services/xorg.scm
View file

@ -246,7 +246,9 @@ (define* (slim-service #:key (slim slim)
theme."
(define (slim.cfg)
(mlet %store-monad ((startx (or startx (xorg-start-command)))
(mlet %store-monad ((startx (if startx
(return startx)
(xorg-start-command)))
(xinitrc (xinitrc #:fallback-session
auto-login-session)))
(text-file* "slim.cfg" "