My XMonad config

xmonad.hs

-- https://gist.github.com/1967358

import XMonad
import XMonad.Config.Xfce
import XMonad.Util.CustomKeys

import qualified Data.Map as M

main = xmonad xfceConfig {
    modMask = mod4Mask,
    terminal = "x-terminal-emulator",
    keys = customKeys delKeys insKeys
}

delKeys XConfig {modMask = modm} =
    [ (modm, xK_p)
    , (modm, xK_t)
    ]

insKeys XConfig {modMask = modm} =
    [ ((modm, xK_p), spawn "dmenu_run -b")
    ]