Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- import XMonad
- import XMonad.Hooks.ManageDocks
- import XMonad.Hooks.ManageHelpers
- import XMonad.Hooks.SetWMName
- import XMonad.Hooks.EwmhDesktops
- import XMonad.Config.Xfce
- myManageHook = composeAll
- [ className =? "Xfrun4" --> doCenterFloat
- , manageDocks
- ]
- main = xmonad xfceConfig
- { modMask = mod4Mask
- --, workspaces = ["1:term","2:vim","3:web","4:comm","5","6","7"]
- , terminal = "xfce4-terminal"
- , manageHook = myManageHook <+> manageHook xfceConfig
- , normalBorderColor = "gray20"
- , focusedBorderColor = "gray80"
- , startupHook = startupHook xfceConfig >> setWMName "LG3D"
- , handleEventHook = fullscreenEventHook <+> handleEventHook xfceConfig
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement