ENH split fullscreen layout into single and full layouts
This commit is contained in:
parent
8b263ed086
commit
8228778a46
|
@ -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
|
||||||
|
|
Loading…
Reference in New Issue