summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/xmonad.hs18
1 files changed, 9 insertions, 9 deletions
diff --git a/lib/xmonad.hs b/lib/xmonad.hs
index 30c6afd..9972bf0 100644
--- a/lib/xmonad.hs
+++ b/lib/xmonad.hs
@@ -118,15 +118,15 @@ goldenSpiral :: SpiralWithDir a
goldenSpiral = spiral (6 / 7)
myWorkspaces :: [String]
-myWorkspaces = ["1[chat]", "2[emacs]", "3[work]", "4[dandel]", "5[sabten]", "6[study]"] ++ map show [7 .. 9]
+myWorkspaces = ["1[work]", "2[chat]", "3[lithium]", "4", "5[mon]", "6"] ++ map show [7 .. 9]
addSpace :: l a -> ModifiedLayout Spacing l a
addSpace =
spacingRaw
+ False
+ (Border 10 10 10 10)
True
- (Border 5 5 5 5)
- True
- (Border 5 5 5 5)
+ (Border 10 10 10 10)
True
myTabCfg theme =
@@ -141,16 +141,16 @@ myTabCfg theme =
myLayout theme =
avoidStruts $
noBorders (tabbed shrinkText $ myTabCfg theme)
- ||| noBorders Full
+ ||| (addSpace $ noBorders Full)
||| twopane
||| Mirror twopane
- ||| ThreeCol 1 (3 / 100) (1 / 2)
- ||| ThreeColMid 1 (3 / 100) (1 / 2)
+-- ||| ThreeCol 1 (3 / 100) (1 / 2)
+-- ||| ThreeColMid 1 (3 / 100) (1 / 2)
||| tiled
||| Mirror tiled
||| emptyBSP
- ||| goldenSpiral
- ||| Spiral R Dwindle.CW (3 / 2) (11 / 10) -- L/R is where to put non-main windows
+-- ||| goldenSpiral
+-- ||| Spiral R Dwindle.CW (3 / 2) (11 / 10) -- L/R is where to put non-main windows
where
-- The last parameter is fraction to multiply the slave window heights
-- with. Useless here.