# HG changeset patch
# User Augie Fackler <durin42@gmail.com>
# Date 1270584633 18000
# Node ID 4481fb6c3dfe00ab76ea82318ff1a25fac4a0251
# Parent  e1a49db5c6ffbedcb5eb4bef9ea01834baa8b0bd
xmonad: tweak layout to include xmobar

diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
--- a/.xmonad/xmonad.hs
+++ b/.xmonad/xmonad.hs
@@ -1,10 +1,12 @@
 import XMonad
 
 import XMonad
+import XMonad.Hooks.ManageDocks
 import XMonad.Layout
 import XMonad.Layout.Column
 import XMonad.Layout.LayoutBuilder
 import XMonad.Util.EZConfig
+import XMonad.Util.Run(spawnPipe)
 
 myLayout = augie2 ||| augie1 ||| Full
   where augie2 = ((layoutN 2 (relBox 0 0 1 0.75) (Just $ relBox 0 0 1 1) $ (Tall 1 0.03 0.75))
@@ -14,10 +16,12 @@ myLayout = augie2 ||| augie1 ||| Full
 
 
 main :: IO ()
-main = xmonad $ defaultConfig
+main = do
+     xmobar <- spawnPipe "xmobar"
+     xmonad $ defaultConfig
        { terminal = "urxvt -sr -bg Black -fg White"
        , modMask = mod4Mask
-       , layoutHook = myLayout
+       , layoutHook = avoidStruts myLayout
        } `additionalKeys` [
          ((mod4Mask, xK_a), spawn "gnome-screensaver-command --lock")
          ]