Commit 043802ff authored by Mikhail Glushenkov's avatar Mikhail Glushenkov
Browse files

-Wall police.

(cherry picked from commit d62e3dda8d42e6938b7480c5700d06b26cbb3bdb)
parent b1f8adcc
{-# 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 ((</>))
......
{-# 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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment