@@ -20,7 +20,8 @@ import Control.Monad.Catch
20import Control.Monad.IO.Class (MonadIO)
20import Control.Monad.IO.Class (MonadIO)
21import Control.Monad.Trans.Resource (MonadResource (..))
21import Control.Monad.Trans.Resource (MonadResource (..))
23+import Data.Conduit (($$+-))
23−import Data.Monoid (Dual (..), Endo (..), (<>))
24+import Data.Monoid (Dual (..), Endo (..), (<>))
25import GHC.Exts (toList)
26import GHC.Exts (toList)
@@ -33,6 +34,8 @@ import Network.HTTP.Conduit
33import Network.HTTP.Media (RenderHeader (..))
34import Network.HTTP.Media (RenderHeader (..))
34import Network.HTTP.Types
35import Network.HTTP.Types
37+import qualified Data.ByteString.Lazy as LBS
38+import qualified Data.Conduit.List as Conduit
36import qualified Data.Text.Encoding as Text
39import qualified Data.Text.Encoding as Text
37import qualified Data.Text.Lazy as LText
40import qualified Data.Text.Lazy as LText
38import qualified Data.Text.Lazy.Builder as Build
41import qualified Data.Text.Lazy.Builder as Build