git.iko.soy/docker-hs
on master help sign in
Removes duplicate imports
fbe6e5bDeni Bertovic
src/Docker/Http.hs+19−32
compare with master
unifiedsplit
@@ -3,43 +3,30 @@
3
3
4module Docker.Http where
4module Docker.Http where
5
5
6−import Control.Exception (catch, throw)
7−import Control.Monad.Except (ExceptT, runExceptT)
8−import Control.Monad.Reader (ReaderT, runReaderT)
9−import qualified Data.ByteString.Lazy as BL
10−import Data.Text as T
11−import Data.Text.Encoding (encodeUtf8)
12−import Network.HTTP.Client (defaultManagerSettings, httpLbs,
13− managerRawConnection, method,
14− newManager, parseUrl)
15−import qualified Network.HTTP.Client as HTTP
16−import Network.HTTP.Types (StdMethod)
17−
18−-- import Control.Monad.Except (ExceptT, MonadError, MonadError,
19−-- catchError, lift, runExceptT,
20−-- throwError, throwError)
21import Control.Applicative
6import Control.Applicative
22−import Control.Exception (catch, try)
7+import Control.Exception (catch, try)
23import Control.Monad.Except
8import Control.Monad.Except
24−import Control.Monad.IO.Class (liftIO)
9+import Control.Monad.IO.Class (liftIO)
25−-- import Control.Monad.Reader (ReaderT, runReaderT)
26−-- import Control.Monad.Reader.Class (MonadReader)
27import Control.Monad.Reader
10import Control.Monad.Reader
28import Control.Monad.Reader.Class
11import Control.Monad.Reader.Class
29import Control.Monad.Trans.Except
12import Control.Monad.Trans.Except
30−import qualified Data.ByteString.Lazy as BL
13+import qualified Data.ByteString.Lazy as BL
31−import Data.Text as T
14+import Data.Text as T
32−import Data.Text.Encoding (encodeUtf8)
15+import Data.Text.Encoding (encodeUtf8)
33−import Data.Typeable (Typeable)
16+import Data.Typeable (Typeable)
34−import Network.HTTP.Client (defaultManagerSettings, httpLbs,
17+import Network.HTTP.Client (defaultManagerSettings, httpLbs,
18+ managerRawConnection, method,
35− method, newManager, parseUrl)
19+ newManager, parseUrl)
36−import qualified Network.HTTP.Client as HTTP
20+import qualified Network.HTTP.Client as HTTP
21+import Network.HTTP.Client.Internal (makeConnection)
37−import Network.HTTP.Types (StdMethod)
22+import Network.HTTP.Types (StdMethod)
23+import qualified Network.Socket as S
24+import qualified Network.Socket.ByteString as SBS
38−import System.IO.Error (catchIOError, ioError)
25+import System.IO.Error (catchIOError, ioError)
39−
26+
40−import Docker.Internal (getEndpoint)
27+import Docker.Internal (getEndpoint)
41−import Docker.Types (DockerClientOpts, Endpoint,
28+import Docker.Types (DockerClientOpts, Endpoint,
42− baseUrl)
29+ baseUrl)
43
30
44type Request = HTTP.Request
31type Request = HTTP.Request
45type Response = HTTP.Response BL.ByteString
32type Response = HTTP.Response BL.ByteString