]> code.delx.au - dotfiles/commitdiff
xmonad: master tabbed layout
authorJames Bunton <jamesbunton@delx.net.au>
Sat, 15 Mar 2014 00:07:13 +0000 (11:07 +1100)
committerJames Bunton <jamesbunton@delx.net.au>
Sat, 15 Mar 2014 00:20:29 +0000 (11:20 +1100)
.xmonad/xmonad.hs

index a96badc899c1293b003eb3651274afcfa7d88cae..0a5fd2f73bf91c853eaea60d73026cc5412c539b 100644 (file)
@@ -10,6 +10,7 @@ import XMonad.Hooks.SetWMName
 import XMonad.Layout.IM
 import XMonad.Layout.LayoutHints
 import qualified XMonad.Layout.Magnifier as Mag
+import XMonad.Layout.Master
 import XMonad.Layout.NoBorders
 import XMonad.Layout.NoFrillsDecoration
 import XMonad.Layout.PerWorkspace
@@ -17,7 +18,6 @@ import XMonad.Layout.Renamed
 import XMonad.Layout.Reflect
 import XMonad.Layout.Tabbed
 import XMonad.Layout.ThreeColumns
-import XMonad.Layout.TwoPane
 import XMonad.Util.Run(spawnPipe)
 import XMonad.Util.WindowProperties(getProp32s)
 import qualified Data.Map as M
@@ -147,10 +147,11 @@ myThreeColLayout = createLayout "ThreeCol" $
                masterRatio = 4/10
                numMaster = 1
 
-myTwoPaneLayout = createLayout "TwoPane" $
+myMasterTabbedLayout = createLayout "MTab" $
        avoidStruts $
        Mag.magnifierOff $
-       TwoPane resizeDelta masterRatio
+       mastered resizeDelta masterRatio $
+       tabbed shrinkText myTitleTheme
        where
                resizeDelta = 3/100
                masterRatio = goldenRatio
@@ -181,7 +182,7 @@ referenceAllLayoutsToAvoidErrors =
        myTiledLayout |||
        myTabbedLayout |||
        myThreeColLayout |||
-       myTwoPaneLayout |||
+       myMasterTabbedLayout |||
        myImLayout |||
        myGimpLayout