diff options
author | Adam Vogt <vogt.adam@gmail.com> | 2012-11-09 02:41:56 +0100 |
---|---|---|
committer | Adam Vogt <vogt.adam@gmail.com> | 2012-11-09 02:41:56 +0100 |
commit | 3147065b3ff8d0cade905909aa29946378298f76 (patch) | |
tree | 7a3b0d4a08853e43b3ee95873466cefb2b48c567 /XMonad/Actions/Navigation2D.hs | |
parent | 7f324e08476792e522987867c0f8098eeb0e50e0 (diff) | |
download | XMonadContrib-3147065b3ff8d0cade905909aa29946378298f76.tar.gz XMonadContrib-3147065b3ff8d0cade905909aa29946378298f76.tar.xz XMonadContrib-3147065b3ff8d0cade905909aa29946378298f76.zip |
Remove trailing whitespace.
Ignore-this: 72e3afb6e6df47c51262006601765365
darcs-hash:20121109014156-1499c-45797b245e25e966e4ca337ee224b593aaac63a0.gz
Diffstat (limited to 'XMonad/Actions/Navigation2D.hs')
-rw-r--r-- | XMonad/Actions/Navigation2D.hs | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/XMonad/Actions/Navigation2D.hs b/XMonad/Actions/Navigation2D.hs index 835512c..27d772b 100644 --- a/XMonad/Actions/Navigation2D.hs +++ b/XMonad/Actions/Navigation2D.hs @@ -16,22 +16,22 @@ module XMonad.Actions.Navigation2D ( -- * Usage -- $usage - + -- * Finer points -- $finer_points - + -- * Alternative directional navigation modules -- $alternatives - + -- * Incompatibilities -- $incompatibilities - + -- * Detailed technical discussion -- $technical -- * Exported functions and types -- #Exports# - + withNavigation2DConfig , Navigation2DConfig(..) , defaultNavigation2DConfig @@ -226,7 +226,7 @@ import XMonad.Util.Types -- | A rectangle paired with an object type Rect a = (a, Rectangle) - + -- | A shorthand for window-rectangle pairs. Reduces typing. type WinRect = Rect Window @@ -251,7 +251,7 @@ runNav (N _ nav) = nav type Generality = Int instance Eq Navigation2D where - (N x _) == (N y _) = x == y + (N x _) == (N y _) = x == y instance Ord Navigation2D where (N x _) <= (N y _) = x <= y @@ -302,7 +302,7 @@ data Navigation2DConfig = Navigation2DConfig -- | Shorthand for the tedious screen type type Screen = W.Screen WorkspaceId (Layout Window) Window ScreenId ScreenDetail - + -- So we can store the configuration in extensible state instance ExtensionClass Navigation2DConfig where initialValue = defaultNavigation2DConfig @@ -755,7 +755,7 @@ wrapOffsets winset = (max_x - min_x, max_y - min_y) max_x = fi $ maximum $ map (\r -> rect_x r + (fi $ rect_width r)) rects max_y = fi $ maximum $ map (\r -> rect_y r + (fi $ rect_height r)) rects rects = map snd $ visibleWorkspaces winset False - + -- | Returns the list of screens sorted primarily by their centers' -- x-coordinates and secondarily by their y-coordinates. |