You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

34 lines
1.1 KiB
Haskell

module Main where
import XMonad
import XMonad.Hooks.EwmhDesktops (ewmh)
import XMonad.Hooks.ManageDocks
import XMonad.Layout.Spacing
import XMonad.Util.EZConfig
import System.Taffybar.Hooks.PagerHints (pagerHints)
lightBlue = "#66aaff"
main = xmonad $ docks $ ewmh $ pagerHints defaultConfig
{ terminal = "urxvt"
, modMask = mod4Mask
, workspaces = [ "1", "2", "3" ]
, borderWidth = 2
, normalBorderColor = "#000000"
, focusedBorderColor = lightBlue
, focusFollowsMouse = False
, layoutHook = avoidStruts $ spacingWithEdge 6 $ layoutHook defaultConfig
, startupHook = do
spawn "pkill polybar; polybar top &"
spawn "compton"
spawn "xsetroot -solid black -cursor_name left_ptr"
spawn "feh --bg-fill ~/Sync/Pictures/Wallpaper/space2.jpg"
}
`additionalKeysP`
[ ("M1-<Space>", spawn "rofi -show combi")
, ("M-p", spawn "rofi -show combi")
, ("<XF86AudioMute>", spawn "amixer set Master toggle")
, ("<XF86AudioLowerVolume>", spawn "amixer -q sset Master 5%-")
, ("<XF86AudioRaiseVolume>", spawn "amixer -q sset Master 5%+")
]