xmonad: set ThreeColMid as default layout
This commit is contained in:
parent
323ed2033d
commit
624150557c
|
@ -9,6 +9,7 @@ import XMonad.Hooks.StatusBar
|
|||
import XMonad.Layout.Decoration
|
||||
import XMonad.Layout.Hidden
|
||||
import XMonad.Layout.Spacing
|
||||
import XMonad.Layout.ThreeColumns
|
||||
import XMonad.Prompt
|
||||
import XMonad.Util.EZConfig
|
||||
import XMonad.Util.Loggers
|
||||
|
@ -30,7 +31,7 @@ main =
|
|||
. withEasySB (statusBarProp "xmobar" (pure myXmobarPP)) defToggleStrutsKey
|
||||
$ myConfig
|
||||
|
||||
myConfig :: XConfig (Choose (ModifiedLayout Spacing Tall) (Choose (Mirror (ModifiedLayout Spacing Tall)) Full))
|
||||
-- myConfig :: XConfig (Choose (ModifiedLayout Spacing Tall) (Choose (Mirror (ModifiedLayout Spacing Tall)) Full))
|
||||
myConfig =
|
||||
def
|
||||
{ borderWidth = 1,
|
||||
|
@ -220,8 +221,8 @@ myKeybinds =
|
|||
-- Layout --
|
||||
------------
|
||||
|
||||
myLayout :: Choose (ModifiedLayout Spacing Tall) (Choose (Mirror (ModifiedLayout Spacing Tall)) Full) a
|
||||
myLayout = tiled ||| Mirror tiled ||| Full
|
||||
-- myLayout :: Choose (ModifiedLayout Spacing Tall) (Choose (Mirror (ModifiedLayout Spacing Tall)) Full) a
|
||||
myLayout = ThreeColMid 1 (3/100) (1/2) ||| tiled ||| Mirror tiled ||| Full
|
||||
where
|
||||
tiled = spacingWithEdge 5 $ Tall nmaster delta ratio
|
||||
nmaster = 1
|
||||
|
|
Loading…
Reference in a new issue