chore: cleanup imports

to make the buildlogs clearer

ipython-kernel/src/IHaskell/IPython/Message/Parser.hs

@@ -8,7 +8,6 @@
 -- the low-level 0MQ interface.
 module IHaskell.IPython.Message.Parser (parseMessage) where
 
-import           Control.Applicative ((<$>), (<*>))
 import           Data.Aeson ((.:), (.:?), (.!=), decode, FromJSON, Result(..), Object, Value(..))
 import           Data.Aeson.Types (Parser, parse, parseEither)
 import           Data.ByteString hiding (unpack)

ipython-kernel/src/IHaskell/IPython/Message/UUID.hs

@@ -3,7 +3,6 @@
 -- Generate, parse, and pretty print UUIDs for use with IPython.
 module IHaskell.IPython.Message.UUID (UUID, random, randoms, uuidToString) where
 
-import           Control.Applicative ((<$>))
 import           Control.Monad (mzero, replicateM)
 import           Data.Aeson
 import           Data.Text (pack)

ipython-kernel/src/IHaskell/IPython/Types.hs

@@ -38,7 +38,6 @@ module IHaskell.IPython.Types (
     displayDataToJson,
     ) where
 
-import           Control.Applicative ((<$>), (<*>))
 import           Data.Aeson
 import           Data.Aeson.Types (typeMismatch)
 import           Data.ByteString (ByteString)

ipython-kernel/src/IHaskell/IPython/ZeroMQ.hs

@@ -1,4 +1,4 @@
-{-# LANGUAGE OverloadedStrings, DoAndIfThenElse, FlexibleContexts #-}
+{-# LANGUAGE OverloadedStrings, DoAndIfThenElse, FlexibleContexts, CPP #-}
 
 -- | Description : Low-level ZeroMQ communication wrapper.
 --

main/Main.hs

@@ -15,7 +15,7 @@ import           Control.Arrow (second)
 import           Data.Aeson hiding (Success)
 import           System.Process (readProcess, readProcessWithExitCode)
 import           System.Exit (exitSuccess, ExitCode(ExitSuccess))
-import           Control.Exception (try, SomeException)
+import           Control.Exception (try)
 import           System.Environment (getArgs)
 import           System.Environment (setEnv)
 import           System.Posix.Signals

src/IHaskell/Convert.hs

@@ -5,14 +5,12 @@ module IHaskell.Convert (convert) where
 
 import           IHaskellPrelude
 
-import           Control.Monad (unless, when)
 import           Data.Functor.Identity (Identity(Identity))
 import           IHaskell.Convert.Args (ConvertSpec(..), fromJustConvertSpec, toConvertSpec)
 import           IHaskell.Convert.IpynbToLhs (ipynbToLhs)
 import           IHaskell.Convert.LhsToIpynb (lhsToIpynb)
 import           IHaskell.Flags (Argument)
 import           System.Directory (doesFileExist)
-import           Text.Printf (printf)
 
 -- | used by @IHaskell convert@
 convert :: [Argument] -> IO ()

src/IHaskell/Convert/Args.hs

@@ -6,14 +6,10 @@ module IHaskell.Convert.Args (ConvertSpec(..), fromJustConvertSpec, toConvertSpe
 import           IHaskellPrelude
 import qualified Data.Text.Lazy as LT
 
-import           Control.Applicative ((<$>))
 import           Data.Functor.Identity (Identity(Identity))
 import           Data.Char (toLower)
-import           Data.List (partition)
-import           Data.Maybe (fromMaybe)
 import           IHaskell.Flags (Argument(..), LhsStyle, lhsStyleBird, NotebookFormat(..))
 import           System.FilePath ((<.>), dropExtension, takeExtension)
-import           Text.Printf (printf)
 
 -- | ConvertSpec is the accumulator for command line arguments
 data ConvertSpec f =

src/IHaskell/Eval/Completion.hs

@@ -14,9 +14,8 @@ module IHaskell.Eval.Completion (complete, completionTarget, completionType, Com
 
 import           IHaskellPrelude
 
-import           Control.Applicative ((<$>))
 import           Data.Char
-import           Data.List (nub, init, last, elemIndex, concatMap)
+import           Data.List (init, last, elemIndex)
 import qualified Data.List.Split as Split
 import qualified Data.List.Split.Internals as Split
 import           System.Environment (getEnv)

src/IHaskell/Eval/Evaluate.hs

@@ -23,7 +23,6 @@ import           IHaskellPrelude
 import           Control.Concurrent (forkIO, threadDelay)
 import           Data.Foldable (foldMap)
 import           Prelude (head, tail, last, init)
-import           Data.List (nubBy)
 import qualified Data.Set as Set
 import           Data.Char as Char
 import           Data.Dynamic
@@ -34,7 +33,6 @@ import           System.IO (hGetChar, hSetEncoding, utf8)
 import           System.Random (getStdGen, randomRs)
 import           System.Process
 import           System.Exit
-import           Data.Maybe (mapMaybe)
 import           System.Environment (getEnv)
 
 #if MIN_VERSION_ghc(9,2,0)
@@ -68,7 +66,6 @@ import           Bag
 import           DynFlags
 import           HscTypes
 import           InteractiveEval
-import           Exception (gtry)
 import           Exception hiding (evaluate)
 import           GhcMonad (liftIO)
 import           Outputable hiding ((<>))

src/IHaskell/Eval/Widgets.hs

@@ -16,7 +16,6 @@ import           IHaskellPrelude
 
 import           Control.Concurrent.STM (atomically)
 import           Control.Concurrent.STM.TChan
-import           Control.Monad (foldM)
 import           Data.Aeson
 import           Data.ByteString.Base64 as B64 (decodeLenient)
 import qualified Data.Map as Map