From 5a5b57a6eb95dc0a8de1238e34337a2d8f3c159f Mon Sep 17 00:00:00 2001 From: Ramakrishnan Muthukrishnan Date: Sun, 30 Aug 2015 18:04:54 +0530 Subject: [PATCH] remove redundant module imports for ghc 7.10 --- src/FuncTorrent/Bencode.hs | 2 -- src/FuncTorrent/PeerMsgs.hs | 2 +- 2 files changed, 1 insertion(+), 3 deletions(-) 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) -- 2.37.2