ENH split fullscreen layout into single and full layouts

This commit is contained in:
Nathan Dwarshuis 2020-02-21 09:50:01 -05:00
parent 8b263ed086
commit 8228778a46
1 changed files with 6 additions and 2 deletions

View File

@ -75,7 +75,7 @@ myTopBarTheme = def
myWorkspaces = map show [1..10 :: Int] ++ ["VM"] myWorkspaces = map show [1..10 :: Int] ++ ["VM"]
myLayouts = onWorkspace "VM" (noBorders Full) myLayouts = onWorkspace "VM" (noBorders Full)
$ tall ||| full $ tall ||| single ||| full
where where
addTopBar = noFrillsDeco shrinkText myTopBarTheme addTopBar = noFrillsDeco shrinkText myTopBarTheme
tall = named "Tall" tall = named "Tall"
@ -83,10 +83,14 @@ myLayouts = onWorkspace "VM" (noBorders Full)
$ addTopBar $ addTopBar
$ noBorders $ noBorders
$ Tall 1 0.03 0.5 $ Tall 1 0.03 0.5
full = named "Full" single = named "Single"
$ addTopBar
$ avoidStruts $ avoidStruts
$ noBorders $ noBorders
$ Full $ Full
full = named "Full"
$ noBorders
$ Full
-- | Format workspace and layout in loghook -- | Format workspace and layout in loghook
-- The format will be like "[<1> 2 3] 4 5 | LAYOUT" where each digit -- The format will be like "[<1> 2 3] 4 5 | LAYOUT" where each digit