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 $ defaultConfig { terminal = "alacritty" , modMask = mod4Mask , workspaces = [ "α", "β", "γ", "δ", "ε"] , borderWidth = 2 , normalBorderColor = "#000000" , focusedBorderColor = lightBlue , layoutHook = avoidStruts $ spacingWithEdge 6 $ layoutHook defaultConfig , startupHook = do spawn "pkill polybar; polybar top &" -- spawn "compton -cGb" -- spawn "~/dotfiles/logitech_linux_mouse.sh" -- spawn "xsetroot -solid black -cursor_name left_ptr" -- spawn "feh --bg-fill ~/Sync/Pictures/Wallpaper/space2.jpg" -- spawn "setxkbmap -option ctrl:nocaps -option compose:ralt" -- spawn "xcape -e 'Control_L=Escape'" -- spawn "qsyncthingtray" -- spawn "xscreensaver" } `additionalKeysP` [ ("M1-", spawn "rofi -show combi") , ("M-p", spawn "rofi -show combi") , ("", spawn "amixer set Master toggle") , ("", spawn "amixer -q sset Master 5%-") , ("", spawn "amixer -q sset Master 5%+") , ("C-M-M1-b", spawn "qutebrowser") , ("C-M-M1-e", spawn "emacsclient -c") ]