aboutsummaryrefslogtreecommitdiff
path: root/gui/conf/xmonad.hs
diff options
context:
space:
mode:
authorAdrian Kummerlaender2018-10-25 21:01:23 +0200
committerAdrian Kummerlaender2018-10-25 21:01:23 +0200
commit5beed8746a13dfc150f1adc8426efbdccc440c9d (patch)
tree59ec824996bb91c0acb23f0a14633210545ef369 /gui/conf/xmonad.hs
parent0970412aded98e9a4cbafabab5373a52e0320f64 (diff)
downloadnixos_home-5beed8746a13dfc150f1adc8426efbdccc440c9d.tar
nixos_home-5beed8746a13dfc150f1adc8426efbdccc440c9d.tar.gz
nixos_home-5beed8746a13dfc150f1adc8426efbdccc440c9d.tar.bz2
nixos_home-5beed8746a13dfc150f1adc8426efbdccc440c9d.tar.lz
nixos_home-5beed8746a13dfc150f1adc8426efbdccc440c9d.tar.xz
nixos_home-5beed8746a13dfc150f1adc8426efbdccc440c9d.tar.zst
nixos_home-5beed8746a13dfc150f1adc8426efbdccc440c9d.zip
Add BSP layout to XMonad
Diffstat (limited to 'gui/conf/xmonad.hs')
-rw-r--r--gui/conf/xmonad.hs14
1 files changed, 9 insertions, 5 deletions
diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs
index d3e3431..b9f8f76 100644
--- a/gui/conf/xmonad.hs
+++ b/gui/conf/xmonad.hs
@@ -19,6 +19,8 @@ import XMonad.Layout.Renamed (Rename(..), renamed)
import XMonad.Layout.LayoutCombinators
import XMonad.Layout.LayoutModifier
import XMonad.Layout.Monitor
+import XMonad.Layout.BinarySpacePartition
+import XMonad.Layout.BorderResize
import XMonad.Util.Themes
import XMonad.Util.NamedScratchpad
@@ -55,7 +57,7 @@ customLayoutHook host = id
. smartBorders
. ModifiedLayout (hudMonitor host)
. mkToggle (single NBFULL)
- $ tabs ||| tiles ||| two ||| frame
+ $ tabs ||| tiles ||| two ||| frame ||| bsp
where
tabs = name "tabs" $ tabbed shrinkText customTabTheme
tiles = name "tiles" $ id
@@ -68,14 +70,16 @@ customLayoutHook host = id
. mkToggle (single REFLECTY)
. reflectVert
$ OneBig (2/3) (4/5)
+ bsp = name "bsp" $ borderResize (emptyBSP)
delta = 1/24
name n = renamed [Replace n]
-- layout names for layout selection dialog
-layoutNames = fromList [ ("Tabs" , "tabs")
- , ("Multi-column tiles" , "tiles")
- , ("Two columns" , "two")
- , ("One large framed window" , "frame") ]
+layoutNames = fromList [ ("0: Tabbed windows" , "tabs")
+ , ("1: Multi-column tiles" , "tiles")
+ , ("2: Two column stack" , "two")
+ , ("3: One large framed window" , "frame")
+ , ("4: Binary space partition" , "bsp") ]
floatRectTop h = S.RationalRect (1/20) 0 (18/20) h
floatRectBottom h = S.RationalRect (1/20) (1-h) (18/20) h