[XMonad] Add magic focus layout

This commit is contained in:
Ivan Malison 2016-11-07 13:21:05 -08:00
parent 5773f6b7c8
commit cd8c0a4f3f
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8

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 .