From e944a6c8d30cff9ab915c36ad3fd8e604dc1a8ac Mon Sep 17 00:00:00 2001
From: Adam Vogt <vogt.adam@gmail.com>
Date: Fri, 10 Jul 2009 01:14:24 +0000
Subject: [PATCH] Remove tabs from ManageHook.hs

---
 XMonad/ManageHook.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/XMonad/ManageHook.hs b/XMonad/ManageHook.hs
index fc7017d..be9bc58 100644
--- a/XMonad/ManageHook.hs
+++ b/XMonad/ManageHook.hs
@@ -74,7 +74,7 @@ title = ask >>= \w -> liftX $ do
             (internAtom d "_NET_WM_NAME" False >>= getTextProperty d w)
                 `catch` \_ -> getTextProperty d w wM_NAME
         extract prop = do l <- wcTextPropertyToTextList d prop
-		          return $ if null l then "" else head l
+                          return $ if null l then "" else head l
     io $ bracket getProp (xFree . tp_value) extract `catch` \_ -> return ""
 
 -- | Return the application name.