Clean up redundant warnings
This commit is contained in:
parent
655f4b90bc
commit
a4e5726e1e
1 changed files with 1 additions and 4 deletions
|
@ -34,7 +34,6 @@ module Database.MongoDB.Internal.Protocol (
|
||||||
#if !MIN_VERSION_base(4,8,0)
|
#if !MIN_VERSION_base(4,8,0)
|
||||||
import Control.Applicative ((<$>))
|
import Control.Applicative ((<$>))
|
||||||
#endif
|
#endif
|
||||||
import Control.Arrow ((***))
|
|
||||||
import Control.Monad (forM, replicateM, unless)
|
import Control.Monad (forM, replicateM, unless)
|
||||||
import Data.Binary.Get (Get, runGet)
|
import Data.Binary.Get (Get, runGet)
|
||||||
import Data.Binary.Put (Put, runPut)
|
import Data.Binary.Put (Put, runPut)
|
||||||
|
@ -50,7 +49,6 @@ import Control.Concurrent.Chan (Chan, newChan, readChan, writeChan)
|
||||||
import Control.Concurrent (ThreadId, forkIO, killThread)
|
import Control.Concurrent (ThreadId, forkIO, killThread)
|
||||||
|
|
||||||
import Control.Exception.Lifted (onException, throwIO, try)
|
import Control.Exception.Lifted (onException, throwIO, try)
|
||||||
import qualified Control.Exception.Lifted as CEL
|
|
||||||
|
|
||||||
import qualified Data.ByteString.Lazy as L
|
import qualified Data.ByteString.Lazy as L
|
||||||
|
|
||||||
|
@ -64,8 +62,7 @@ import qualified Crypto.Hash.MD5 as MD5
|
||||||
import qualified Data.Text as T
|
import qualified Data.Text as T
|
||||||
import qualified Data.Text.Encoding as TE
|
import qualified Data.Text.Encoding as TE
|
||||||
|
|
||||||
import Database.MongoDB.Internal.Util (whenJust, bitOr, byteStringHex)
|
import Database.MongoDB.Internal.Util (bitOr, byteStringHex)
|
||||||
import System.IO (hClose, hFlush)
|
|
||||||
|
|
||||||
import Database.MongoDB.Internal.Connection (Connection)
|
import Database.MongoDB.Internal.Connection (Connection)
|
||||||
import qualified Database.MongoDB.Internal.Connection as Connection
|
import qualified Database.MongoDB.Internal.Connection as Connection
|
||||||
|
|
Loading…
Reference in a new issue