Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- import XMonad
- import XMonad.Config.Gnome
- import XMonad.ManageHook
- import XMonad.Hooks.ManageHelpers
- import XMonad.Layout.NoBorders
- myManageHook :: [ManageHook]
- myManageHook =
- [ resource =? "Do" --> doIgnore
- , isFullscreen --> doFullFloat ]
- main = xmonad $ gnomeConfig
- { manageHook = manageHook gnomeConfig <+> composeAll myManageHook
- --, modMask = mod4Mask
- , borderWidth = 2
- --, normalBorderColor = "#e48737"
- , focusedBorderColor = "#1B2487"
- , layoutHook = smartBorders $ layoutHook gnomeConfig
- }
Add Comment
Please, Sign In to add comment