xmonad: added spiral layout
This commit is contained in:
parent
a7f4db6e04
commit
09d8dc288d
|
@ -9,6 +9,7 @@ import XMonad.Hooks.StatusBar
|
||||||
import XMonad.Layout.Decoration
|
import XMonad.Layout.Decoration
|
||||||
import XMonad.Layout.Hidden
|
import XMonad.Layout.Hidden
|
||||||
import XMonad.Layout.Spacing
|
import XMonad.Layout.Spacing
|
||||||
|
import XMonad.Layout.Spiral
|
||||||
import XMonad.Layout.ThreeColumns
|
import XMonad.Layout.ThreeColumns
|
||||||
import XMonad.Prompt
|
import XMonad.Prompt
|
||||||
import XMonad.Util.EZConfig
|
import XMonad.Util.EZConfig
|
||||||
|
@ -226,7 +227,7 @@ myKeybinds =
|
||||||
------------
|
------------
|
||||||
|
|
||||||
-- myLayout :: Choose (ModifiedLayout Spacing Tall) (Choose (Mirror (ModifiedLayout Spacing Tall)) Full) a
|
-- myLayout :: Choose (ModifiedLayout Spacing Tall) (Choose (Mirror (ModifiedLayout Spacing Tall)) Full) a
|
||||||
myLayout = ThreeColMid 1 (3/100) (1/2) ||| tiled ||| Mirror tiled ||| Full
|
myLayout = ThreeColMid 1 (3/100) (1/2) ||| spiral (6/7) ||| tiled ||| Mirror tiled ||| Full
|
||||||
where
|
where
|
||||||
tiled = spacingWithEdge 5 $ Tall nmaster delta ratio
|
tiled = spacingWithEdge 5 $ Tall nmaster delta ratio
|
||||||
nmaster = 1
|
nmaster = 1
|
||||||
|
|
Loading…
Reference in a new issue