import XMonad import XMonad.Config.Desktop -- Utilities import XMonad.Util.SpawnOnce import XMonad.Util.EZConfig(additionalKeysP) myModMask = mod4Mask myTerminal = "konsole" myTextEditor = "vim" myBorderWidth = 2 main = do xmonad $ desktopConfig { modMask = myModMask , terminal = myTerminal , startupHook = myStartupHook , borderWidth = myBorderWidth , normalBorderColor = "#292d3e" , focusedBorderColor = "#bbc5ff" } `additionalKeysP` myKeys myStartupHook = do spawnOnce "redshift -c /home/charles/.config/redshift.conf &" spawnOnce "xinput disable 'ETPS/2 Elantech Touchpad' &" myKeys = [ ("", spawn "pulseaudio-ctl up") , ("", spawn "pulseaudio-ctl down") , ("", spawn "pulseaudio-ctl mute") ] -- , ("", spawn "playerctl play-pause") -- , ("", spawn "playerctl previous") -- , ("", spawn "playerctl next") -- , ("", spawn "lux -a 5%") -- , ("", spawn "lux -s 5%")