[XMonad] Add magic focus layout

This commit is contained in:
2016-11-07 13:21:05 -08:00
parent 5773f6b7c8
commit cd8c0a4f3f

View File

@@ -27,6 +27,7 @@ import XMonad.Hooks.FadeInactive
import XMonad.Layout.BoringWindows
import XMonad.Layout.LayoutCombinators
import XMonad.Layout.LayoutModifier
import XMonad.Layout.MagicFocus
import XMonad.Layout.Minimize
import XMonad.Layout.MultiColumns
import XMonad.Layout.MultiToggle
@@ -80,8 +81,9 @@ myManageHook = composeAll . concat $
-- Layout
-- TODO: Figure out how to disable focus follows mouse for magicFocus
layouts = multiCol [1, 1] 2 0.01 (-0.5) ||| Full |||
Tall 1 (3/100) (1/2) ||| Tall 1 (3/100) (3/4)
Tall 1 (3/100) (1/2) ||| magicFocus (Tall 1 (3/100) (3/4))
myLayoutHook = avoidStruts . smartSpacing 10 . minimize . boringWindows .
mkToggle (MIRROR ?? EOT) . workspaceNamesHook . smartBorders .