import XMonad import XMonad.Config.Desktop -- Utilities import XMonad.Util.SpawnOnce import XMonad.Util.EZConfig(additionalKeysP) -- Layouts import XMonad.Layout.NoBorders main = do xmonad $ desktopConfig { modMask = mod4Mask -- mod key to super , terminal = "st" , borderWidth = 1 , focusFollowsMouse = False -- don't change window based on mouse position (need to click) , normalBorderColor = "#292d3e" , focusedBorderColor = "#bbc5ff" , layoutHook = myLayouts } `additionalKeysP` myKeys myLayouts = tiled ||| Mirror tiled ||| noBorders Full where tiled = Tall 1 (3 / 100) (1 / 2) myKeys = [ ("", spawn "pulseaudio-ctl up") , ("", spawn "pulseaudio-ctl down") , ("", spawn "pulseaudio-ctl mute") , ("", spawn "xbacklight -inc 5") , ("", spawn "xbacklight -dec 5") ]