-- mod-shift-{o,e,u}, Move client to screen 1, 2, or 3
[((m .|. modm, key), f sc)
| (key, sc) <- zip [xK_o, xK_e, xK_u] [0..]
- , (f, m) <- [(viewScreen, 0), (sendToScreen, shiftMask)]
- ]
+ , (f, m) <- [(viewScreen def, 0), (sendToScreen def, shiftMask)]]
++
-- mod-[1..9], Switch to workspace N