My Xmonad Config

gistfile1.hs

import XMonad
import XMonad.Core
import XMonad.Config.Gnome
import XMonad.Util.Dmenu
import XMonad.Layout.NoBorders
import qualified XMonad.StackSet as W
import qualified Data.Map        as M
import XMonad.Hooks.ManageDocks

myManageHook = composeAll
    [ className =? "MPlayer"          --> doFloat
    , title =? "GNU Image Manipulation Program" --> doFloat
    , title =? "GIMP"                  --> doFloat
    , className =? "Do"               --> doIgnore
    , className =? "Gnome-Screenshot" --> doIgnore
    , className =? "Tilda"            --> doFloat
    , className =? "feh"              --> doFloat
    , className =? "Pidgin"           --> doFloat
    , className =? "Skype"            --> doFloat
    , className =? "Amarokapp"        --> doFloat
    , title     =? "Save a Bookmark"  --> doFloat
    , className =? "Download"         --> doFloat
    , className =? "Extension"        --> doFloat
    , className =? "Qalculate-gtk"    --> doFloat
    , className =? "Terminator"       --> doF (W.shift "terms" )
    , className =? "Prism"            --> doF (W.shift "prism" )
    , className =? "Firefox"          --> doF (W.shift "web" )
    -- main is the desktop where i keep chat, twitter and my tomboy todo list
    , className =? "Pidgin"           --> doF (W.shift "main" )
    , title =?     "Start Here"       --> doF (W.shift "main" )
    , title =?     "irssi"            --> doF (W.shift "main" )
    , className =? "Twhirl"           --> doF (W.shift "main" )
    , className =? "Gedit"            --> doF (W.shift "code" )
    , title =?     "Brood War"        --> doIgnore
    , resource  =? "desktop_window"   --> doIgnore
    , resource  =? "kdeskt6op"        --> doIgnore ]
                <+> manageDocks

main = xmonad gnomeConfig {
          modMask = mod4Mask
          , terminal = "terminator"
          , focusFollowsMouse = True
          , layoutHook  = smartBorders (layoutHook gnomeConfig)
          , borderWidth = 1
          , manageHook  = myManageHook
    }