diff --git a/cabal-install/tests/PackageTests/Exec/Check.hs b/cabal-install/tests/PackageTests/Exec/Check.hs
index 03eb948f69dadff5a5fa0825faa74c608c40411d..4e01272013fb7d4e4ce9b45d75f53fc290e05d1d 100644
--- a/cabal-install/tests/PackageTests/Exec/Check.hs
+++ b/cabal-install/tests/PackageTests/Exec/Check.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
 module PackageTests.Exec.Check
        ( tests
        ) where
@@ -9,7 +10,9 @@ import Test.Framework                 as TF (Test)
 import Test.Framework.Providers.HUnit (testCase)
 import Test.HUnit                     (assertBool)
 
+#if !MIN_VERSION_base(4,8,0)
 import Control.Applicative ((<$>))
+#endif
 import Control.Monad (when)
 import Data.List (intercalate, isInfixOf)
 import System.FilePath ((</>))
diff --git a/cabal-install/tests/UnitTests/Distribution/Client/UserConfig.hs b/cabal-install/tests/UnitTests/Distribution/Client/UserConfig.hs
index 032ebabbebce8a250cdc061446462621eaf22965..286172c40ef6bfa3471b20a985b28956bee1095c 100644
--- a/cabal-install/tests/UnitTests/Distribution/Client/UserConfig.hs
+++ b/cabal-install/tests/UnitTests/Distribution/Client/UserConfig.hs
@@ -1,10 +1,13 @@
+{-# LANGUAGE CPP #-}
 module UnitTests.Distribution.Client.UserConfig
     ( tests
     ) where
 
 import Control.Exception (bracket)
 import Data.List (sort, nub)
+#if !MIN_VERSION_base(4,8,0)
 import Data.Monoid
+#endif
 import System.Directory (getCurrentDirectory, removeDirectoryRecursive, createDirectoryIfMissing)
 import System.FilePath (takeDirectory)