]> code.delx.au - dotfiles/commitdiff
xmonad: Use Tall for IM instead of Grid
authorJames Bunton <jamesbunton@delx.net.au>
Wed, 5 Sep 2012 03:49:25 +0000 (13:49 +1000)
committerJames Bunton <jamesbunton@delx.net.au>
Wed, 5 Sep 2012 03:56:35 +0000 (13:56 +1000)
.xmonad/xmonad.hs

index 48267e4745386d5d42901f232e76d213b1a20fef..a9edd5b8eef9bc7a94ea8953bf90ec02d543306c 100644 (file)
@@ -4,7 +4,6 @@ import XMonad.Hooks.DynamicLog
 import XMonad.Hooks.ICCCMFocus
 import XMonad.Hooks.ManageDocks
 import XMonad.Hooks.Script
-import XMonad.Layout.Grid
 import XMonad.Hooks.SetWMName
 import XMonad.Layout.IM
 import XMonad.Layout.LayoutHints
@@ -104,7 +103,8 @@ myFullLayout = createLayout "Full" $
 myTiledLayout = createLayout "Tall" $
        avoidStruts $
        Mag.magnifierOff $
-       Tall nMaster ratioIncrement ratio where
+       Tall nMaster ratioIncrement ratio
+       where
                nMaster = 1
                ratioIncrement = 3/100
                ratio = goldenRatio
@@ -116,9 +116,10 @@ myTabbedLayout = createLayout "Tab" $
 myImLayout = createLayout "IM" $
        avoidStruts $
        noFrillsDeco shrinkText defaultTheme $
-       withIM ratio roster $ GridRatio 1
+       withIM rosterRatio roster $
+       myTiledLayout
        where
-               ratio = 1/4
+               rosterRatio = 1/8
                roster = (Or (Title "Buddy List") (And (Resource "main") (ClassName "psi")))