XMonad.Layout.MagicFocus
magicFocus
promoteWarp
promoteWarp'
followOnlyIf
disableFollowOnWS
data MagicFocus a