blob: 156a2a82f122471e576b931e342636b9c31ecb22 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
{-# LANGUAGE FlexibleInstances #-}
module Propellor.Property.LightDM where
import Propellor
import qualified Propellor.Property.ConfFile as ConfFile
-- | Configures LightDM to skip the login screen and autologin as a user.
autoLogin :: User -> Property NoInfo
autoLogin (User u) = "/etc/lightdm/lightdm.conf" `ConfFile.containsIniPair`
("SeatDefaults", "autologin-user", u)
`describe` "lightdm autologin"
|
