Support for simple mouse gestures.

You can use this module with the following in your ~/.xmonad/xmonad.hs:

import XMonad.Actions.MouseGestures
import qualified XMonad.StackSet as W

then add an appropriate mouse binding:

    , ((modm .|. shiftMask, button3), mouseGesture gestures)

where gestures is a Map from gestures to actions on windows, for example:

    gestures = M.fromList
        [ ([], focus)
        , ([U], \w -> focus w >> windows W.swapUp)
        , ([D], \w -> focus w >> windows W.swapDown)
        , ([R, D], \_ -> sendMessage NextLayout)
        ]

This is just an example, of course; you can use any mouse button and gesture definitions you want.

For detailed instructions on editing your mouse bindings, see XMonad.Doc.Extending.