REF use Renamed module instead of Named (depr)
This commit is contained in:
parent
2531dbf1cd
commit
fa278ebee3
|
@ -64,10 +64,10 @@ import XMonad.Hooks.ManageDocks
|
||||||
import XMonad.Hooks.ManageHelpers
|
import XMonad.Hooks.ManageHelpers
|
||||||
-- import XMonad.Layout.LayoutCombinators hiding ((|||))
|
-- import XMonad.Layout.LayoutCombinators hiding ((|||))
|
||||||
-- import XMonad.Layout.Master
|
-- import XMonad.Layout.Master
|
||||||
import XMonad.Layout.Named
|
|
||||||
import XMonad.Layout.NoBorders
|
import XMonad.Layout.NoBorders
|
||||||
import XMonad.Layout.NoFrillsDecoration
|
import XMonad.Layout.NoFrillsDecoration
|
||||||
import XMonad.Layout.PerWorkspace
|
import XMonad.Layout.PerWorkspace
|
||||||
|
import XMonad.Layout.Renamed
|
||||||
-- import XMonad.Layout.Simplest
|
-- import XMonad.Layout.Simplest
|
||||||
import XMonad.Layout.Tabbed
|
import XMonad.Layout.Tabbed
|
||||||
import XMonad.Prompt
|
import XMonad.Prompt
|
||||||
|
@ -127,26 +127,24 @@ myLayouts = onWorkspace myVMWorkspace vmLayout
|
||||||
$ tall ||| single ||| full
|
$ tall ||| single ||| full
|
||||||
where
|
where
|
||||||
addTopBar = noFrillsDeco shrinkText T.tabbedTheme
|
addTopBar = noFrillsDeco shrinkText T.tabbedTheme
|
||||||
tall = named "Tall"
|
tall = renamed [Replace "Tall"]
|
||||||
$ avoidStruts
|
$ avoidStruts
|
||||||
$ addTopBar
|
$ addTopBar
|
||||||
$ noBorders
|
$ noBorders
|
||||||
$ Tall 1 0.03 0.5
|
$ Tall 1 0.03 0.5
|
||||||
single = named "Tabbed"
|
single = renamed [Replace "Tabbed"]
|
||||||
$ avoidStruts
|
$ avoidStruts
|
||||||
$ noBorders
|
$ noBorders
|
||||||
$ tabbedAlways shrinkText T.tabbedTheme
|
$ tabbedAlways shrinkText T.tabbedTheme
|
||||||
full = named "Full"
|
full = renamed [Replace "Full"]
|
||||||
$ noBorders Full
|
$ noBorders Full
|
||||||
vmLayout = noBorders Full
|
vmLayout = noBorders Full
|
||||||
-- TODO use a tabbed layout for multiple master windows
|
-- TODO use a tabbed layout for multiple master windows
|
||||||
gimpLayout = named "Gimp Layout"
|
gimpLayout = renamed [Replace "Gimp Layout"]
|
||||||
$ avoidStruts
|
$ avoidStruts
|
||||||
$ noBorders
|
$ noBorders
|
||||||
$ addTopBar
|
$ addTopBar
|
||||||
$ Tall 1 0.025 0.8
|
$ Tall 1 0.025 0.8
|
||||||
-- $ withIM (11/64) (Or (Title "Toolbox") (Title "Tool Options"))
|
|
||||||
-- $ (tabbedAlways shrinkText defaultTheme)
|
|
||||||
|
|
||||||
-- | 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