[XMonad] Use NBFULL toggle instead of FULL toggle

This commit is contained in:
Ivan Malison 2016-11-21 10:50:08 -08:00
parent 1b31ec7157
commit 1a7323d59e
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8

View File

@ -105,7 +105,7 @@ instance Transformer MyToggles Window where
transform MAGICFOCUS x k = k (magicFocus x) unmodifyLayout transform MAGICFOCUS x k = k (magicFocus x) unmodifyLayout
myToggles = [LIMIT, GAPS, MAGICFOCUS] myToggles = [LIMIT, GAPS, MAGICFOCUS]
otherToggles = [FULL, MIRROR] otherToggles = [NBFULL, MIRROR]
togglesMap = M.fromList $ [ (show toggle, Toggle toggle) | toggle <- myToggles ] ++ togglesMap = M.fromList $ [ (show toggle, Toggle toggle) | toggle <- myToggles ] ++
[ (show toggle, Toggle toggle) | toggle <- otherToggles ] [ (show toggle, Toggle toggle) | toggle <- otherToggles ]
@ -139,7 +139,7 @@ selectLayout = do
myLayoutHook = avoidStruts . minimize . boringAuto . mkToggle1 MIRROR . myLayoutHook = avoidStruts . minimize . boringAuto . mkToggle1 MIRROR .
mkToggle1 LIMIT . mkToggle1 GAPS . mkToggle1 MAGICFOCUS . mkToggle1 LIMIT . mkToggle1 GAPS . mkToggle1 MAGICFOCUS .
mkToggle1 FULL . workspaceNamesHook . smartBorders . noBorders $ mkToggle1 NBFULL . workspaceNamesHook . smartBorders . noBorders $
fst layoutInfo fst layoutInfo
-- WindowBringer -- WindowBringer