[XMonad] Minor cleanup
This commit is contained in:
parent
0a3ee6ecc4
commit
a1301bf629
@ -27,10 +27,9 @@ main = xmonad $ ewmh $ pagerHints def
|
|||||||
, logHook = myLogHook
|
, logHook = myLogHook
|
||||||
, handleEventHook = docksEventHook <+> fullscreenEventHook
|
, handleEventHook = docksEventHook <+> fullscreenEventHook
|
||||||
, startupHook = myStartup
|
, startupHook = myStartup
|
||||||
, keys = customKeys (\x -> []) addKeys
|
, keys = customKeys (const []) addKeys
|
||||||
}
|
}
|
||||||
|
|
||||||
myLogHook :: X()
|
|
||||||
myLogHook = fadeInactiveLogHook 0.9
|
myLogHook = fadeInactiveLogHook 0.9
|
||||||
|
|
||||||
shiftThenView i = W.greedyView i . W.shift i
|
shiftThenView i = W.greedyView i . W.shift i
|
||||||
|
Loading…
Reference in New Issue
Block a user