)

import XMonad
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.EZConfig(additionalKeys)
import System.IO

myManageHook = composeAll
	[ className =? "Vncviewer" --> doFloat -- Float Vncviewer
	]

main = do
    xmproc <- spawnPipe "/usr/bin/xmobar /home/<your-name-here>/.xmobarrc" -- XMobar config
    xmonad $ defaultConfig
        { manageHook = manageDocks <+> myManageHook <+> manageHook defaultConfig
        , layoutHook = avoidStruts  $  layoutHook defaultConfig
        , logHook = dynamicLogWithPP $ xmobarPP
                        { ppOutput = hPutStrLn xmproc
                        , ppTitle = xmobarColor "green" "" . shorten 50 -- Window title
                        }
        , modMask = mod4Mask     -- Rebind Mod to the Windows key
        } `additionalKeys`
        [ ((mod4Mask .|. shiftMask, xK_z), spawn "xscreensaver-command -lock") -- Lock the screen with Win-Z
        , ((controlMask, xK_Print), spawn "sleep 0.2; scrot -s") -- Ctrl-Print screenshots the current window
        , ((0, xK_Print), spawn "scrot") -- Print screenshots the whole screen
        ]		

.xmobarrc (this goes in $HOME)

Config { font = "-*-Fixed-Bold-R-Normal-*-13-*-*-*-*-*-*-*"
       , bgColor = "black"
       , fgColor = "grey"
       , position = TopW L 90
       , commands = [ Run Cpu ["-L","3","-H","50","--normal","green","--high","red"] 10
                    , Run Memory ["-t","Mem: <usedratio>%"] 10
                    , Run Swap [] 10
                    , Run Date "%a %b %_d %l:%M" "date" 10
                    , Run StdinReader
                    ]
       , sepChar = "%"
       , alignSep = "}{"
       , template = "%StdinReader% }{ %cpu% | %memory% * %swap%    <fc=#ee9a00>%date%</fc>"
       }

.xsession (this goes in $HOME)

xrdb -merge .Xresources
trayer --edge top --align right --SetDockType true --SetPartialStrut true --expand true --width 10 --transparent true --tint 0x191970 --height 12 &
xsetroot -solid midnightblue
xscreensaver -no-splash &
if test -x /usr/bin/nm-applet; then
	nm-applet --sm-disable &
fi

# I use these for g-p-m and g-s-d on my laptop.

if test -x /usr/bin/gnome-power-manager; then
	sleep 3
	gnome-power-manager &
fi

if test -x /usr/bin/gnome-settings-daemon; then
	gnome-settings-daemon &
fi

xmonad