This is my xmonad config file.

xmonad.hs

import XMonad
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.EZConfig(additionalKeys)
import System.IO
import Control.Concurrent
import XMonad.Hooks.ManageHelpers
import XMonad.Layout.NoBorders

startup :: X ()

startup = do
    spawn "~/.xmonadstartup"

myManageHook = composeAll
    [ className =? "Do" --> doIgnore
    , isFullscreen --> doFullFloat
    , manageDocks]

main = do
xmproc <- spawnPipe "/usr/bin/xmobar /home/tim/.xmobarrc"
xmonad $ defaultConfig
    { manageHook = myManageHook <+> manageHook defaultConfig 
    , layoutHook = avoidStruts  $  layoutHook defaultConfig
    , terminal = "/usr/bin/urxvt"
    , logHook = dynamicLogWithPP xmobarPP
                            { ppOutput = hPutStrLn xmproc
                            , ppTitle = xmobarColor "green" "" . shorten 50
                            }
    , modMask = mod4Mask -- Rebind Mod to the Windows key
    , startupHook        = startup
    } `additionalKeys`
    [ ((mod4Mask .|. shiftMask, xK_z), spawn "gnome-screensaver-command --lock") --mod4mask is the windows key
    , ((controlMask, xK_Print), spawn "sleep 0.2; gnome-screenshot -w")
    , ((mod4Mask .|. shiftMask, xK_g), spawn "google-chrome")
    , ((mod4Mask .|. shiftMask, xK_s), spawn "subl")
    , ((mod4Mask .|. shiftMask, xK_f), spawn "nautilus")
    , ((mod4Mask .|. shiftMask, xK_e), spawn "emacs")
    , ((0, xK_Print), spawn "gnome-screenshot")
    , ((mod4Mask, xK_p), spawn "dmenu_run")
    ]