fix xmonad, sorr guys

This commit is contained in:
dave 2009-04-06 15:22:14 -05:00
parent becb818b68
commit ab49e643a2

View file

@ -30,7 +30,7 @@ myLayoutHook = tiled ||| Mirror tiled ||| Grid ||| Full
delta = 3/100
main = do
xmproc <- spawnPipe "~/.cabal/bin/xmobar"
xmproc <- spawnPipe "xmobar"
xmonad $ defaultConfig
{ manageHook = manageDocks <+> manageHook defaultConfig
, layoutHook = avoidStruts $ smartBorders $ myLayoutHook
@ -38,7 +38,6 @@ main = do
{ ppOutput = hPutStrLn xmproc
, ppTitle = xmobarColor "green" ""
}
, terminal = "uxterm /bin/zsh"
}
`additionalKeysP`
[ ("M-p", shellPrompt defaultXPConfig { position = Top })