Browse Source

services: xorg: Assume STARTX is a regular value.

* gnu/services/xorg.scm (slim-service): Expect STARTX to be a regular value,
  not a monadic value.
version-0.8.3
Ludovic Courtès 7 years ago
parent
commit
1eca6c36ad
  1. 4
      gnu/services/xorg.scm

4
gnu/services/xorg.scm

@ -246,7 +246,9 @@ theme to use. In that case, @var{theme-name} specifies the name of the
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" "

Loading…
Cancel
Save