diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,10 @@
+0.3.1.1
+-------
+
+* Fix GHC 7.8 test issue.
+* Remove unused imports.
+
+
 0.3.1.0
 -------
 
@@ -7,7 +14,7 @@
 0.3.0.0
 -------
 
-* `MonadBase`, `MonadControl`, `MonadBaseControl` instances.
+* `MonadBase`, `MonadTransControl`, `MonadBaseControl` instances.
 * `MFunctor`, `MMonad` instances.
 * Use `transformers-lift`.
 
diff --git a/ether.cabal b/ether.cabal
--- a/ether.cabal
+++ b/ether.cabal
@@ -1,5 +1,5 @@
 name:                ether
-version:             0.3.1.0
+version:             0.3.1.1
 synopsis:            Monad transformers and classes
 description:
     Ether is a Haskell library that extends @mtl@ and @transformers@ with
diff --git a/src/Control/Monad/Ether/State/Class.hs b/src/Control/Monad/Ether/State/Class.hs
--- a/src/Control/Monad/Ether/State/Class.hs
+++ b/src/Control/Monad/Ether/State/Class.hs
@@ -18,10 +18,6 @@
     , gets
     ) where
 
-#if __GLASGOW_HASKELL__ < 710
-import Data.Monoid
-#endif
-
 import Control.Monad.Trans (MonadTrans(..))
 
 import qualified Control.Monad.Trans.Ether.State.Lazy   as S.L
diff --git a/test/Regression.hs b/test/Regression.hs
--- a/test/Regression.hs
+++ b/test/Regression.hs
@@ -215,4 +215,4 @@
 wrapStateBad2Core = evalState foo (ensureUniqueTags $ ethered foo wrapStateBad2)
 
 wrapReaderCore :: Int -> Int
-wrapReaderCore = runReader foo (ethered foo ((+) <$> T.ask <*> ask foo))
+wrapReaderCore = runReader foo (ethered foo (liftM2 (+) T.ask (ask foo)))