From 3147065b3ff8d0cade905909aa29946378298f76 Mon Sep 17 00:00:00 2001
From: Adam Vogt <vogt.adam@gmail.com>
Date: Fri, 9 Nov 2012 02:41:56 +0100
Subject: Remove trailing whitespace.

Ignore-this: 72e3afb6e6df47c51262006601765365

darcs-hash:20121109014156-1499c-45797b245e25e966e4ca337ee224b593aaac63a0.gz
---
 XMonad/Actions/Navigation2D.hs | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

(limited to 'XMonad/Actions/Navigation2D.hs')

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.
-- 
cgit v1.2.3