1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
import XMonad
import XMonad.Config.Gnome
import XMonad.ManageHook
import XMonad.Hooks.ManageHelpers

myManageHook :: [ManageHook]
myManageHook = 
    [ resource  =? "Do"   --> doIgnore 
    ]

main = xmonad gnomeConfig
    { manageHook = manageHook gnomeConfig <+> composeAll myManageHook
    , borderWidth        = 9
    , terminal           = "urxvt"
    , normalBorderColor  = "#cccccc"
    , focusedBorderColor = "#82ac82"
    , focusFollowsMouse  = False
    }