on develop help sign in
Constructing RequestBody from core Body
commit208c39e88601d944872d72cc840eb8d934a09a4d authorBrendan Hay <brendan.g.hay@gmail.com> dateTue 13 Oct 2015, 13:35 (11 years ago) parent4ab7bf1
2 files changed+3−4
gogol/gogol.cabal+1−2 gogol/src/Network/Google/Internal/HTTP.hs+2−2
gogol/gogol.cabal+1−2
@@ -36,7 +36,6 @@ library
3636
3737 build-depends:
3838 base >= 4.7 && < 5
39− , conduit >= 1.1
4039 , data-default-class >= 0.0.1
4140 , exceptions >= 0.6
4241 , gogol-core == 0.0.1.*
@@ -49,4 +48,4 @@ library
4948 , resourcet >= 1.1
5049 , text >= 1.1
5150 , transformers >= 0.2
52− , transformers-base >= 0.4
51+ , transformers-base >= 0.4
gogol/src/Network/Google/Internal/HTTP.hs+2−2
@@ -22,8 +22,8 @@ import qualified Data.Text.Lazy.Builder as Build
2222import GHC.Exts (toList)
2323import Network.Google.Env (Env (..))
2424import Network.Google.Types
25+import qualified Network.HTTP.Client.Conduit as Client
2526import Network.HTTP.Conduit
26−import qualified Network.HTTP.Conduit as Client
2727import Network.HTTP.Media
2828import Network.HTTP.Types
2929
@@ -66,7 +66,7 @@ perform Env{..} x = catches go handlers
6666 | Just (t, _) <- _rqBody = ((hContentType, renderHeader t) :)
6767 | otherwise = id
6868
69− body | Just (_, b) <- _rqBody = b
69+ body | Just (_, b) <- _rqBody = Client.requestBodySourceChunked b
7070 | otherwise = mempty
7171
7272 path = Text.encodeUtf8