diff options
| author | Jason Creighton <jcreigh@gmail.com> | 2007-04-10 08:27:31 +0200 |
|---|---|---|
| committer | Jason Creighton <jcreigh@gmail.com> | 2007-04-10 08:27:31 +0200 |
| commit | e4ddfe82216e94a641fd4677be6acc94d82c6a17 (patch) | |
| tree | 9ab60a43875b21b334c5a55f4229cab0e8ec8f34 /Config.hs | |
| parent | 4ddbc6d5d3a3cf65da596a94b1607bd805ead715 (diff) | |
| download | xmonad-e4ddfe82216e94a641fd4677be6acc94d82c6a17.tar.gz xmonad-e4ddfe82216e94a641fd4677be6acc94d82c6a17.tar.xz xmonad-e4ddfe82216e94a641fd4677be6acc94d82c6a17.zip | |
moved screen <-> workspace mapping from XMonad to StackSet
darcs-hash:20070410062731-b9aa7-e1768a3fe6c0e3c749400dffc4a5a5e33e6a08c4.gz
Diffstat (limited to '')
| -rw-r--r-- | Config.hs | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -136,7 +136,7 @@ keys = M.fromList $ -- Keybindings to each screen : -- mod-wer (underneath 123) switches to physical/Xinerama screens 1 2 and 3 ++ - [((m .|. modMask, key), screenWS sc >>= f) - | (key, sc) <- zip [xK_w, xK_e, xK_r] [1..] + [((m .|. modMask, key), gets workspace >>= f . (+1) . fromMaybe 0 . W.workspace sc) + | (key, sc) <- zip [xK_s, xK_d, xK_f] [0..] , (f, m) <- [(view, 0), (tag, shiftMask)]] |