From 66c096b62db95d96ef9552bd68f36df3054ebc3e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ra=C3=BAl=20Benencia?= <rul@kalgan.cc>
Date: Wed, 11 Sep 2013 10:46:41 -0300
Subject: Removed no longer needed imports

---
 src/Lazymail/Handlers.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'src/Lazymail/Handlers.hs')

diff --git a/src/Lazymail/Handlers.hs b/src/Lazymail/Handlers.hs
index dc1d389..15dbf4c 100644
--- a/src/Lazymail/Handlers.hs
+++ b/src/Lazymail/Handlers.hs
@@ -38,10 +38,8 @@ previousMode' MaildirMode = (=<<) put $ get >>= \st -> return st { exitRequested
 previousMode' EmailMode   = do
   st <- get
   if (triggerUpdateIn . indexState $ st)
-  then do
-    advanceMode
-    solveIndexUpdate
-  else put $ st { mode = IndexMode }
+    then advanceMode >> solveIndexUpdate
+    else put $ st { mode = IndexMode }
 previousMode' IndexMode   = do
   st <- get
   let ist = (indexState st) { selectedRowIn = 0, scrollRowIn = 0 }
-- 
cgit v1.2.3