From 3a5b4dc676be9a9e2bf39bcffc93b55b76e9c9c3 Mon Sep 17 00:00:00 2001
From: gwern0 <gwern0@gmail.com>
Date: Sun, 14 Mar 2010 22:00:12 +0100
Subject: DecorationAddons.hs: rm trailing whitespace

Ignore-this: 2f54649e43ebf11e35bd8764d1a44675

darcs-hash:20100314210012-f7719-d69c5858a063db7baf6efd958f350297977cf5d9.gz
---
 XMonad/Layout/DecorationAddons.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'XMonad/Layout/DecorationAddons.hs')

diff --git a/XMonad/Layout/DecorationAddons.hs b/XMonad/Layout/DecorationAddons.hs
index 798a289..9192e54 100644
--- a/XMonad/Layout/DecorationAddons.hs
+++ b/XMonad/Layout/DecorationAddons.hs
@@ -87,7 +87,7 @@ handleScreenCrossing w decoWin = withDisplay $ \d -> do
     ws <- gets windowset
     sc <- fromMaybe (W.current ws) <$> pointScreen (fi px) (fi py)
     maybeWksp <- screenWorkspace $ W.screen sc
-    let targetWksp = maybeWksp >>= \wksp -> 
+    let targetWksp = maybeWksp >>= \wksp ->
                         W.findTag w ws >>= \currentWksp ->
                         if (currentWksp /= wksp)
                             then Just wksp
-- 
cgit v1.2.3