-- mod-{o,e,u}, Switch to physical/Xinerama screens 1, 2, or 3
-- mod-shift-{o,e,u}, Move client to screen 1, 2, or 3
- [((m .|. modm, key), screenWorkspace sc >>= flip whenJust (windows . f))
+ [((m .|. modm, key), f sc)
| (key, sc) <- zip [xK_o, xK_e, xK_u] [0..]
- , (f, m) <- [(W.view, 0), (W.shift, shiftMask)]]
+ , (f, m) <- [(viewScreen def, 0), (sendToScreen def, shiftMask)]]
++
-- mod-[1..9], Switch to workspace N