From: Ramakrishnan Muthukrishnan Date: Sun, 30 Aug 2015 12:34:54 +0000 (+0530) Subject: remove redundant module imports for ghc 7.10 X-Git-Url: https://git.rkrishnan.org/?p=functorrent.git;a=commitdiff_plain;h=5a5b57a6eb95dc0a8de1238e34337a2d8f3c159f remove redundant module imports for ghc 7.10 --- diff --git a/src/FuncTorrent/Bencode.hs b/src/FuncTorrent/Bencode.hs index 62d4767..631a87f 100644 --- a/src/FuncTorrent/Bencode.hs +++ b/src/FuncTorrent/Bencode.hs @@ -12,10 +12,8 @@ module FuncTorrent.Bencode import Prelude hiding (length, concat) -import Control.Applicative ((<*)) import Data.ByteString (ByteString, length, concat) import Data.ByteString.Char8 (unpack, pack) -import Data.Functor ((<$>)) import Data.Map.Strict (Map, fromList, toList) import Text.ParserCombinators.Parsec import qualified Text.Parsec.ByteString as ParsecBS diff --git a/src/FuncTorrent/PeerMsgs.hs b/src/FuncTorrent/PeerMsgs.hs index f4fe97c..c603291 100644 --- a/src/FuncTorrent/PeerMsgs.hs +++ b/src/FuncTorrent/PeerMsgs.hs @@ -14,7 +14,7 @@ import Data.ByteString (ByteString, pack, unpack, concat, hGet, hPut, singleton) import Data.ByteString.Lazy (fromStrict, fromChunks, toStrict) import qualified Data.ByteString.Char8 as BC (replicate, pack) import Control.Monad (replicateM, liftM) -import Control.Applicative ((<$>), liftA3) +import Control.Applicative (liftA3) import Data.Binary (Binary(..), decode, encode) import Data.Binary.Put (putWord32be, putWord16be, putWord8)