colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[XMonad] Add magic focus layout

Browse Source
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
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
dotfiles/xmonad/xmonad.hs
View File

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