avoidMaster :: W.StackSet i l a s sd -> W.StackSet i l a s sd
avoidMaster = W.modify' $ \c -> case c of
W.Stack t [] (r:rs) -> W.Stack r [] (t:rs)
- otherwise -> c
+ _ -> c
-- Create my custom layout.
--
-- Switch to last active workspace, thanks to moljac024 in #xmonad on
-- Freenode (2010-12-18 14:45 CET).
- , ((myModMask, xK_f), toggleWS)
+ , ((myModMask, xK_b), toggleWS)
-- Lock the screen. The sleep is necessary to allow xtrlock to grab the
-- keyboard input.