diff options
| author | Adrian Kummerlaender | 2018-07-24 15:36:59 +0200 |
|---|---|---|
| committer | Adrian Kummerlaender | 2018-07-24 15:36:59 +0200 |
| commit | affb0011166b0210165ef24a631545d9e8c2ba0d (patch) | |
| tree | 11ff86f9fe0bf087bb1e97b9946c3982e240c8e8 | |
| parent | ff614fe40888d2afbcbffc0b471d841750d77dab (diff) | |
| download | nixos_home-affb0011166b0210165ef24a631545d9e8c2ba0d.tar nixos_home-affb0011166b0210165ef24a631545d9e8c2ba0d.tar.gz nixos_home-affb0011166b0210165ef24a631545d9e8c2ba0d.tar.bz2 nixos_home-affb0011166b0210165ef24a631545d9e8c2ba0d.tar.lz nixos_home-affb0011166b0210165ef24a631545d9e8c2ba0d.tar.xz nixos_home-affb0011166b0210165ef24a631545d9e8c2ba0d.tar.zst nixos_home-affb0011166b0210165ef24a631545d9e8c2ba0d.zip | |
Add two-column layout
Switch back to default layout cycling using `NextLayout` message instead of toggling
| -rw-r--r-- | gui/conf/xmonad.hs | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs index 4a25938..2a1a0fc 100644 --- a/gui/conf/xmonad.hs +++ b/gui/conf/xmonad.hs @@ -9,10 +9,10 @@ import XMonad.Hooks.InsertPosition import XMonad.Layout.NoBorders import XMonad.Layout.Tabbed import XMonad.Layout.MultiColumns -import XMonad.Layout.ToggleLayouts import XMonad.Layout.Reflect import XMonad.Layout.MultiToggle import XMonad.Layout.MultiToggle.Instances +import XMonad.Layout.TwoPane import XMonad.Util.Themes import XMonad.Util.NamedScratchpad @@ -46,12 +46,14 @@ customTabTheme = (theme xmonadTheme) availableLayouts = id . smartBorders . mkToggle (single NBFULL) - $ toggleLayouts tabs tiles + $ tabs ||| tiles ||| two where tabs = tabbed shrinkText customTabTheme tiles = mkToggle (single REFLECTX) $ mkToggle (single MIRROR) - $ multiCol [1, 2, 0] 1 (1/24) (1/3) + $ multiCol [1, 2, 0] 1 delta (1/3) + two = TwoPane delta (1/2) + delta = 1/24 windowBringerDmenuConfig = def { menuCommand = "rofi" , menuArgs = [ "-p", "win", "-dmenu", "-i" ] } @@ -125,7 +127,7 @@ commonKeybindings host = , ("M-S-s j" , shiftTo Next nonEmptyWS >> moveTo Next nonEmptyWS) , ("M-S-s k" , shiftTo Prev nonEmptyWS >> moveTo Prev nonEmptyWS) -- workspace layout management - , ("M-s l" , sendMessage ToggleLayout) + , ("M-s l" , sendMessage NextLayout) , ("M-s +" , sendMessage $ IncMasterN 1) , ("M-s -" , sendMessage $ IncMasterN (-1)) , ("M-s m" , sendMessage $ XMonad.Layout.MultiToggle.Toggle REFLECTX) |