From a4aaab2259a220debe4c3785400d5ebb28af98a3 Mon Sep 17 00:00:00 2001
From: Alexander Polakov <plhk@sdf.org>
Date: Sat, 9 Feb 2013 22:19:22 +0400
Subject: Use fmap instead of >>=

---
 src/Xmobar.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/Xmobar.hs b/src/Xmobar.hs
index 25d8fab..74c4b4d 100644
--- a/src/Xmobar.hs
+++ b/src/Xmobar.hs
@@ -259,7 +259,7 @@ updateActions conf (Rectangle _ _ wid _) ~[left,center,right] = do
                                R -> remWidth xs
                                L -> offs
 
-  fmap concat $ mapM (\(a,xs) -> strLn xs >>= \xs' -> return $ partCoord (offset a xs') xs') $
+  fmap concat $ mapM (\(a,xs) -> fmap (\xs' -> partCoord (offset a xs') xs') $ strLn xs) $
                 zip [L,C,R] [left,center,right]
 
 -- $print
-- 
cgit v1.2.3