((modm, xK_c), spawn "emacsclient --create-frame --no-wait"),
((modm, xK_p), spawn "kupfer"),
- ((modm .|. shiftMask, xK_c ), kill),
+ ((modm, xK_w ), kill),
((modm, xK_space ), sendMessage NextLayout),
((modm .|. shiftMask, xK_space ), setLayout $ XMonad.layoutHook conf),
((modm, xK_j ), windows W.focusDown),
-- 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