From 5c6cb344e0221b20b38ce1decf03029e9051417b Mon Sep 17 00:00:00 2001
From: Alexander Polakov <plhk@sdf.org>
Date: Sun, 27 Jan 2013 04:46:25 +0400
Subject: reindent again

---
 src/XUtil.hsc | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/XUtil.hsc b/src/XUtil.hsc
index bc43864..3c9f799 100644
--- a/src/XUtil.hsc
+++ b/src/XUtil.hsc
@@ -165,12 +165,12 @@ loadBitmap :: Display -> Drawable -> FilePath -> IO (Maybe Bitmap)
 loadBitmap d w p = do
     exist <- doesFileExist p
     if exist
-    then do
-        (bw, bh, bp, _, _) <- readBitmapFile d w p
-        addFinalizer bp (freePixmap d bp)
-        return $ Just $ Bitmap bw bh bp
-    else
-        return Nothing
+       then do
+            (bw, bh, bp, _, _) <- readBitmapFile d w p
+            addFinalizer bp (freePixmap d bp)
+            return $ Just $ Bitmap bw bh bp
+       else
+           return Nothing
 
 drawBitmap :: Display -> Drawable -> XFont -> GC -> String -> String
             -> Position -> Position -> Bitmap -> IO ()
-- 
cgit v1.2.3