| Copyright | (c) 2009 Nils Schweinsberg |
|---|---|
| License | BSD3-style (see LICENSE) |
| Maintainer | Nils Schweinsberg <mail@n-sch.de> |
| Stability | unstable |
| Portability | unportable |
| Safe Haskell | None |
| Language | Haskell98 |
XMonad.Hooks.ScreenCorners
Description
Run X () actions by touching the edge of your screen with your mouse.
- data ScreenCorner
- addScreenCorner :: ScreenCorner -> X () -> X ()
- addScreenCorners :: [(ScreenCorner, X ())] -> X ()
- screenCornerEventHook :: Event -> X All
Usage
This extension adds KDE-like screen corners to XMonad. By moving your cursor
into one of your screen corners you can trigger an X () action, for
example XMonad.Actions.GridSelect.goToSelected or
XMonad.Actions.CycleWS.nextWS etc.
To use it, import it on top of your xmonad.hs:
import XMonad.Hooks.ScreenCorners
Then add your screen corners in our startup hook:
myStartupHook = do
...
addScreenCorner SCUpperRight (goToSelected defaultGSConfig { gs_cellwidth = 200})
addScreenCorners [ (SCLowerRight, nextWS)
, (SCLowerLeft, prevWS)
]And finally wait for screen corner events in your event hook:
myEventHook e = do
...
screenCornerEventHook eAdding screen corners
addScreenCorner :: ScreenCorner -> X () -> X ()
Add one single X () action to a screen corner
addScreenCorners :: [(ScreenCorner, X ())] -> X ()
Add a list of (ScreenCorner, X ()) tuples
Event hook
screenCornerEventHook :: Event -> X All
Handle screen corner events