Stylish

Stackage/Build.hs

@@ -4,12 +4,12 @@ module Stackage.Build
 
 import           Control.Monad        (unless)
 import           Stackage.CheckPlan
+import           Stackage.InstallInfo
 import           Stackage.Test
 import           Stackage.Util
-import           Stackage.InstallInfo
-import           System.Process           (waitForProcess, runProcess)
 import           System.Exit          (ExitCode (ExitSuccess), exitWith)
 import           System.IO            (IOMode (WriteMode), withBinaryFile)
+import           System.Process       (runProcess, waitForProcess)
 
 build :: IO ()
 build = do

Stackage/CheckPlan.hs

@@ -4,10 +4,10 @@ module Stackage.CheckPlan
 
 import           Control.Monad        (unless)
 import           Data.List            (sort)
-import           Stackage.Types
 import           Stackage.InstallInfo
-import           System.Process           (readProcess)
+import           Stackage.Types
 import           System.Exit          (ExitCode (ExitFailure), exitWith)
+import           System.Process       (readProcess)
 
 data Mismatch = OnlyDryRun String | OnlySimpleList String
     deriving Show

Stackage/Config.hs

@@ -1,12 +1,12 @@
 module Stackage.Config where
 
-import qualified Data.Map as Map
+import           Control.Monad              (unless, when)
-import Stackage.Types
 import           Control.Monad.Trans.Writer (execWriter, tell)
-import Data.Set (singleton, fromList)
+import qualified Data.Map                   as Map
-import Control.Monad (when, unless)
+import           Data.Set                   (fromList, singleton)
 import           Distribution.System        (OS (..), buildOS)
 import           Distribution.Text          (simpleParse)
+import           Stackage.Types
 
 -- | Packages which are shipped with GHC but are not included in the
 -- Haskell Platform list of core packages.

Stackage/InstallInfo.hs

@@ -3,14 +3,14 @@ module Stackage.InstallInfo
     , iiPackageList
     ) where
 
-import           Stackage.Types
-import           Stackage.Util
-import           Stackage.Config
-import           Stackage.LoadDatabase
-import           Stackage.NarrowDatabase
-import           Stackage.HaskellPlatform
 import qualified Data.Map                 as Map
 import qualified Data.Set                 as Set
+import           Stackage.Config
+import           Stackage.HaskellPlatform
+import           Stackage.LoadDatabase
+import           Stackage.NarrowDatabase
+import           Stackage.Types
+import           Stackage.Util
 
 getInstallInfo :: IO InstallInfo
 getInstallInfo = do

Stackage/Test.hs

@@ -2,17 +2,18 @@ module Stackage.Test
     ( runTestSuites
     ) where
 
-import           Control.Monad            (when, foldM)
+import           Control.Monad    (foldM, when)
 import qualified Data.Map         as Map
 import qualified Data.Set         as Set
+import           Stackage.Config
 import           Stackage.Types
 import           Stackage.Util
-import           Stackage.Config
+import           System.Directory (createDirectory, removeFile)
-import           System.Directory         (removeFile, createDirectory)
-import           System.Process           (waitForProcess, runProcess)
 import           System.Exit      (ExitCode (ExitSuccess))
-import System.FilePath ((</>), (<.>))
+import           System.FilePath  ((<.>), (</>))
-import System.IO (IOMode (WriteMode, AppendMode), withBinaryFile)
+import           System.IO        (IOMode (WriteMode, AppendMode),
+                                   withBinaryFile)
+import           System.Process   (runProcess, waitForProcess)
 
 runTestSuites :: InstallInfo -> IO ()
 runTestSuites ii = do

Stackage/Util.hs

@@ -1,12 +1,13 @@
 module Stackage.Util where
 
+import           Control.Monad        (when)
 import qualified Data.Map             as Map
 import qualified Data.Set             as Set
-import           Distribution.Version (thisVersion)
 import           Data.Version         (showVersion)
+import           Distribution.Version (thisVersion)
 import           Stackage.Types
-import           System.Directory         (doesDirectoryExist, removeDirectoryRecursive)
+import           System.Directory     (doesDirectoryExist,
-import Control.Monad (when)
+                                       removeDirectoryRecursive)
 
 identsToRanges :: Set PackageIdentifier -> Map PackageName VersionRange
 identsToRanges =