diff options
| -rw-r--r-- | GreedyView.hs | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/GreedyView.hs b/GreedyView.hs index 275f44c..3303799 100644 --- a/GreedyView.hs +++ b/GreedyView.hs @@ -1,6 +1,27 @@ -- greedyView is an alternative to standard workspace switching. When a -- workspace is already visible on another screen, greedyView swaps the -- contents of that other screen with the current screen. +-- +-- To use GreedyView as your default workspace switcher, +-- +-- Add this import : +-- +-- import XMonadContrib.GreedyView +-- +-- And replace the function call used to switch workspaces, +-- +-- this : +-- +-- [((m .|. modMask, k), f i) +-- | (i, k) <- zip [0 .. fromIntegral workspaces - 1] [xK_1 ..] +-- , (f, m) <- [(view, 0), (shift, shiftMask)]] +-- +-- becomes this : +-- +-- [((m .|. modMask, k), f i) +-- | (i, k) <- zip [0 .. fromIntegral workspaces - 1] [xK_1 ..] +-- , (f, m) <- [(greedyView, 0), (shift, shiftMask)]] +-- module XMonadContrib.GreedyView (greedyView) where |