cd2749e · gogol · git.iko.soy

git.iko.soy/gogol

Regenerating all services

commitcd2749ec58c44d3ed97b36155490b5eb8e05393b authorBrendan Hay <brendan.g.hay@gmail.com> dateTue 6 Oct 2015, 13:37 (11 years ago) parentf36b2c0

58 files changed+241−234

compare with develop

unifiedsplit

core/gogol-core.cabal+9−10

@@ -44,19 +44,18 @@ library

4444

4545 build-depends:

4646 aeson >= 0.8

47− , base >= 4.7 && < 5

48− , bifunctors

49− , bytestring

50− , conduit

51− , data-default-class

47+ , base >= 4.7 && < 5

48+ , bytestring >= 0.9

49+ , conduit >= 1.1

50+ , data-default-class >= 0.0.1

5251 , dlist >= 0.7

53− , exceptions

52+ , exceptions >= 0.6

5453 , hashable >= 1.2

55− , http-client

56− , http-media

57− , http-types

54+ , http-client >= 0.8

55+ , http-media >= 0.4

56+ , http-types >= 0.8

5857 , lens >= 4.4

59− , resourcet

58+ , resourcet >= 1.1

6059 , scientific >= 0.3

6160 , servant >= 0.4.4

6261 , text >= 1.1

core/src/Network/Google/Types.hs−1

@@ -26,7 +26,6 @@ import Control.Lens hiding (coerce)

2626import Control.Monad.Catch

2727import Control.Monad.Trans.Resource

2828import Data.Aeson

29−import Data.Bifunctor

3029import Data.ByteString (ByteString)

3130import qualified Data.ByteString.Lazy as LBS

3231import Data.Coerce

gen/src/Gen/AST/Solve.hs+1−1

@@ -132,7 +132,7 @@ getDerive g = loc "getDerive" g $ memo derived g go

132132 Bool -> enum

134134 Date -> DRead : base

135− Body -> base

135+ Body -> []

136136 Alt _ -> DRead : base

137137 Key -> DRead : base

138138 -- FIXME: Add numeric cases

gen/src/Gen/Syntax.hs+6−6

@@ -60,7 +60,7 @@ verbAlias n m

6060 where

6161 rest = alias verb (path ++ qry params ++ media)

6262 download = TyInfix rest (UnQual (sym ":<|>")) $

63− alias (TyApp (TyApp meth octet) (TyCon "Body"))

63+ alias (TyApp (TyApp meth octet) (TyCon "Stream"))

6464 (path ++ qry (Map.delete "alt" (_mParameters m)) ++ [alt] ++ media)

6565

6666 alias = foldr' (\l r -> TyInfix l (UnQual (sym ":>")) r)

@@ -107,13 +107,13 @@ verbAlias n m

107107 , _mSupportsMediaUpload m =

108108 [TyApp (TyApp (TyApp (TyCon "MultipartRelated") json)

109109 (tycon (ref b)))

110− (TyCon "Body")]

110+ (TyCon "Stream")]

111111

112112 | Just b <- _mRequest m =

113113 [TyApp (TyApp (TyCon "ReqBody") json) (tycon (ref b))]

114114

115115 | _mSupportsMediaUpload m =

116− [TyApp (TyApp (TyCon "ReqBody") octet) (TyCon "Body")]

116+ [TyApp (TyApp (TyCon "ReqBody") octet) (TyCon "Stream")]

117117

118118 | otherwise = []

119119

@@ -140,7 +140,7 @@ downloadDecl n p api url fs m =

140140 googleRequestDecl n ty rs alt p api url fs m pat prec

141141 where

142142 ty = TyApp (TyCon "MediaDownload") (tycon n)

143− rs = InsType noLoc (TyApp (TyCon "Rs") ty) (TyCon "Body")

143+ rs = InsType noLoc (TyApp (TyCon "Rs") ty) (TyCon "Stream")

144144

145145 alt = Just (var "AltMedia")

146146

@@ -445,7 +445,7 @@ externalLit = \case

445445 Alt t -> TyCon (unqual (Text.unpack t))

446446 Key -> TyCon "AuthKey"

447447 OAuthToken -> TyCon "OAuthToken"

448− Body -> TyCon "Body"

448+ Body -> TyCon "Stream"

449449

450450internalLit :: Lit -> Type

451451internalLit = \case

@@ -466,7 +466,7 @@ internalLit = \case

466466 Alt t -> TyCon (unqual (Text.unpack t))

467467 Key -> TyCon "AuthKey"

468468 OAuthToken -> TyCon "OAuthToken"

469− Body -> TyCon "Body"

469+ Body -> TyCon "Stream"

470470

471471mapping :: TType -> Exp -> Exp

472472mapping t e = infixE e "." (go t)

gogol-adexchange-seller/gen/Network/Google/Resource/AdExchangeSeller/Accounts/Reports/Generate.hs+2−2

@@ -99,7 +99,7 @@ type AccountsReportsGenerateResource =

9999 QueryParam "key" AuthKey :>

100100 QueryParam "oauth_token" OAuthToken :>

101101 QueryParam "alt" AltMedia :>

102− Get '[OctetStream] Body

102+ Get '[OctetStream] Stream

103103

104104-- | Generate an Ad Exchange report based on the report request sent in the

105105-- query parameters. Returns the result as JSON; to retrieve output in CSV

@@ -316,7 +316,7 @@ instance GoogleRequest AccountsReportsGenerate' where

316316instance GoogleRequest

317317 (MediaDownload AccountsReportsGenerate') where

318318 type Rs (MediaDownload AccountsReportsGenerate') =

319− Body

319+ Stream

320320 request = requestWith adExchangeSellerRequest

321321 requestWith rq

322322 (MediaDownload AccountsReportsGenerate'{..})

gogol-admin-emailmigration/gen/Network/Google/Resource/EmailMigration/Mail/Insert.hs+5−5

@@ -59,7 +59,7 @@ type MailInsertResource =

5959 QueryParam "key" AuthKey :>

6060 QueryParam "oauth_token" OAuthToken :>

6161 QueryParam "alt" AltJSON :>

62− MultipartRelated '[JSON] MailItem Body :>

62+ MultipartRelated '[JSON] MailItem Stream :>

6363 Post '[JSON] ()

6464

6565-- | Insert Mail into Google\'s Gmail backends

@@ -70,12 +70,12 @@ data MailInsert' = MailInsert'

7070 , _miPrettyPrint :: !Bool

7171 , _miUserIP :: !(Maybe Text)

7272 , _miPayload :: !MailItem

73− , _miMedia :: !Body

73+ , _miMedia :: !Stream

7474 , _miKey :: !(Maybe AuthKey)

7575 , _miOAuthToken :: !(Maybe OAuthToken)

7676 , _miUserKey :: !Text

7777 , _miFields :: !(Maybe Text)

78− } deriving (Eq,Show,Data,Typeable,Generic)

78+ }

7979

8080-- | Creates a value of 'MailInsert'' with the minimum fields required to make a request.

8181--

@@ -100,7 +100,7 @@ data MailInsert' = MailInsert'

100100-- * 'miFields'

101101mailInsert'

102102 :: MailItem -- ^ 'payload'

103− -> Body -- ^ 'media'

103+ -> Stream -- ^ 'media'

104104 -> Text -- ^ 'userKey'

105105 -> MailInsert'

106106mailInsert' pMiPayload_ pMiMedia_ pMiUserKey_ =

@@ -139,7 +139,7 @@ miPayload :: Lens' MailInsert' MailItem

139139miPayload

140140 = lens _miPayload (\ s a -> s{_miPayload = a})

141141

142−miMedia :: Lens' MailInsert' Body

142+miMedia :: Lens' MailInsert' Stream

143143miMedia = lens _miMedia (\ s a -> s{_miMedia = a})

144144

145145-- | API key. Your API key identifies your project and provides you with API

gogol-adsense/gen/Network/Google/Resource/AdSense/Accounts/Reports/Generate.hs+2−2

@@ -108,7 +108,7 @@ type AccountsReportsGenerateResource =

108108 QueryParam "oauth_token" OAuthToken

109109 :>

110110 QueryParam "alt" AltMedia :>

111− Get '[OctetStream] Body

111+ Get '[OctetStream] Stream

112112

113113-- | Generate an AdSense report based on the report request sent in the query

114114-- parameters. Returns the result as JSON; to retrieve output in CSV format

@@ -349,7 +349,7 @@ instance GoogleRequest AccountsReportsGenerate' where

349349instance GoogleRequest

350350 (MediaDownload AccountsReportsGenerate') where

351351 type Rs (MediaDownload AccountsReportsGenerate') =

352− Body

352+ Stream

353353 request = requestWith adSenseRequest

354354 requestWith rq

355355 (MediaDownload AccountsReportsGenerate'{..})

gogol-adsense/gen/Network/Google/Resource/AdSense/Reports/Generate.hs+2−2

@@ -105,7 +105,7 @@ type ReportsGenerateResource =

105105 QueryParam "oauth_token" OAuthToken

106106 :>

107107 QueryParam "alt" AltMedia :>

108− Get '[OctetStream] Body

108+ Get '[OctetStream] Stream

109109

110110-- | Generate an AdSense report based on the report request sent in the query

111111-- parameters. Returns the result as JSON; to retrieve output in CSV format

@@ -340,7 +340,7 @@ instance GoogleRequest ReportsGenerate' where

340340

341341instance GoogleRequest

342342 (MediaDownload ReportsGenerate') where

343− type Rs (MediaDownload ReportsGenerate') = Body

343+ type Rs (MediaDownload ReportsGenerate') = Stream

344344 request = requestWith adSenseRequest

345345 requestWith rq (MediaDownload ReportsGenerate'{..})

346346 = go (Just _rgStartDate) (Just _rgEndDate)

gogol-analytics/gen/Network/Google/Resource/Analytics/Management/Uploads/UploadData.hs+5−5

@@ -66,7 +66,7 @@ type ManagementUploadsUploadDataResource =

6666 QueryParam "key" AuthKey :>

6767 QueryParam "oauth_token" OAuthToken :>

6868 QueryParam "alt" AltJSON :>

69− ReqBody '[OctetStream] Body :>

69+ ReqBody '[OctetStream] Stream :>

7070 Post '[JSON] Upload

7171

7272-- | Upload data for a custom data source.

@@ -78,12 +78,12 @@ data ManagementUploadsUploadData' = ManagementUploadsUploadData'

7878 , _muudWebPropertyId :: !Text

7979 , _muudUserIP :: !(Maybe Text)

8080 , _muudCustomDataSourceId :: !Text

81− , _muudMedia :: !Body

81+ , _muudMedia :: !Stream

8282 , _muudAccountId :: !Text

8383 , _muudKey :: !(Maybe AuthKey)

8484 , _muudOAuthToken :: !(Maybe OAuthToken)

8585 , _muudFields :: !(Maybe Text)

86− } deriving (Eq,Show,Data,Typeable,Generic)

86+ }

8787

8888-- | Creates a value of 'ManagementUploadsUploadData'' with the minimum fields required to make a request.

8989--

@@ -111,7 +111,7 @@ data ManagementUploadsUploadData' = ManagementUploadsUploadData'

111111managementUploadsUploadData'

112112 :: Text -- ^ 'webPropertyId'

113113 -> Text -- ^ 'customDataSourceId'

114− -> Body -- ^ 'media'

114+ -> Stream -- ^ 'media'

115115 -> Text -- ^ 'accountId'

116116 -> ManagementUploadsUploadData'

117117managementUploadsUploadData' pMuudWebPropertyId_ pMuudCustomDataSourceId_ pMuudMedia_ pMuudAccountId_ =

@@ -160,7 +160,7 @@ muudCustomDataSourceId

160160 = lens _muudCustomDataSourceId

161161 (\ s a -> s{_muudCustomDataSourceId = a})

162162

163−muudMedia :: Lens' ManagementUploadsUploadData' Body

163+muudMedia :: Lens' ManagementUploadsUploadData' Stream

164164muudMedia

165165 = lens _muudMedia (\ s a -> s{_muudMedia = a})

166166

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/APKs/Upload.hs+5−5

@@ -61,7 +61,7 @@ type EditsAPKsUploadResource =

6161 QueryParam "key" AuthKey :>

6262 QueryParam "oauth_token" OAuthToken :>

6363 QueryParam "alt" AltJSON :>

64− ReqBody '[OctetStream] Body :> Post '[JSON] APK

64+ ReqBody '[OctetStream] Stream :> Post '[JSON] APK

6565

6666--

6767-- /See:/ 'editsAPKsUpload'' smart constructor.

@@ -70,12 +70,12 @@ data EditsAPKsUpload' = EditsAPKsUpload'

7070 , _eapkuPrettyPrint :: !Bool

7171 , _eapkuPackageName :: !Text

7272 , _eapkuUserIP :: !(Maybe Text)

73− , _eapkuMedia :: !Body

73+ , _eapkuMedia :: !Stream

7474 , _eapkuKey :: !(Maybe AuthKey)

7575 , _eapkuOAuthToken :: !(Maybe OAuthToken)

7676 , _eapkuEditId :: !Text

7777 , _eapkuFields :: !(Maybe Text)

78− } deriving (Eq,Show,Data,Typeable,Generic)

78+ }

7979

8080-- | Creates a value of 'EditsAPKsUpload'' with the minimum fields required to make a request.

8181--

@@ -100,7 +100,7 @@ data EditsAPKsUpload' = EditsAPKsUpload'

100100-- * 'eapkuFields'

101101editsAPKsUpload'

102102 :: Text -- ^ 'packageName'

103− -> Body -- ^ 'media'

103+ -> Stream -- ^ 'media'

104104 -> Text -- ^ 'editId'

105105 -> EditsAPKsUpload'

106106editsAPKsUpload' pEapkuPackageName_ pEapkuMedia_ pEapkuEditId_ =

@@ -143,7 +143,7 @@ eapkuUserIP :: Lens' EditsAPKsUpload' (Maybe Text)

143143eapkuUserIP

144144 = lens _eapkuUserIP (\ s a -> s{_eapkuUserIP = a})

145145

146−eapkuMedia :: Lens' EditsAPKsUpload' Body

146+eapkuMedia :: Lens' EditsAPKsUpload' Stream

147147eapkuMedia

148148 = lens _eapkuMedia (\ s a -> s{_eapkuMedia = a})

149149

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/ExpansionFiles/Upload.hs+5−5

@@ -68,7 +68,7 @@ type EditsExpansionFilesUploadResource =

6868 QueryParam "key" AuthKey :>

6969 QueryParam "oauth_token" OAuthToken :>

7070 QueryParam "alt" AltJSON :>

71− ReqBody '[OctetStream] Body :>

71+ ReqBody '[OctetStream] Stream :>

7272 Post '[JSON] ExpansionFilesUploadResponse

7373

7474-- | Uploads and attaches a new Expansion File to the APK specified.

@@ -80,13 +80,13 @@ data EditsExpansionFilesUpload' = EditsExpansionFilesUpload'

8080 , _eefuPackageName :: !Text

8181 , _eefuAPKVersionCode :: !Int32

8282 , _eefuUserIP :: !(Maybe Text)

83− , _eefuMedia :: !Body

83+ , _eefuMedia :: !Stream

8484 , _eefuKey :: !(Maybe AuthKey)

8585 , _eefuExpansionFileType :: !EditsExpansionFilesUploadExpansionFileType

8686 , _eefuOAuthToken :: !(Maybe OAuthToken)

8787 , _eefuEditId :: !Text

8888 , _eefuFields :: !(Maybe Text)

89− } deriving (Eq,Show,Data,Typeable,Generic)

89+ }

9090

9191-- | Creates a value of 'EditsExpansionFilesUpload'' with the minimum fields required to make a request.

9292--

@@ -116,7 +116,7 @@ data EditsExpansionFilesUpload' = EditsExpansionFilesUpload'

116116editsExpansionFilesUpload'

117117 :: Text -- ^ 'packageName'

118118 -> Int32 -- ^ 'apkVersionCode'

119− -> Body -- ^ 'media'

119+ -> Stream -- ^ 'media'

120120 -> EditsExpansionFilesUploadExpansionFileType -- ^ 'expansionFileType'

121121 -> Text -- ^ 'editId'

122122 -> EditsExpansionFilesUpload'

@@ -169,7 +169,7 @@ eefuUserIP :: Lens' EditsExpansionFilesUpload' (Maybe Text)

169169eefuUserIP

170170 = lens _eefuUserIP (\ s a -> s{_eefuUserIP = a})

171171

172−eefuMedia :: Lens' EditsExpansionFilesUpload' Body

172+eefuMedia :: Lens' EditsExpansionFilesUpload' Stream

173173eefuMedia

174174 = lens _eefuMedia (\ s a -> s{_eefuMedia = a})

175175

gogol-android-publisher/gen/Network/Google/Resource/AndroidPublisher/Edits/Images/Upload.hs+5−5

@@ -66,7 +66,7 @@ type EditsImagesUploadResource =

6666 QueryParam "key" AuthKey :>

6767 QueryParam "oauth_token" OAuthToken :>

6868 QueryParam "alt" AltJSON :>

69− ReqBody '[OctetStream] Body :>

69+ ReqBody '[OctetStream] Stream :>

7070 Post '[JSON] ImagesUploadResponse

7171

7272-- | Uploads a new image and adds it to the list of images for the specified

@@ -78,14 +78,14 @@ data EditsImagesUpload' = EditsImagesUpload'

7878 , _eiuPrettyPrint :: !Bool

7979 , _eiuPackageName :: !Text

8080 , _eiuUserIP :: !(Maybe Text)

81− , _eiuMedia :: !Body

81+ , _eiuMedia :: !Stream

8282 , _eiuImageType :: !EditsImagesUploadImageType

8383 , _eiuKey :: !(Maybe AuthKey)

8484 , _eiuLanguage :: !Text

8585 , _eiuOAuthToken :: !(Maybe OAuthToken)

8686 , _eiuEditId :: !Text

8787 , _eiuFields :: !(Maybe Text)

88− } deriving (Eq,Show,Data,Typeable,Generic)

88+ }

8989

9090-- | Creates a value of 'EditsImagesUpload'' with the minimum fields required to make a request.

9191--

@@ -114,7 +114,7 @@ data EditsImagesUpload' = EditsImagesUpload'

114114-- * 'eiuFields'

115115editsImagesUpload'

116116 :: Text -- ^ 'packageName'

117− -> Body -- ^ 'media'

117+ -> Stream -- ^ 'media'

118118 -> EditsImagesUploadImageType -- ^ 'imageType'

119119 -> Text -- ^ 'language'

120120 -> Text -- ^ 'editId'

@@ -160,7 +160,7 @@ eiuUserIP :: Lens' EditsImagesUpload' (Maybe Text)

160160eiuUserIP

161161 = lens _eiuUserIP (\ s a -> s{_eiuUserIP = a})

162162

163−eiuMedia :: Lens' EditsImagesUpload' Body

163+eiuMedia :: Lens' EditsImagesUpload' Stream

164164eiuMedia = lens _eiuMedia (\ s a -> s{_eiuMedia = a})

165165

166166eiuImageType :: Lens' EditsImagesUpload' EditsImagesUploadImageType

gogol-bigquery/gen/Network/Google/Resource/BigQuery/Jobs/Insert.hs+6−5

@@ -60,7 +60,8 @@ type JobsInsertResource =

6060 QueryParam "key" AuthKey :>

6161 QueryParam "oauth_token" OAuthToken :>

6262 QueryParam "alt" AltJSON :>

63− MultipartRelated '[JSON] Job Body :> Post '[JSON] Job

63+ MultipartRelated '[JSON] Job Stream :>

64+ Post '[JSON] Job

6465

6566-- | Starts a new asynchronous job. Requires the Can View project role.

6667--

@@ -70,12 +71,12 @@ data JobsInsert' = JobsInsert'

7071 , _jiPrettyPrint :: !Bool

7172 , _jiUserIP :: !(Maybe Text)

7273 , _jiPayload :: !Job

73− , _jiMedia :: !Body

74+ , _jiMedia :: !Stream

7475 , _jiKey :: !(Maybe AuthKey)

7576 , _jiProjectId :: !Text

7677 , _jiOAuthToken :: !(Maybe OAuthToken)

7778 , _jiFields :: !(Maybe Text)

78− } deriving (Eq,Show,Data,Typeable,Generic)

79+ }

7980

8081-- | Creates a value of 'JobsInsert'' with the minimum fields required to make a request.

8182--

@@ -100,7 +101,7 @@ data JobsInsert' = JobsInsert'

100101-- * 'jiFields'

101102jobsInsert'

102103 :: Job -- ^ 'payload'

103− -> Body -- ^ 'media'

104+ -> Stream -- ^ 'media'

104105 -> Text -- ^ 'projectId'

105106 -> JobsInsert'

106107jobsInsert' pJiPayload_ pJiMedia_ pJiProjectId_ =

@@ -139,7 +140,7 @@ jiPayload :: Lens' JobsInsert' Job

139140jiPayload

140141 = lens _jiPayload (\ s a -> s{_jiPayload = a})

141142

142−jiMedia :: Lens' JobsInsert' Body

143+jiMedia :: Lens' JobsInsert' Stream

143144jiMedia = lens _jiMedia (\ s a -> s{_jiMedia = a})

144145

145146-- | API key. Your API key identifies your project and provides you with API

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/CreativeAssets/Insert.hs+6−5

@@ -63,7 +63,8 @@ type CreativeAssetsInsertResource =

6363 QueryParam "key" AuthKey :>

6464 QueryParam "oauth_token" OAuthToken :>

6565 QueryParam "alt" AltJSON :>

66− MultipartRelated '[JSON] CreativeAssetMetadata Body

66+ MultipartRelated '[JSON] CreativeAssetMetadata

67+ Stream

6768 :> Post '[JSON] CreativeAssetMetadata

6869

6970-- | Inserts a new creative asset.

@@ -76,11 +77,11 @@ data CreativeAssetsInsert' = CreativeAssetsInsert'

7677 , _caiAdvertiserId :: !Int64

7778 , _caiProFileId :: !Int64

7879 , _caiPayload :: !CreativeAssetMetadata

79− , _caiMedia :: !Body

80+ , _caiMedia :: !Stream

8081 , _caiKey :: !(Maybe AuthKey)

8182 , _caiOAuthToken :: !(Maybe OAuthToken)

8283 , _caiFields :: !(Maybe Text)

83− } deriving (Eq,Show,Data,Typeable,Generic)

84+ }

8485

8586-- | Creates a value of 'CreativeAssetsInsert'' with the minimum fields required to make a request.

8687--

@@ -109,7 +110,7 @@ creativeAssetsInsert'

109110 :: Int64 -- ^ 'advertiserId'

110111 -> Int64 -- ^ 'profileId'

111112 -> CreativeAssetMetadata -- ^ 'payload'

112− -> Body -- ^ 'media'

113+ -> Stream -- ^ 'media'

113114 -> CreativeAssetsInsert'

114115creativeAssetsInsert' pCaiAdvertiserId_ pCaiProFileId_ pCaiPayload_ pCaiMedia_ =

115116 CreativeAssetsInsert'

@@ -160,7 +161,7 @@ caiPayload :: Lens' CreativeAssetsInsert' CreativeAssetMetadata

160161caiPayload

161162 = lens _caiPayload (\ s a -> s{_caiPayload = a})

162163

163−caiMedia :: Lens' CreativeAssetsInsert' Body

164+caiMedia :: Lens' CreativeAssetsInsert' Stream

164165caiMedia = lens _caiMedia (\ s a -> s{_caiMedia = a})

165166

166167-- | API key. Your API key identifies your project and provides you with API

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Files/Get.hs+3−2

@@ -71,7 +71,8 @@ type FilesGetResource =

7171 QueryParam "fields" Text :>

7272 QueryParam "key" AuthKey :>

7373 QueryParam "oauth_token" OAuthToken :>

74− QueryParam "alt" AltMedia :> Get '[OctetStream] Body

74+ QueryParam "alt" AltMedia :>

75+ Get '[OctetStream] Stream

7576

7677-- | Retrieves a report file by its report ID and file ID.

7778--

@@ -184,7 +185,7 @@ instance GoogleRequest FilesGet' where

184185

185186instance GoogleRequest (MediaDownload FilesGet')

186187 where

187− type Rs (MediaDownload FilesGet') = Body

188+ type Rs (MediaDownload FilesGet') = Stream

188189 request = requestWith dFAReportingRequest

189190 requestWith rq (MediaDownload FilesGet'{..})

190191 = go _fgReportId _fgFileId _fgQuotaUser

gogol-dfareporting/gen/Network/Google/Resource/DFAReporting/Reports/Files/Get.hs+2−2

@@ -77,7 +77,7 @@ type ReportsFilesGetResource =

7777 QueryParam "key" AuthKey :>

7878 QueryParam "oauth_token" OAuthToken :>

7979 QueryParam "alt" AltMedia :>

80− Get '[OctetStream] Body

80+ Get '[OctetStream] Stream

8181

8282-- | Retrieves a report file.

8383--

@@ -207,7 +207,7 @@ instance GoogleRequest ReportsFilesGet' where

207207

208208instance GoogleRequest

209209 (MediaDownload ReportsFilesGet') where

210− type Rs (MediaDownload ReportsFilesGet') = Body

210+ type Rs (MediaDownload ReportsFilesGet') = Stream

211211 request = requestWith dFAReportingRequest

212212 requestWith rq (MediaDownload ReportsFilesGet'{..})

213213 = go _rfgProFileId _rfgReportId _rfgFileId

gogol-doubleclick-search/gen/Network/Google/Resource/DoubleClickSearch/Reports/GetFile.hs+3−2

@@ -71,7 +71,8 @@ type ReportsGetFileResource =

7171 QueryParam "fields" Text :>

7272 QueryParam "key" AuthKey :>

7373 QueryParam "oauth_token" OAuthToken :>

74− QueryParam "alt" AltMedia :> Get '[OctetStream] Body

74+ QueryParam "alt" AltMedia :>

75+ Get '[OctetStream] Stream

7576

7677-- | Downloads a report file encoded in UTF-8.

7778--

@@ -190,7 +191,7 @@ instance GoogleRequest ReportsGetFile' where

190191

191192instance GoogleRequest

192193 (MediaDownload ReportsGetFile') where

193− type Rs (MediaDownload ReportsGetFile') = Body

194+ type Rs (MediaDownload ReportsGetFile') = Stream

194195 request = requestWith doubleClickSearchRequest

195196 requestWith rq (MediaDownload ReportsGetFile'{..})

196197 = go _rgfReportId _rgfReportFragment _rgfQuotaUser

gogol-drive/gen/Network/Google/Resource/Drive/Files/Get.hs+2−2

@@ -79,7 +79,7 @@ type FilesGetResource =

7979 QueryParam "key" AuthKey :>

8080 QueryParam "oauth_token" OAuthToken :>

8181 QueryParam "alt" AltMedia :>

82− Get '[OctetStream] Body

82+ Get '[OctetStream] Stream

8383

8484-- | Gets a file\'s metadata by ID.

8585--

@@ -227,7 +227,7 @@ instance GoogleRequest FilesGet' where

227227

228228instance GoogleRequest (MediaDownload FilesGet')

229229 where

230− type Rs (MediaDownload FilesGet') = Body

230+ type Rs (MediaDownload FilesGet') = Stream

231231 request = requestWith driveRequest

232232 requestWith rq (MediaDownload FilesGet'{..})

233233 = go _fgFileId (Just _fgUpdateViewedDate)

gogol-drive/gen/Network/Google/Resource/Drive/Files/Insert.hs+5−5

@@ -73,7 +73,7 @@ type FilesInsertResource =

7373 QueryParam "key" AuthKey :>

7474 QueryParam "oauth_token" OAuthToken :>

7575 QueryParam "alt" AltJSON :>

76− MultipartRelated '[JSON] File Body :>

76+ MultipartRelated '[JSON] File Stream :>

7777 Post '[JSON] File

7878

7979-- | Insert a new file.

@@ -88,7 +88,7 @@ data FilesInsert' = FilesInsert'

8888 , _fiTimedTextLanguage :: !(Maybe Text)

8989 , _fiPayload :: !File

9090 , _fiUseContentAsIndexableText :: !Bool

91− , _fiMedia :: !Body

91+ , _fiMedia :: !Stream

9292 , _fiTimedTextTrackName :: !(Maybe Text)

9393 , _fiOCRLanguage :: !(Maybe Text)

9494 , _fiKey :: !(Maybe AuthKey)

@@ -96,7 +96,7 @@ data FilesInsert' = FilesInsert'

9696 , _fiOAuthToken :: !(Maybe OAuthToken)

9797 , _fiOCR :: !Bool

9898 , _fiFields :: !(Maybe Text)

99− } deriving (Eq,Show,Data,Typeable,Generic)

99+ }

100100

101101-- | Creates a value of 'FilesInsert'' with the minimum fields required to make a request.

102102--

@@ -135,7 +135,7 @@ data FilesInsert' = FilesInsert'

135135-- * 'fiFields'

136136filesInsert'

137137 :: File -- ^ 'payload'

138− -> Body -- ^ 'media'

138+ -> Stream -- ^ 'media'

139139 -> FilesInsert'

140140filesInsert' pFiPayload_ pFiMedia_ =

141141 FilesInsert'

@@ -203,7 +203,7 @@ fiUseContentAsIndexableText

203203 = lens _fiUseContentAsIndexableText

204204 (\ s a -> s{_fiUseContentAsIndexableText = a})

205205

206−fiMedia :: Lens' FilesInsert' Body

206+fiMedia :: Lens' FilesInsert' Stream

207207fiMedia = lens _fiMedia (\ s a -> s{_fiMedia = a})

208208

209209-- | The timed text track name.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Update.hs+5−5

@@ -89,7 +89,7 @@ type FilesUpdateResource =

8989 :>

9090 QueryParam "alt" AltJSON :>

9191 MultipartRelated '[JSON] File

92− Body

92+ Stream

9393 :> Put '[JSON] File

9494

9595-- | Updates file metadata and\/or content.

@@ -107,7 +107,7 @@ data FilesUpdate' = FilesUpdate'

107107 , _fuRemoveParents :: !(Maybe Text)

108108 , _fuModifiedDateBehavior :: !(Maybe FilesUpdateModifiedDateBehavior)

109109 , _fuUseContentAsIndexableText :: !Bool

110− , _fuMedia :: !Body

110+ , _fuMedia :: !Stream

111111 , _fuTimedTextTrackName :: !(Maybe Text)

112112 , _fuOCRLanguage :: !(Maybe Text)

113113 , _fuKey :: !(Maybe AuthKey)

@@ -118,7 +118,7 @@ data FilesUpdate' = FilesUpdate'

118118 , _fuAddParents :: !(Maybe Text)

119119 , _fuOCR :: !Bool

120120 , _fuFields :: !(Maybe Text)

121− } deriving (Eq,Show,Data,Typeable,Generic)

121+ }

122122

123123-- | Creates a value of 'FilesUpdate'' with the minimum fields required to make a request.

124124--

@@ -169,7 +169,7 @@ data FilesUpdate' = FilesUpdate'

169169-- * 'fuFields'

170170filesUpdate'

171171 :: File -- ^ 'payload'

172− -> Body -- ^ 'media'

172+ -> Stream -- ^ 'media'

173173 -> Text -- ^ 'fileId'

174174 -> FilesUpdate'

175175filesUpdate' pFuPayload_ pFuMedia_ pFuFileId_ =

@@ -269,7 +269,7 @@ fuUseContentAsIndexableText

269269 = lens _fuUseContentAsIndexableText

270270 (\ s a -> s{_fuUseContentAsIndexableText = a})

271271

272−fuMedia :: Lens' FilesUpdate' Body

272+fuMedia :: Lens' FilesUpdate' Stream

273273fuMedia = lens _fuMedia (\ s a -> s{_fuMedia = a})

274274

275275-- | The timed text track name.

gogol-drive/gen/Network/Google/Resource/Drive/Files/Watch.hs+2−2

@@ -84,7 +84,7 @@ type FilesWatchResource =

8484 QueryParam "oauth_token" OAuthToken :>

8585 QueryParam "alt" AltMedia :>

8686 ReqBody '[JSON] Channel :>

87− Post '[OctetStream] Body

87+ Post '[OctetStream] Stream

8888

8989-- | Subscribe to changes on a file

9090--

@@ -243,7 +243,7 @@ instance GoogleRequest FilesWatch' where

243243

244244instance GoogleRequest (MediaDownload FilesWatch')

245245 where

246− type Rs (MediaDownload FilesWatch') = Body

246+ type Rs (MediaDownload FilesWatch') = Stream

247247 request = requestWith driveRequest

248248 requestWith rq (MediaDownload FilesWatch'{..})

249249 = go _fwFileId (Just _fwUpdateViewedDate)

gogol-drive/gen/Network/Google/Resource/Drive/Realtime/Get.hs+3−2

@@ -72,7 +72,8 @@ type RealtimeGetResource =

7272 QueryParam "fields" Text :>

7373 QueryParam "key" AuthKey :>

7474 QueryParam "oauth_token" OAuthToken :>

75− QueryParam "alt" AltMedia :> Get '[OctetStream] Body

75+ QueryParam "alt" AltMedia :>

76+ Get '[OctetStream] Stream

7677

7778-- | Exports the contents of the Realtime API data model associated with this

7879-- file as JSON.

@@ -192,7 +193,7 @@ instance GoogleRequest RealtimeGet' where

192193

193194instance GoogleRequest (MediaDownload RealtimeGet')

194195 where

195− type Rs (MediaDownload RealtimeGet') = Body

196+ type Rs (MediaDownload RealtimeGet') = Stream

196197 request = requestWith driveRequest

197198 requestWith rq (MediaDownload RealtimeGet'{..})

198199 = go _reaFileId _reaRevision _reaQuotaUser

gogol-drive/gen/Network/Google/Resource/Drive/Realtime/Update.hs+5−5

@@ -62,7 +62,7 @@ type RealtimeUpdateResource =

6262 QueryParam "key" AuthKey :>

6363 QueryParam "oauth_token" OAuthToken :>

6464 QueryParam "alt" AltJSON :>

65− ReqBody '[OctetStream] Body :> Put '[JSON] ()

65+ ReqBody '[OctetStream] Stream :> Put '[JSON] ()

6666

6767-- | Overwrites the Realtime API data model associated with this file with

6868-- the provided JSON data model.

@@ -73,12 +73,12 @@ data RealtimeUpdate' = RealtimeUpdate'

7373 , _rPrettyPrint :: !Bool

7474 , _rUserIP :: !(Maybe Text)

7575 , _rBaseRevision :: !(Maybe Text)

76− , _rMedia :: !Body

76+ , _rMedia :: !Stream

7777 , _rKey :: !(Maybe AuthKey)

7878 , _rFileId :: !Text

7979 , _rOAuthToken :: !(Maybe OAuthToken)

8080 , _rFields :: !(Maybe Text)

81− } deriving (Eq,Show,Data,Typeable,Generic)

81+ }

8282

8383-- | Creates a value of 'RealtimeUpdate'' with the minimum fields required to make a request.

8484--

@@ -102,7 +102,7 @@ data RealtimeUpdate' = RealtimeUpdate'

102102--

103103-- * 'rFields'

104104realtimeUpdate'

105− :: Body -- ^ 'media'

105+ :: Stream -- ^ 'media'

106106 -> Text -- ^ 'fileId'

107107 -> RealtimeUpdate'

108108realtimeUpdate' pRMedia_ pRFileId_ =

@@ -145,7 +145,7 @@ rBaseRevision

145145 = lens _rBaseRevision

146146 (\ s a -> s{_rBaseRevision = a})

147147

148−rMedia :: Lens' RealtimeUpdate' Body

148+rMedia :: Lens' RealtimeUpdate' Stream

149149rMedia = lens _rMedia (\ s a -> s{_rMedia = a})

150150

151151-- | API key. Your API key identifies your project and provides you with API

gogol-freebasesearch/gen/Network/Google/Method/Freebase/Search.hs+2−2

@@ -178,7 +178,7 @@ type SearchMethod =

178178 :>

179179 Get

180180 '[OctetStream]

181− Body

181+ Stream

182182

183183-- | Search Freebase open data.

184184--

@@ -496,7 +496,7 @@ instance GoogleRequest Search' where

496496 = clientBuild (Proxy :: Proxy SearchMethod) rq

497497

498498instance GoogleRequest (MediaDownload Search') where

499− type Rs (MediaDownload Search') = Body

499+ type Rs (MediaDownload Search') = Stream

500500 request = requestWith freebaseSearchRequest

501501 requestWith rq (MediaDownload Search'{..})

502502 = go (_sWithout ^. _Default) _sCursor

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQL.hs+3−2

@@ -73,7 +73,8 @@ type QuerySQLResource =

7373 QueryParam "fields" Text :>

7474 QueryParam "key" AuthKey :>

7575 QueryParam "oauth_token" OAuthToken :>

76− QueryParam "alt" AltMedia :> Post '[OctetStream] Body

76+ QueryParam "alt" AltMedia :>

77+ Post '[OctetStream] Stream

7778

7879-- | Executes a Fusion Tables SQL statement, which can be any of - SELECT -

7980-- INSERT - UPDATE - DELETE - SHOW - DESCRIBE - CREATE statement.

@@ -201,7 +202,7 @@ instance GoogleRequest QuerySQL' where

201202

202203instance GoogleRequest (MediaDownload QuerySQL')

203204 where

204− type Rs (MediaDownload QuerySQL') = Body

205+ type Rs (MediaDownload QuerySQL') = Stream

205206 request = requestWith fusionTablesRequest

206207 requestWith rq (MediaDownload QuerySQL'{..})

207208 = go (Just _qsqlSQL) _qsqlTyped _qsqlHdrs

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Query/SQLGet.hs+3−2

@@ -72,7 +72,8 @@ type QuerySQLGetResource =

7272 QueryParam "fields" Text :>

7373 QueryParam "key" AuthKey :>

7474 QueryParam "oauth_token" OAuthToken :>

75− QueryParam "alt" AltMedia :> Get '[OctetStream] Body

75+ QueryParam "alt" AltMedia :>

76+ Get '[OctetStream] Stream

7677

7778-- | Executes a SQL statement which can be any of - SELECT - SHOW - DESCRIBE

7879--

@@ -199,7 +200,7 @@ instance GoogleRequest QuerySQLGet' where

199200

200201instance GoogleRequest (MediaDownload QuerySQLGet')

201202 where

202− type Rs (MediaDownload QuerySQLGet') = Body

203+ type Rs (MediaDownload QuerySQLGet') = Stream

203204 request = requestWith fusionTablesRequest

204205 requestWith rq (MediaDownload QuerySQLGet'{..})

205206 = go (Just _qsqlgSQL) _qsqlgTyped _qsqlgHdrs

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportRows.hs+5−5

@@ -69,7 +69,7 @@ type TableImportRowsResource =

6969 QueryParam "key" AuthKey :>

7070 QueryParam "oauth_token" OAuthToken :>

7171 QueryParam "alt" AltJSON :>

72− ReqBody '[OctetStream] Body :>

72+ ReqBody '[OctetStream] Stream :>

7373 Post '[JSON] Import

7474

7575-- | Imports more rows into a table.

@@ -81,7 +81,7 @@ data TableImportRows' = TableImportRows'

8181 , _tirUserIP :: !(Maybe Text)

8282 , _tirStartLine :: !(Maybe Int32)

8383 , _tirEndLine :: !(Maybe Int32)

84− , _tirMedia :: !Body

84+ , _tirMedia :: !Stream

8585 , _tirKey :: !(Maybe AuthKey)

8686 , _tirOAuthToken :: !(Maybe OAuthToken)

8787 , _tirTableId :: !Text

@@ -89,7 +89,7 @@ data TableImportRows' = TableImportRows'

8989 , _tirEncoding :: !(Maybe Text)

9090 , _tirIsStrict :: !(Maybe Bool)

9191 , _tirFields :: !(Maybe Text)

92− } deriving (Eq,Show,Data,Typeable,Generic)

92+ }

9393

9494-- | Creates a value of 'TableImportRows'' with the minimum fields required to make a request.

9595--

@@ -121,7 +121,7 @@ data TableImportRows' = TableImportRows'

121121--

122122-- * 'tirFields'

123123tableImportRows'

124− :: Body -- ^ 'media'

124+ :: Stream -- ^ 'media'

125125 -> Text -- ^ 'tableId'

126126 -> TableImportRows'

127127tableImportRows' pTirMedia_ pTirTableId_ =

@@ -174,7 +174,7 @@ tirEndLine :: Lens' TableImportRows' (Maybe Int32)

174174tirEndLine

175175 = lens _tirEndLine (\ s a -> s{_tirEndLine = a})

176176

177−tirMedia :: Lens' TableImportRows' Body

177+tirMedia :: Lens' TableImportRows' Stream

178178tirMedia = lens _tirMedia (\ s a -> s{_tirMedia = a})

179179

180180-- | API key. Your API key identifies your project and provides you with API

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ImportTable.hs+5−5

@@ -63,7 +63,7 @@ type TableImportTableResource =

6363 QueryParam "key" AuthKey :>

6464 QueryParam "oauth_token" OAuthToken :>

6565 QueryParam "alt" AltJSON :>

66− ReqBody '[OctetStream] Body :> Post '[JSON] Table

66+ ReqBody '[OctetStream] Stream :> Post '[JSON] Table

6767

6868-- | Imports a new table.

6969--

@@ -72,14 +72,14 @@ data TableImportTable' = TableImportTable'

7272 { _titQuotaUser :: !(Maybe Text)

7373 , _titPrettyPrint :: !Bool

7474 , _titUserIP :: !(Maybe Text)

75− , _titMedia :: !Body

75+ , _titMedia :: !Stream

7676 , _titKey :: !(Maybe AuthKey)

7777 , _titName :: !Text

7878 , _titOAuthToken :: !(Maybe OAuthToken)

7979 , _titDelimiter :: !(Maybe Text)

8080 , _titEncoding :: !(Maybe Text)

8181 , _titFields :: !(Maybe Text)

82− } deriving (Eq,Show,Data,Typeable,Generic)

82+ }

8383

8484-- | Creates a value of 'TableImportTable'' with the minimum fields required to make a request.

8585--

@@ -105,7 +105,7 @@ data TableImportTable' = TableImportTable'

105105--

106106-- * 'titFields'

107107tableImportTable'

108− :: Body -- ^ 'media'

108+ :: Stream -- ^ 'media'

109109 -> Text -- ^ 'name'

110110 -> TableImportTable'

111111tableImportTable' pTitMedia_ pTitName_ =

@@ -141,7 +141,7 @@ titUserIP :: Lens' TableImportTable' (Maybe Text)

141141titUserIP

142142 = lens _titUserIP (\ s a -> s{_titUserIP = a})

143143

144−titMedia :: Lens' TableImportTable' Body

144+titMedia :: Lens' TableImportTable' Stream

145145titMedia = lens _titMedia (\ s a -> s{_titMedia = a})

146146

147147-- | API key. Your API key identifies your project and provides you with API

gogol-fusiontables/gen/Network/Google/Resource/FusionTables/Table/ReplaceRows.hs+5−5

@@ -70,7 +70,7 @@ type TableReplaceRowsResource =

7070 QueryParam "key" AuthKey :>

7171 QueryParam "oauth_token" OAuthToken :>

7272 QueryParam "alt" AltJSON :>

73− ReqBody '[OctetStream] Body :>

73+ ReqBody '[OctetStream] Stream :>

7474 Post '[JSON] Task

7575

7676-- | Replaces rows of an existing table. Current rows remain visible until

@@ -83,7 +83,7 @@ data TableReplaceRows' = TableReplaceRows'

8383 , _trrUserIP :: !(Maybe Text)

8484 , _trrStartLine :: !(Maybe Int32)

8585 , _trrEndLine :: !(Maybe Int32)

86− , _trrMedia :: !Body

86+ , _trrMedia :: !Stream

8787 , _trrKey :: !(Maybe AuthKey)

8888 , _trrOAuthToken :: !(Maybe OAuthToken)

8989 , _trrTableId :: !Text

@@ -91,7 +91,7 @@ data TableReplaceRows' = TableReplaceRows'

9191 , _trrEncoding :: !(Maybe Text)

9292 , _trrIsStrict :: !(Maybe Bool)

9393 , _trrFields :: !(Maybe Text)

94− } deriving (Eq,Show,Data,Typeable,Generic)

94+ }

9595

9696-- | Creates a value of 'TableReplaceRows'' with the minimum fields required to make a request.

9797--

@@ -123,7 +123,7 @@ data TableReplaceRows' = TableReplaceRows'

123123--

124124-- * 'trrFields'

125125tableReplaceRows'

126− :: Body -- ^ 'media'

126+ :: Stream -- ^ 'media'

127127 -> Text -- ^ 'tableId'

128128 -> TableReplaceRows'

129129tableReplaceRows' pTrrMedia_ pTrrTableId_ =

@@ -176,7 +176,7 @@ trrEndLine :: Lens' TableReplaceRows' (Maybe Int32)

176176trrEndLine

177177 = lens _trrEndLine (\ s a -> s{_trrEndLine = a})

178178

179−trrMedia :: Lens' TableReplaceRows' Body

179+trrMedia :: Lens' TableReplaceRows' Stream

180180trrMedia = lens _trrMedia (\ s a -> s{_trrMedia = a})

181181

182182-- | API key. Your API key identifies your project and provides you with API

gogol-games-configuration/gen/Network/Google/Resource/GamesConfiguration/ImageConfigurations/Upload.hs+5−5

@@ -63,7 +63,7 @@ type ImageConfigurationsUploadResource =

6363 QueryParam "key" AuthKey :>

6464 QueryParam "oauth_token" OAuthToken :>

6565 QueryParam "alt" AltJSON :>

66− ReqBody '[OctetStream] Body :>

66+ ReqBody '[OctetStream] Stream :>

6767 Post '[JSON] ImageConfiguration

6868

6969-- | Uploads an image for a resource with the given ID and image type.

@@ -74,12 +74,12 @@ data ImageConfigurationsUpload' = ImageConfigurationsUpload'

7474 , _icuResourceId :: !Text

7575 , _icuPrettyPrint :: !Bool

7676 , _icuUserIP :: !(Maybe Text)

77− , _icuMedia :: !Body

77+ , _icuMedia :: !Stream

7878 , _icuImageType :: !ImageConfigurationsUploadImageType

7979 , _icuKey :: !(Maybe AuthKey)

8080 , _icuOAuthToken :: !(Maybe OAuthToken)

8181 , _icuFields :: !(Maybe Text)

82− } deriving (Eq,Show,Data,Typeable,Generic)

82+ }

8383

8484-- | Creates a value of 'ImageConfigurationsUpload'' with the minimum fields required to make a request.

8585--

@@ -104,7 +104,7 @@ data ImageConfigurationsUpload' = ImageConfigurationsUpload'

104104-- * 'icuFields'

105105imageConfigurationsUpload'

106106 :: Text -- ^ 'resourceId'

107− -> Body -- ^ 'media'

107+ -> Stream -- ^ 'media'

108108 -> ImageConfigurationsUploadImageType -- ^ 'imageType'

109109 -> ImageConfigurationsUpload'

110110imageConfigurationsUpload' pIcuResourceId_ pIcuMedia_ pIcuImageType_ =

@@ -145,7 +145,7 @@ icuUserIP :: Lens' ImageConfigurationsUpload' (Maybe Text)

145145icuUserIP

146146 = lens _icuUserIP (\ s a -> s{_icuUserIP = a})

147147

148−icuMedia :: Lens' ImageConfigurationsUpload' Body

148+icuMedia :: Lens' ImageConfigurationsUpload' Stream

149149icuMedia = lens _icuMedia (\ s a -> s{_icuMedia = a})

150150

151151-- | Selects which image in a resource for this method.

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Create.hs+5−5

@@ -59,7 +59,7 @@ type UsersDraftsCreateResource =

5959 QueryParam "key" AuthKey :>

6060 QueryParam "oauth_token" OAuthToken :>

6161 QueryParam "alt" AltJSON :>

62− MultipartRelated '[JSON] Draft Body :>

62+ MultipartRelated '[JSON] Draft Stream :>

6363 Post '[JSON] Draft

6464

6565-- | Creates a new draft with the DRAFT label.

@@ -71,11 +71,11 @@ data UsersDraftsCreate' = UsersDraftsCreate'

7171 , _udcUserIP :: !(Maybe Text)

7272 , _udcPayload :: !Draft

7373 , _udcUserId :: !Text

74− , _udcMedia :: !Body

74+ , _udcMedia :: !Stream

7575 , _udcKey :: !(Maybe AuthKey)

7676 , _udcOAuthToken :: !(Maybe OAuthToken)

7777 , _udcFields :: !(Maybe Text)

78− } deriving (Eq,Show,Data,Typeable,Generic)

78+ }

7979

8080-- | Creates a value of 'UsersDraftsCreate'' with the minimum fields required to make a request.

8181--

@@ -101,7 +101,7 @@ data UsersDraftsCreate' = UsersDraftsCreate'

101101usersDraftsCreate'

102102 :: Draft -- ^ 'payload'

103103 -> Text -- ^ 'media'

104− -> Body

104+ -> Stream

105105 -> UsersDraftsCreate'

106106usersDraftsCreate' pUdcPayload_ pUdcUserId_ pUdcMedia_ =

107107 UsersDraftsCreate'

@@ -146,7 +146,7 @@ udcUserId :: Lens' UsersDraftsCreate' Text

146146udcUserId

147147 = lens _udcUserId (\ s a -> s{_udcUserId = a})

148148

149−udcMedia :: Lens' UsersDraftsCreate' Body

149+udcMedia :: Lens' UsersDraftsCreate' Stream

150150udcMedia = lens _udcMedia (\ s a -> s{_udcMedia = a})

151151

152152-- | API key. Your API key identifies your project and provides you with API

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Send.hs+5−5

@@ -61,7 +61,7 @@ type UsersDraftsSendResource =

6161 QueryParam "key" AuthKey :>

6262 QueryParam "oauth_token" OAuthToken :>

6363 QueryParam "alt" AltJSON :>

64− MultipartRelated '[JSON] Draft Body :>

64+ MultipartRelated '[JSON] Draft Stream :>

6565 Post '[JSON] Message

6666

6767-- | Sends the specified, existing draft to the recipients in the To, Cc, and

@@ -74,11 +74,11 @@ data UsersDraftsSend' = UsersDraftsSend'

7474 , _udsUserIP :: !(Maybe Text)

7575 , _udsPayload :: !Draft

7676 , _udsUserId :: !Text

77− , _udsMedia :: !Body

77+ , _udsMedia :: !Stream

7878 , _udsKey :: !(Maybe AuthKey)

7979 , _udsOAuthToken :: !(Maybe OAuthToken)

8080 , _udsFields :: !(Maybe Text)

81− } deriving (Eq,Show,Data,Typeable,Generic)

81+ }

8282

8383-- | Creates a value of 'UsersDraftsSend'' with the minimum fields required to make a request.

8484--

@@ -104,7 +104,7 @@ data UsersDraftsSend' = UsersDraftsSend'

104104usersDraftsSend'

105105 :: Draft -- ^ 'payload'

106106 -> Text -- ^ 'media'

107− -> Body

107+ -> Stream

108108 -> UsersDraftsSend'

109109usersDraftsSend' pUdsPayload_ pUdsUserId_ pUdsMedia_ =

110110 UsersDraftsSend'

@@ -149,7 +149,7 @@ udsUserId :: Lens' UsersDraftsSend' Text

149149udsUserId

150150 = lens _udsUserId (\ s a -> s{_udsUserId = a})

151151

152−udsMedia :: Lens' UsersDraftsSend' Body

152+udsMedia :: Lens' UsersDraftsSend' Stream

153153udsMedia = lens _udsMedia (\ s a -> s{_udsMedia = a})

154154

155155-- | API key. Your API key identifies your project and provides you with API

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Drafts/Update.hs+5−5

@@ -61,7 +61,7 @@ type UsersDraftsUpdateResource =

6161 QueryParam "key" AuthKey :>

6262 QueryParam "oauth_token" OAuthToken :>

6363 QueryParam "alt" AltJSON :>

64− MultipartRelated '[JSON] Draft Body :>

64+ MultipartRelated '[JSON] Draft Stream :>

6565 Put '[JSON] Draft

6666

6767-- | Replaces a draft\'s content.

@@ -73,12 +73,12 @@ data UsersDraftsUpdate' = UsersDraftsUpdate'

7373 , _uduUserIP :: !(Maybe Text)

7474 , _uduPayload :: !Draft

7575 , _uduUserId :: !Text

76− , _uduMedia :: !Body

76+ , _uduMedia :: !Stream

7777 , _uduKey :: !(Maybe AuthKey)

7878 , _uduId :: !Text

7979 , _uduOAuthToken :: !(Maybe OAuthToken)

8080 , _uduFields :: !(Maybe Text)

81− } deriving (Eq,Show,Data,Typeable,Generic)

81+ }

8282

8383-- | Creates a value of 'UsersDraftsUpdate'' with the minimum fields required to make a request.

8484--

@@ -106,7 +106,7 @@ data UsersDraftsUpdate' = UsersDraftsUpdate'

106106usersDraftsUpdate'

107107 :: Draft -- ^ 'payload'

108108 -> Text -- ^ 'media'

109− -> Body -- ^ 'id'

109+ -> Stream -- ^ 'id'

110110 -> Text

111111 -> UsersDraftsUpdate'

112112usersDraftsUpdate' pUduPayload_ pUduUserId_ pUduMedia_ pUduId_ =

@@ -153,7 +153,7 @@ uduUserId :: Lens' UsersDraftsUpdate' Text

153153uduUserId

154154 = lens _uduUserId (\ s a -> s{_uduUserId = a})

155155

156−uduMedia :: Lens' UsersDraftsUpdate' Body

156+uduMedia :: Lens' UsersDraftsUpdate' Stream

157157uduMedia = lens _uduMedia (\ s a -> s{_uduMedia = a})

158158

159159-- | API key. Your API key identifies your project and provides you with API

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Import.hs+5−5

@@ -72,7 +72,7 @@ type UsersMessagesImportResource =

7272 QueryParam "key" AuthKey :>

7373 QueryParam "oauth_token" OAuthToken :>

7474 QueryParam "alt" AltJSON :>

75− MultipartRelated '[JSON] Message Body :>

75+ MultipartRelated '[JSON] Message Stream :>

7676 Post '[JSON] Message

7777

7878-- | Imports a message into only this user\'s mailbox, with standard email

@@ -86,7 +86,7 @@ data UsersMessagesImport' = UsersMessagesImport'

8686 , _uUserIP :: !(Maybe Text)

8787 , _uPayload :: !Message

8888 , _uUserId :: !Text

89− , _uMedia :: !Body

89+ , _uMedia :: !Stream

9090 , _uKey :: !(Maybe AuthKey)

9191 , _uProcessForCalendar :: !Bool

9292 , _uDeleted :: !Bool

@@ -94,7 +94,7 @@ data UsersMessagesImport' = UsersMessagesImport'

9494 , _uOAuthToken :: !(Maybe OAuthToken)

9595 , _uInternalDateSource :: !UsersMessagesImportInternalDateSource

9696 , _uFields :: !(Maybe Text)

97− } deriving (Eq,Show,Data,Typeable,Generic)

97+ }

9898

9999-- | Creates a value of 'UsersMessagesImport'' with the minimum fields required to make a request.

100100--

@@ -128,7 +128,7 @@ data UsersMessagesImport' = UsersMessagesImport'

128128usersMessagesImport'

129129 :: Message -- ^ 'payload'

130130 -> Text -- ^ 'media'

131− -> Body

131+ -> Stream

132132 -> UsersMessagesImport'

133133usersMessagesImport' pUPayload_ pUUserId_ pUMedia_ =

134134 UsersMessagesImport'

@@ -173,7 +173,7 @@ uPayload = lens _uPayload (\ s a -> s{_uPayload = a})

173173uUserId :: Lens' UsersMessagesImport' Text

174174uUserId = lens _uUserId (\ s a -> s{_uUserId = a})

175175

176−uMedia :: Lens' UsersMessagesImport' Body

176+uMedia :: Lens' UsersMessagesImport' Stream

177177uMedia = lens _uMedia (\ s a -> s{_uMedia = a})

178178

179179-- | API key. Your API key identifies your project and provides you with API

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Insert.hs+5−5

@@ -67,7 +67,7 @@ type UsersMessagesInsertResource =

6767 QueryParam "key" AuthKey :>

6868 QueryParam "oauth_token" OAuthToken :>

6969 QueryParam "alt" AltJSON :>

70− MultipartRelated '[JSON] Message Body :>

70+ MultipartRelated '[JSON] Message Stream :>

7171 Post '[JSON] Message

7272

7373-- | Directly inserts a message into only this user\'s mailbox similar to

@@ -81,13 +81,13 @@ data UsersMessagesInsert' = UsersMessagesInsert'

8181 , _umiUserIP :: !(Maybe Text)

8282 , _umiPayload :: !Message

8383 , _umiUserId :: !Text

84− , _umiMedia :: !Body

84+ , _umiMedia :: !Stream

8585 , _umiKey :: !(Maybe AuthKey)

8686 , _umiDeleted :: !Bool

8787 , _umiOAuthToken :: !(Maybe OAuthToken)

8888 , _umiInternalDateSource :: !UsersMessagesInsertInternalDateSource

8989 , _umiFields :: !(Maybe Text)

90− } deriving (Eq,Show,Data,Typeable,Generic)

90+ }

9191

9292-- | Creates a value of 'UsersMessagesInsert'' with the minimum fields required to make a request.

9393--

@@ -117,7 +117,7 @@ data UsersMessagesInsert' = UsersMessagesInsert'

117117usersMessagesInsert'

118118 :: Message -- ^ 'payload'

119119 -> Text -- ^ 'media'

120− -> Body

120+ -> Stream

121121 -> UsersMessagesInsert'

122122usersMessagesInsert' pUmiPayload_ pUmiUserId_ pUmiMedia_ =

123123 UsersMessagesInsert'

@@ -164,7 +164,7 @@ umiUserId :: Lens' UsersMessagesInsert' Text

164164umiUserId

165165 = lens _umiUserId (\ s a -> s{_umiUserId = a})

166166

167−umiMedia :: Lens' UsersMessagesInsert' Body

167+umiMedia :: Lens' UsersMessagesInsert' Stream

168168umiMedia = lens _umiMedia (\ s a -> s{_umiMedia = a})

169169

170170-- | API key. Your API key identifies your project and provides you with API

gogol-gmail/gen/Network/Google/Resource/Gmail/Users/Messages/Send.hs+5−5

@@ -61,7 +61,7 @@ type UsersMessagesSendResource =

6161 QueryParam "key" AuthKey :>

6262 QueryParam "oauth_token" OAuthToken :>

6363 QueryParam "alt" AltJSON :>

64− MultipartRelated '[JSON] Message Body :>

64+ MultipartRelated '[JSON] Message Stream :>

6565 Post '[JSON] Message

6666

6767-- | Sends the specified message to the recipients in the To, Cc, and Bcc

@@ -74,11 +74,11 @@ data UsersMessagesSend' = UsersMessagesSend'

7474 , _umsUserIP :: !(Maybe Text)

7575 , _umsPayload :: !Message

7676 , _umsUserId :: !Text

77− , _umsMedia :: !Body

77+ , _umsMedia :: !Stream

7878 , _umsKey :: !(Maybe AuthKey)

7979 , _umsOAuthToken :: !(Maybe OAuthToken)

8080 , _umsFields :: !(Maybe Text)

81− } deriving (Eq,Show,Data,Typeable,Generic)

81+ }

8282

8383-- | Creates a value of 'UsersMessagesSend'' with the minimum fields required to make a request.

8484--

@@ -104,7 +104,7 @@ data UsersMessagesSend' = UsersMessagesSend'

104104usersMessagesSend'

105105 :: Message -- ^ 'payload'

106106 -> Text -- ^ 'media'

107− -> Body

107+ -> Stream

108108 -> UsersMessagesSend'

109109usersMessagesSend' pUmsPayload_ pUmsUserId_ pUmsMedia_ =

110110 UsersMessagesSend'

@@ -149,7 +149,7 @@ umsUserId :: Lens' UsersMessagesSend' Text

149149umsUserId

150150 = lens _umsUserId (\ s a -> s{_umsUserId = a})

151151

152−umsMedia :: Lens' UsersMessagesSend' Body

152+umsMedia :: Lens' UsersMessagesSend' Stream

153153umsMedia = lens _umsMedia (\ s a -> s{_umsMedia = a})

154154

155155-- | API key. Your API key identifies your project and provides you with API

gogol-groups-migration/gen/Network/Google/Resource/GroupsMigration/Archive/Insert.hs+5−5

@@ -58,7 +58,7 @@ type ArchiveInsertResource =

5858 QueryParam "key" AuthKey :>

5959 QueryParam "oauth_token" OAuthToken :>

6060 QueryParam "alt" AltJSON :>

61− ReqBody '[OctetStream] Body :> Post '[JSON] Groups

61+ ReqBody '[OctetStream] Stream :> Post '[JSON] Groups

6262

6363-- | Inserts a new mail into the archive of the Google group.

6464--

@@ -67,12 +67,12 @@ data ArchiveInsert' = ArchiveInsert'

6767 { _aiQuotaUser :: !(Maybe Text)

6868 , _aiPrettyPrint :: !Bool

6969 , _aiUserIP :: !(Maybe Text)

70− , _aiMedia :: !Body

70+ , _aiMedia :: !Stream

7171 , _aiKey :: !(Maybe AuthKey)

7272 , _aiGroupId :: !Text

7373 , _aiOAuthToken :: !(Maybe OAuthToken)

7474 , _aiFields :: !(Maybe Text)

75− } deriving (Eq,Show,Data,Typeable,Generic)

75+ }

7676

7777-- | Creates a value of 'ArchiveInsert'' with the minimum fields required to make a request.

7878--

@@ -94,7 +94,7 @@ data ArchiveInsert' = ArchiveInsert'

9494--

9595-- * 'aiFields'

9696archiveInsert'

97− :: Body -- ^ 'media'

97+ :: Stream -- ^ 'media'

9898 -> Text -- ^ 'groupId'

9999 -> ArchiveInsert'

100100archiveInsert' pAiMedia_ pAiGroupId_ =

@@ -127,7 +127,7 @@ aiPrettyPrint

127127aiUserIP :: Lens' ArchiveInsert' (Maybe Text)

128128aiUserIP = lens _aiUserIP (\ s a -> s{_aiUserIP = a})

129129

130−aiMedia :: Lens' ArchiveInsert' Body

130+aiMedia :: Lens' ArchiveInsert' Stream

131131aiMedia = lens _aiMedia (\ s a -> s{_aiMedia = a})

132132

133133-- | API key. Your API key identifies your project and provides you with API

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Projects/Icons/Create.hs+5−5

@@ -60,7 +60,7 @@ type ProjectsIconsCreateResource =

6060 QueryParam "key" AuthKey :>

6161 QueryParam "oauth_token" OAuthToken :>

6262 QueryParam "alt" AltJSON :>

63− MultipartRelated '[JSON] Icon Body :>

63+ MultipartRelated '[JSON] Icon Stream :>

6464 Post '[JSON] Icon

6565

6666-- | Create an icon.

@@ -71,12 +71,12 @@ data ProjectsIconsCreate' = ProjectsIconsCreate'

7171 , _picPrettyPrint :: !Bool

7272 , _picUserIP :: !(Maybe Text)

7373 , _picPayload :: !Icon

74− , _picMedia :: !Body

74+ , _picMedia :: !Stream

7575 , _picKey :: !(Maybe AuthKey)

7676 , _picProjectId :: !Text

7777 , _picOAuthToken :: !(Maybe OAuthToken)

7878 , _picFields :: !(Maybe Text)

79− } deriving (Eq,Show,Data,Typeable,Generic)

79+ }

8080

8181-- | Creates a value of 'ProjectsIconsCreate'' with the minimum fields required to make a request.

8282--

@@ -101,7 +101,7 @@ data ProjectsIconsCreate' = ProjectsIconsCreate'

101101-- * 'picFields'

102102projectsIconsCreate'

103103 :: Icon -- ^ 'payload'

104− -> Body -- ^ 'media'

104+ -> Stream -- ^ 'media'

105105 -> Text -- ^ 'projectId'

106106 -> ProjectsIconsCreate'

107107projectsIconsCreate' pPicPayload_ pPicMedia_ pPicProjectId_ =

@@ -141,7 +141,7 @@ picPayload :: Lens' ProjectsIconsCreate' Icon

141141picPayload

142142 = lens _picPayload (\ s a -> s{_picPayload = a})

143143

144−picMedia :: Lens' ProjectsIconsCreate' Body

144+picMedia :: Lens' ProjectsIconsCreate' Stream

145145picMedia = lens _picMedia (\ s a -> s{_picMedia = a})

146146

147147-- | API key. Your API key identifies your project and provides you with API

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Projects/Icons/Get.hs+3−2

@@ -71,7 +71,8 @@ type ProjectsIconsGetResource =

7171 QueryParam "fields" Text :>

7272 QueryParam "key" AuthKey :>

7373 QueryParam "oauth_token" OAuthToken :>

74− QueryParam "alt" AltMedia :> Get '[OctetStream] Body

74+ QueryParam "alt" AltMedia :>

75+ Get '[OctetStream] Stream

7576

7677-- | Return an icon or its associated metadata

7778--

@@ -189,7 +190,7 @@ instance GoogleRequest ProjectsIconsGet' where

189190

190191instance GoogleRequest

191192 (MediaDownload ProjectsIconsGet') where

192− type Rs (MediaDownload ProjectsIconsGet') = Body

193+ type Rs (MediaDownload ProjectsIconsGet') = Stream

193194 request = requestWith mapsEngineRequest

194195 requestWith rq (MediaDownload ProjectsIconsGet'{..})

195196 = go _pigProjectId _pigId _pigQuotaUser

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Rasters/Files/Insert.hs+5−5

@@ -61,7 +61,7 @@ type RastersFilesInsertResource =

6161 QueryParam "key" AuthKey :>

6262 QueryParam "oauth_token" OAuthToken :>

6363 QueryParam "alt" AltJSON :>

64− ReqBody '[OctetStream] Body :> Post '[JSON] ()

64+ ReqBody '[OctetStream] Stream :> Post '[JSON] ()

6565

6666-- | Upload a file to a raster asset.

6767--

@@ -70,13 +70,13 @@ data RastersFilesInsert' = RastersFilesInsert'

7070 { _rfiQuotaUser :: !(Maybe Text)

7171 , _rfiPrettyPrint :: !Bool

7272 , _rfiUserIP :: !(Maybe Text)

73− , _rfiMedia :: !Body

73+ , _rfiMedia :: !Stream

7474 , _rfiKey :: !(Maybe AuthKey)

7575 , _rfiId :: !Text

7676 , _rfiOAuthToken :: !(Maybe OAuthToken)

7777 , _rfiFilename :: !Text

7878 , _rfiFields :: !(Maybe Text)

79− } deriving (Eq,Show,Data,Typeable,Generic)

79+ }

8080

8181-- | Creates a value of 'RastersFilesInsert'' with the minimum fields required to make a request.

8282--

@@ -100,7 +100,7 @@ data RastersFilesInsert' = RastersFilesInsert'

100100--

101101-- * 'rfiFields'

102102rastersFilesInsert'

103− :: Body -- ^ 'media'

103+ :: Stream -- ^ 'media'

104104 -> Text -- ^ 'id'

105105 -> Text -- ^ 'filename'

106106 -> RastersFilesInsert'

@@ -136,7 +136,7 @@ rfiUserIP :: Lens' RastersFilesInsert' (Maybe Text)

136136rfiUserIP

137137 = lens _rfiUserIP (\ s a -> s{_rfiUserIP = a})

138138

139−rfiMedia :: Lens' RastersFilesInsert' Body

139+rfiMedia :: Lens' RastersFilesInsert' Stream

140140rfiMedia = lens _rfiMedia (\ s a -> s{_rfiMedia = a})

141141

142142-- | API key. Your API key identifies your project and provides you with API

gogol-maps-engine/gen/Network/Google/Resource/MapsEngine/Tables/Files/Insert.hs+5−5

@@ -64,7 +64,7 @@ type TablesFilesInsertResource =

6464 QueryParam "key" AuthKey :>

6565 QueryParam "oauth_token" OAuthToken :>

6666 QueryParam "alt" AltJSON :>

67− ReqBody '[OctetStream] Body :> Post '[JSON] ()

67+ ReqBody '[OctetStream] Stream :> Post '[JSON] ()

6868

6969-- | Upload a file to a placeholder table asset. See Table Upload in the

7070-- Developer\'s Guide for more information. Supported file types are listed

@@ -76,13 +76,13 @@ data TablesFilesInsert' = TablesFilesInsert'

7676 { _tfiQuotaUser :: !(Maybe Text)

7777 , _tfiPrettyPrint :: !Bool

7878 , _tfiUserIP :: !(Maybe Text)

79− , _tfiMedia :: !Body

79+ , _tfiMedia :: !Stream

8080 , _tfiKey :: !(Maybe AuthKey)

8181 , _tfiId :: !Text

8282 , _tfiOAuthToken :: !(Maybe OAuthToken)

8383 , _tfiFilename :: !Text

8484 , _tfiFields :: !(Maybe Text)

85− } deriving (Eq,Show,Data,Typeable,Generic)

85+ }

8686

8787-- | Creates a value of 'TablesFilesInsert'' with the minimum fields required to make a request.

8888--

@@ -106,7 +106,7 @@ data TablesFilesInsert' = TablesFilesInsert'

106106--

107107-- * 'tfiFields'

108108tablesFilesInsert'

109− :: Body -- ^ 'media'

109+ :: Stream -- ^ 'media'

110110 -> Text -- ^ 'id'

111111 -> Text -- ^ 'filename'

112112 -> TablesFilesInsert'

@@ -142,7 +142,7 @@ tfiUserIP :: Lens' TablesFilesInsert' (Maybe Text)

142142tfiUserIP

143143 = lens _tfiUserIP (\ s a -> s{_tfiUserIP = a})

144144

145−tfiMedia :: Lens' TablesFilesInsert' Body

145+tfiMedia :: Lens' TablesFilesInsert' Stream

146146tfiMedia = lens _tfiMedia (\ s a -> s{_tfiMedia = a})

147147

148148-- | API key. Your API key identifies your project and provides you with API

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/Get.hs+3−2

@@ -71,7 +71,8 @@ type TimelineAttachmentsGetResource =

7171 QueryParam "fields" Text :>

7272 QueryParam "key" AuthKey :>

7373 QueryParam "oauth_token" OAuthToken :>

74− QueryParam "alt" AltMedia :> Get '[OctetStream] Body

74+ QueryParam "alt" AltMedia :>

75+ Get '[OctetStream] Stream

7576

7677-- | Retrieves an attachment on a timeline item by item ID and attachment ID.

7778--

@@ -192,7 +193,7 @@ instance GoogleRequest TimelineAttachmentsGet' where

192193instance GoogleRequest

193194 (MediaDownload TimelineAttachmentsGet') where

194195 type Rs (MediaDownload TimelineAttachmentsGet') =

195− Body

196+ Stream

196197 request = requestWith mirrorRequest

197198 requestWith rq

198199 (MediaDownload TimelineAttachmentsGet'{..})

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Attachments/Insert.hs+5−5

@@ -59,7 +59,7 @@ type TimelineAttachmentsInsertResource =

5959 QueryParam "key" AuthKey :>

6060 QueryParam "oauth_token" OAuthToken :>

6161 QueryParam "alt" AltJSON :>

62− ReqBody '[OctetStream] Body :>

62+ ReqBody '[OctetStream] Stream :>

6363 Post '[JSON] Attachment

6464

6565-- | Adds a new attachment to a timeline item.

@@ -70,11 +70,11 @@ data TimelineAttachmentsInsert' = TimelineAttachmentsInsert'

7070 , _taiPrettyPrint :: !Bool

7171 , _taiUserIP :: !(Maybe Text)

7272 , _taiItemId :: !Text

73− , _taiMedia :: !Body

73+ , _taiMedia :: !Stream

7474 , _taiKey :: !(Maybe AuthKey)

7575 , _taiOAuthToken :: !(Maybe OAuthToken)

7676 , _taiFields :: !(Maybe Text)

77− } deriving (Eq,Show,Data,Typeable,Generic)

77+ }

7878

7979-- | Creates a value of 'TimelineAttachmentsInsert'' with the minimum fields required to make a request.

8080--

@@ -97,7 +97,7 @@ data TimelineAttachmentsInsert' = TimelineAttachmentsInsert'

9797-- * 'taiFields'

9898timelineAttachmentsInsert'

9999 :: Text -- ^ 'itemId'

100− -> Body -- ^ 'media'

100+ -> Stream -- ^ 'media'

101101 -> TimelineAttachmentsInsert'

102102timelineAttachmentsInsert' pTaiItemId_ pTaiMedia_ =

103103 TimelineAttachmentsInsert'

@@ -135,7 +135,7 @@ taiItemId :: Lens' TimelineAttachmentsInsert' Text

135135taiItemId

136136 = lens _taiItemId (\ s a -> s{_taiItemId = a})

137137

138−taiMedia :: Lens' TimelineAttachmentsInsert' Body

138+taiMedia :: Lens' TimelineAttachmentsInsert' Stream

139139taiMedia = lens _taiMedia (\ s a -> s{_taiMedia = a})

140140

141141-- | API key. Your API key identifies your project and provides you with API

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Insert.hs+5−5

@@ -57,7 +57,7 @@ type TimelineInsertResource =

5757 QueryParam "key" AuthKey :>

5858 QueryParam "oauth_token" OAuthToken :>

5959 QueryParam "alt" AltJSON :>

60− MultipartRelated '[JSON] TimelineItem Body :>

60+ MultipartRelated '[JSON] TimelineItem Stream :>

6161 Post '[JSON] TimelineItem

6262

6363-- | Inserts a new item into the timeline.

@@ -68,11 +68,11 @@ data TimelineInsert' = TimelineInsert'

6868 , _tiPrettyPrint :: !Bool

6969 , _tiUserIP :: !(Maybe Text)

7070 , _tiPayload :: !TimelineItem

71− , _tiMedia :: !Body

71+ , _tiMedia :: !Stream

7272 , _tiKey :: !(Maybe AuthKey)

7373 , _tiOAuthToken :: !(Maybe OAuthToken)

7474 , _tiFields :: !(Maybe Text)

75− } deriving (Eq,Show,Data,Typeable,Generic)

75+ }

7676

7777-- | Creates a value of 'TimelineInsert'' with the minimum fields required to make a request.

7878--

@@ -95,7 +95,7 @@ data TimelineInsert' = TimelineInsert'

9595-- * 'tiFields'

9696timelineInsert'

9797 :: TimelineItem -- ^ 'payload'

98− -> Body -- ^ 'media'

98+ -> Stream -- ^ 'media'

9999 -> TimelineInsert'

100100timelineInsert' pTiPayload_ pTiMedia_ =

101101 TimelineInsert'

@@ -132,7 +132,7 @@ tiPayload :: Lens' TimelineInsert' TimelineItem

132132tiPayload

133133 = lens _tiPayload (\ s a -> s{_tiPayload = a})

134134

135−tiMedia :: Lens' TimelineInsert' Body

135+tiMedia :: Lens' TimelineInsert' Stream

136136tiMedia = lens _tiMedia (\ s a -> s{_tiMedia = a})

137137

138138-- | API key. Your API key identifies your project and provides you with API

gogol-mirror/gen/Network/Google/Resource/Mirror/Timeline/Update.hs+5−5

@@ -59,7 +59,7 @@ type TimelineUpdateResource =

5959 QueryParam "key" AuthKey :>

6060 QueryParam "oauth_token" OAuthToken :>

6161 QueryParam "alt" AltJSON :>

62− MultipartRelated '[JSON] TimelineItem Body :>

62+ MultipartRelated '[JSON] TimelineItem Stream :>

6363 Put '[JSON] TimelineItem

6464

6565-- | Updates a timeline item in place.

@@ -70,12 +70,12 @@ data TimelineUpdate' = TimelineUpdate'

7070 , _tuPrettyPrint :: !Bool

7171 , _tuUserIP :: !(Maybe Text)

7272 , _tuPayload :: !TimelineItem

73− , _tuMedia :: !Body

73+ , _tuMedia :: !Stream

7474 , _tuKey :: !(Maybe AuthKey)

7575 , _tuId :: !Text

7676 , _tuOAuthToken :: !(Maybe OAuthToken)

7777 , _tuFields :: !(Maybe Text)

78− } deriving (Eq,Show,Data,Typeable,Generic)

78+ }

7979

8080-- | Creates a value of 'TimelineUpdate'' with the minimum fields required to make a request.

8181--

@@ -100,7 +100,7 @@ data TimelineUpdate' = TimelineUpdate'

100100-- * 'tuFields'

101101timelineUpdate'

102102 :: TimelineItem -- ^ 'payload'

103− -> Body -- ^ 'media'

103+ -> Stream -- ^ 'media'

104104 -> Text -- ^ 'id'

105105 -> TimelineUpdate'

106106timelineUpdate' pTuPayload_ pTuMedia_ pTuId_ =

@@ -139,7 +139,7 @@ tuPayload :: Lens' TimelineUpdate' TimelineItem

139139tuPayload

140140 = lens _tuPayload (\ s a -> s{_tuPayload = a})

141141

142−tuMedia :: Lens' TimelineUpdate' Body

142+tuMedia :: Lens' TimelineUpdate' Stream

143143tuMedia = lens _tuMedia (\ s a -> s{_tuMedia = a})

144144

145145-- | API key. Your API key identifies your project and provides you with API

gogol-plus-domains/gen/Network/Google/Resource/PlusDomains/Media/Insert.hs+5−5

@@ -65,7 +65,7 @@ type MediaInsertResource =

6565 QueryParam "key" AuthKey :>

6666 QueryParam "oauth_token" OAuthToken :>

6767 QueryParam "alt" AltJSON :>

68− MultipartRelated '[JSON] Media Body :>

68+ MultipartRelated '[JSON] Media Stream :>

6969 Post '[JSON] Media

7070

7171-- | Add a new media item to an album. The current upload size limitations

@@ -81,11 +81,11 @@ data MediaInsert' = MediaInsert'

8181 , _miCollection :: !MediaInsertCollection

8282 , _miPayload :: !Media

8383 , _miUserId :: !Text

84− , _miMedia :: !Body

84+ , _miMedia :: !Stream

8585 , _miKey :: !(Maybe AuthKey)

8686 , _miOAuthToken :: !(Maybe OAuthToken)

8787 , _miFields :: !(Maybe Text)

88− } deriving (Eq,Show,Data,Typeable,Generic)

88+ }

8989

9090-- | Creates a value of 'MediaInsert'' with the minimum fields required to make a request.

9191--

@@ -114,7 +114,7 @@ mediaInsert'

114114 :: MediaInsertCollection -- ^ 'collection'

115115 -> Media -- ^ 'payload'

116116 -> Text -- ^ 'userId'

117− -> Body -- ^ 'media'

117+ -> Stream -- ^ 'media'

118118 -> MediaInsert'

119119mediaInsert' pMiCollection_ pMiPayload_ pMiUserId_ pMiMedia_ =

120120 MediaInsert'

@@ -161,7 +161,7 @@ miPayload

161161miUserId :: Lens' MediaInsert' Text

162162miUserId = lens _miUserId (\ s a -> s{_miUserId = a})

163163

164−miMedia :: Lens' MediaInsert' Body

164+miMedia :: Lens' MediaInsert' Stream

165165miMedia = lens _miMedia (\ s a -> s{_miMedia = a})

166166

167167-- | API key. Your API key identifies your project and provides you with API

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Compose.hs+2−2

@@ -85,7 +85,7 @@ type ObjectsComposeResource =

8585 QueryParam "oauth_token" OAuthToken :>

8686 QueryParam "alt" AltMedia :>

8787 ReqBody '[JSON] ComposeRequest :>

88− Post '[OctetStream] Body

88+ Post '[OctetStream] Stream

8989

9090-- | Concatenates a list of existing objects into a new object in the same

9191-- bucket.

@@ -237,7 +237,7 @@ instance GoogleRequest ObjectsCompose' where

237237

238238instance GoogleRequest

239239 (MediaDownload ObjectsCompose') where

240− type Rs (MediaDownload ObjectsCompose') = Body

240+ type Rs (MediaDownload ObjectsCompose') = Stream

241241 request = requestWith storageRequest

242242 requestWith rq (MediaDownload ObjectsCompose'{..})

243243 = go _oDestinationBucket _oDestinationObject

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Copy.hs+2−2

@@ -147,7 +147,7 @@ type ObjectsCopyResource =

147147 Object

148148 :>

149149 Post '[OctetStream]

150− Body

150+ Stream

151151

152152-- | Copies an object to a destination in the same location. Optionally

153153-- overrides metadata.

@@ -421,7 +421,7 @@ instance GoogleRequest ObjectsCopy' where

421421

422422instance GoogleRequest (MediaDownload ObjectsCopy')

423423 where

424− type Rs (MediaDownload ObjectsCopy') = Body

424+ type Rs (MediaDownload ObjectsCopy') = Stream

425425 request = requestWith storageRequest

426426 requestWith rq (MediaDownload ObjectsCopy'{..})

427427 = go _ocSourceBucket _ocSourceObject

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Get.hs+2−2

@@ -91,7 +91,7 @@ type ObjectsGetResource =

9191 QueryParam "key" AuthKey :>

9292 QueryParam "oauth_token" OAuthToken :>

9393 QueryParam "alt" AltMedia :>

94− Get '[OctetStream] Body

94+ Get '[OctetStream] Stream

9595

9696-- | Retrieves objects or their associated metadata.

9797--

@@ -272,7 +272,7 @@ instance GoogleRequest ObjectsGet' where

272272

273273instance GoogleRequest (MediaDownload ObjectsGet')

274274 where

275− type Rs (MediaDownload ObjectsGet') = Body

275+ type Rs (MediaDownload ObjectsGet') = Stream

276276 request = requestWith storageRequest

277277 requestWith rq (MediaDownload ObjectsGet'{..})

278278 = go _ogBucket _ogObject _ogIfMetagenerationMatch

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Insert.hs+8−8

@@ -72,7 +72,7 @@ type ObjectsInsertResource =

7272 QueryParam "key" AuthKey :>

7373 QueryParam "oauth_token" OAuthToken :>

7474 QueryParam "alt" AltJSON :>

75− MultipartRelated '[JSON] Object Body :>

75+ MultipartRelated '[JSON] Object Stream :>

7676 Post '[JSON] Object

7777 :<|>

7878 "b" :>

@@ -91,8 +91,8 @@ type ObjectsInsertResource =

9191 QueryParam "key" AuthKey :>

9292 QueryParam "oauth_token" OAuthToken :>

9393 QueryParam "alt" AltMedia :>

94− MultipartRelated '[JSON] Object Body :>

95− Post '[OctetStream] Body

94+ MultipartRelated '[JSON] Object Stream :>

95+ Post '[OctetStream] Stream

9696

9797-- | Stores new data blobs and associated metadata.

9898--

@@ -106,14 +106,14 @@ data ObjectsInsert' = ObjectsInsert'

106106 , _oiUserIP :: !(Maybe Text)

107107 , _oiBucket :: !Text

108108 , _oiPayload :: !Object

109− , _oiMedia :: !Body

109+ , _oiMedia :: !Stream

110110 , _oiKey :: !(Maybe AuthKey)

111111 , _oiName :: !(Maybe Text)

112112 , _oiIfMetagenerationNotMatch :: !(Maybe Word64)

113113 , _oiProjection :: !(Maybe ObjectsInsertProjection)

114114 , _oiOAuthToken :: !(Maybe OAuthToken)

115115 , _oiFields :: !(Maybe Text)

116− } deriving (Eq,Show,Data,Typeable,Generic)

116+ }

117117

118118-- | Creates a value of 'ObjectsInsert'' with the minimum fields required to make a request.

119119--

@@ -151,7 +151,7 @@ data ObjectsInsert' = ObjectsInsert'

151151objectsInsert'

152152 :: Text -- ^ 'bucket'

153153 -> Object -- ^ 'payload'

154− -> Body -- ^ 'media'

154+ -> Stream -- ^ 'media'

155155 -> ObjectsInsert'

156156objectsInsert' pOiBucket_ pOiPayload_ pOiMedia_ =

157157 ObjectsInsert'

@@ -221,7 +221,7 @@ oiPayload :: Lens' ObjectsInsert' Object

221221oiPayload

222222 = lens _oiPayload (\ s a -> s{_oiPayload = a})

223223

224−oiMedia :: Lens' ObjectsInsert' Body

224+oiMedia :: Lens' ObjectsInsert' Stream

225225oiMedia = lens _oiMedia (\ s a -> s{_oiMedia = a})

226226

227227-- | API key. Your API key identifies your project and provides you with API

@@ -286,7 +286,7 @@ instance GoogleRequest ObjectsInsert' where

286286

287287instance GoogleRequest (MediaDownload ObjectsInsert')

288288 where

289− type Rs (MediaDownload ObjectsInsert') = Body

289+ type Rs (MediaDownload ObjectsInsert') = Stream

290290 request = requestWith storageRequest

291291 requestWith rq (MediaDownload ObjectsInsert'{..})

292292 = go _oiBucket _oiIfMetagenerationMatch

gogol-storage/gen/Network/Google/Resource/Storage/Objects/Update.hs+2−2

@@ -94,7 +94,7 @@ type ObjectsUpdateResource =

9494 QueryParam "oauth_token" OAuthToken :>

9595 QueryParam "alt" AltMedia :>

9696 ReqBody '[JSON] Object :>

97− Put '[OctetStream] Body

97+ Put '[OctetStream] Stream

9898

9999-- | Updates a data blob\'s associated metadata.

100100--

@@ -287,7 +287,7 @@ instance GoogleRequest ObjectsUpdate' where

287287

288288instance GoogleRequest (MediaDownload ObjectsUpdate')

289289 where

290− type Rs (MediaDownload ObjectsUpdate') = Body

290+ type Rs (MediaDownload ObjectsUpdate') = Stream

291291 request = requestWith storageRequest

292292 requestWith rq (MediaDownload ObjectsUpdate'{..})

293293 = go _ouBucket _ouObject _ouIfMetagenerationMatch

gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Download.hs+2−2

@@ -82,7 +82,7 @@ type CaptionsDownloadResource =

8282 QueryParam "key" AuthKey :>

8383 QueryParam "oauth_token" OAuthToken :>

8484 QueryParam "alt" AltMedia :>

85− Get '[OctetStream] Body

85+ Get '[OctetStream] Stream

8686

8787-- | Downloads a caption track. The caption track is returned in its original

8888-- format unless the request specifies a value for the tfmt parameter and

@@ -252,7 +252,7 @@ instance GoogleRequest CaptionsDownload' where

252252

253253instance GoogleRequest

254254 (MediaDownload CaptionsDownload') where

255− type Rs (MediaDownload CaptionsDownload') = Body

255+ type Rs (MediaDownload CaptionsDownload') = Stream

256256 request = requestWith youTubeRequest

257257 requestWith rq (MediaDownload CaptionsDownload'{..})

258258 = go _capaId _capaOnBehalfOf _capaTlang

gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Insert.hs+5−5

@@ -65,7 +65,7 @@ type CaptionsInsertResource =

6565 QueryParam "key" AuthKey :>

6666 QueryParam "oauth_token" OAuthToken :>

6767 QueryParam "alt" AltJSON :>

68− MultipartRelated '[JSON] Caption Body :>

68+ MultipartRelated '[JSON] Caption Stream :>

6969 Post '[JSON] Caption

7070

7171-- | Uploads a caption track.

@@ -78,13 +78,13 @@ data CaptionsInsert' = CaptionsInsert'

7878 , _ciPrettyPrint :: !Bool

7979 , _ciUserIP :: !(Maybe Text)

8080 , _ciPayload :: !Caption

81− , _ciMedia :: !Body

81+ , _ciMedia :: !Stream

8282 , _ciOnBehalfOfContentOwner :: !(Maybe Text)

8383 , _ciKey :: !(Maybe AuthKey)

8484 , _ciSync :: !(Maybe Bool)

8585 , _ciOAuthToken :: !(Maybe OAuthToken)

8686 , _ciFields :: !(Maybe Text)

87− } deriving (Eq,Show,Data,Typeable,Generic)

87+ }

8888

8989-- | Creates a value of 'CaptionsInsert'' with the minimum fields required to make a request.

9090--

@@ -116,7 +116,7 @@ data CaptionsInsert' = CaptionsInsert'

116116captionsInsert'

117117 :: Text -- ^ 'part'

118118 -> Caption -- ^ 'payload'

119− -> Body -- ^ 'media'

119+ -> Stream -- ^ 'media'

120120 -> CaptionsInsert'

121121captionsInsert' pCiPart_ pCiPayload_ pCiMedia_ =

122122 CaptionsInsert'

@@ -168,7 +168,7 @@ ciPayload :: Lens' CaptionsInsert' Caption

168168ciPayload

169169 = lens _ciPayload (\ s a -> s{_ciPayload = a})

170170

171−ciMedia :: Lens' CaptionsInsert' Body

171+ciMedia :: Lens' CaptionsInsert' Stream

172172ciMedia = lens _ciMedia (\ s a -> s{_ciMedia = a})

173173

174174-- | Note: This parameter is intended exclusively for YouTube content

gogol-youtube/gen/Network/Google/Resource/YouTube/Captions/Update.hs+5−5

@@ -67,7 +67,7 @@ type CaptionsUpdateResource =

6767 QueryParam "key" AuthKey :>

6868 QueryParam "oauth_token" OAuthToken :>

6969 QueryParam "alt" AltJSON :>

70− MultipartRelated '[JSON] Caption Body :>

70+ MultipartRelated '[JSON] Caption Stream :>

7171 Put '[JSON] Caption

7272

7373-- | Updates a caption track. When updating a caption track, you can change

@@ -82,13 +82,13 @@ data CaptionsUpdate' = CaptionsUpdate'

8282 , _capPrettyPrint :: !Bool

8383 , _capUserIP :: !(Maybe Text)

8484 , _capPayload :: !Caption

85− , _capMedia :: !Body

85+ , _capMedia :: !Stream

8686 , _capOnBehalfOfContentOwner :: !(Maybe Text)

8787 , _capKey :: !(Maybe AuthKey)

8888 , _capSync :: !(Maybe Bool)

8989 , _capOAuthToken :: !(Maybe OAuthToken)

9090 , _capFields :: !(Maybe Text)

91− } deriving (Eq,Show,Data,Typeable,Generic)

91+ }

9292

9393-- | Creates a value of 'CaptionsUpdate'' with the minimum fields required to make a request.

9494--

@@ -120,7 +120,7 @@ data CaptionsUpdate' = CaptionsUpdate'

120120captionsUpdate'

121121 :: Text -- ^ 'part'

122122 -> Caption -- ^ 'payload'

123− -> Body -- ^ 'media'

123+ -> Stream -- ^ 'media'

124124 -> CaptionsUpdate'

125125captionsUpdate' pCapPart_ pCapPayload_ pCapMedia_ =

126126 CaptionsUpdate'

@@ -177,7 +177,7 @@ capPayload :: Lens' CaptionsUpdate' Caption

177177capPayload

178178 = lens _capPayload (\ s a -> s{_capPayload = a})

179179

180−capMedia :: Lens' CaptionsUpdate' Body

180+capMedia :: Lens' CaptionsUpdate' Stream

181181capMedia = lens _capMedia (\ s a -> s{_capMedia = a})

182182

183183-- | Note: This parameter is intended exclusively for YouTube content

gogol-youtube/gen/Network/Google/Resource/YouTube/ChannelBanners/Insert.hs+5−5

@@ -68,7 +68,7 @@ type ChannelBannersInsertResource =

6868 QueryParam "key" AuthKey :>

6969 QueryParam "oauth_token" OAuthToken :>

7070 QueryParam "alt" AltJSON :>

71− MultipartRelated '[JSON] ChannelBannerResource Body

71+ MultipartRelated '[JSON] ChannelBannerResource Stream

7272 :> Post '[JSON] ChannelBannerResource

7373

7474-- | Uploads a channel banner image to YouTube. This method represents the

@@ -87,12 +87,12 @@ data ChannelBannersInsert' = ChannelBannersInsert'

8787 , _cbiPrettyPrint :: !Bool

8888 , _cbiUserIP :: !(Maybe Text)

8989 , _cbiPayload :: !ChannelBannerResource

90− , _cbiMedia :: !Body

90+ , _cbiMedia :: !Stream

9191 , _cbiOnBehalfOfContentOwner :: !(Maybe Text)

9292 , _cbiKey :: !(Maybe AuthKey)

9393 , _cbiOAuthToken :: !(Maybe OAuthToken)

9494 , _cbiFields :: !(Maybe Text)

95− } deriving (Eq,Show,Data,Typeable,Generic)

95+ }

9696

9797-- | Creates a value of 'ChannelBannersInsert'' with the minimum fields required to make a request.

9898--

@@ -117,7 +117,7 @@ data ChannelBannersInsert' = ChannelBannersInsert'

117117-- * 'cbiFields'

118118channelBannersInsert'

119119 :: ChannelBannerResource -- ^ 'payload'

120− -> Body -- ^ 'media'

120+ -> Stream -- ^ 'media'

121121 -> ChannelBannersInsert'

122122channelBannersInsert' pCbiPayload_ pCbiMedia_ =

123123 ChannelBannersInsert'

@@ -156,7 +156,7 @@ cbiPayload :: Lens' ChannelBannersInsert' ChannelBannerResource

156156cbiPayload

157157 = lens _cbiPayload (\ s a -> s{_cbiPayload = a})

158158

159−cbiMedia :: Lens' ChannelBannersInsert' Body

159+cbiMedia :: Lens' ChannelBannersInsert' Stream

160160cbiMedia = lens _cbiMedia (\ s a -> s{_cbiMedia = a})

161161

162162-- | Note: This parameter is intended exclusively for YouTube content

gogol-youtube/gen/Network/Google/Resource/YouTube/Thumbnails/Set.hs+5−5

@@ -61,7 +61,7 @@ type ThumbnailsSetResource =

6161 QueryParam "key" AuthKey :>

6262 QueryParam "oauth_token" OAuthToken :>

6363 QueryParam "alt" AltJSON :>

64− ReqBody '[OctetStream] Body :>

64+ ReqBody '[OctetStream] Stream :>

6565 Post '[JSON] ThumbnailSetResponse

6666

6767-- | Uploads a custom video thumbnail to YouTube and sets it for a video.

@@ -71,13 +71,13 @@ data ThumbnailsSet' = ThumbnailsSet'

7171 { _tsQuotaUser :: !(Maybe Text)

7272 , _tsPrettyPrint :: !Bool

7373 , _tsUserIP :: !(Maybe Text)

74− , _tsMedia :: !Body

74+ , _tsMedia :: !Stream

7575 , _tsOnBehalfOfContentOwner :: !(Maybe Text)

7676 , _tsVideoId :: !Text

7777 , _tsKey :: !(Maybe AuthKey)

7878 , _tsOAuthToken :: !(Maybe OAuthToken)

7979 , _tsFields :: !(Maybe Text)

80− } deriving (Eq,Show,Data,Typeable,Generic)

80+ }

8181

8282-- | Creates a value of 'ThumbnailsSet'' with the minimum fields required to make a request.

8383--

@@ -101,7 +101,7 @@ data ThumbnailsSet' = ThumbnailsSet'

101101--

102102-- * 'tsFields'

103103thumbnailsSet'

104− :: Body -- ^ 'media'

104+ :: Stream -- ^ 'media'

105105 -> Text -- ^ 'videoId'

106106 -> ThumbnailsSet'

107107thumbnailsSet' pTsMedia_ pTsVideoId_ =

@@ -135,7 +135,7 @@ tsPrettyPrint

135135tsUserIP :: Lens' ThumbnailsSet' (Maybe Text)

136136tsUserIP = lens _tsUserIP (\ s a -> s{_tsUserIP = a})

137137

138−tsMedia :: Lens' ThumbnailsSet' Body

138+tsMedia :: Lens' ThumbnailsSet' Stream

139139tsMedia = lens _tsMedia (\ s a -> s{_tsMedia = a})

140140

141141-- | Note: This parameter is intended exclusively for YouTube content

gogol-youtube/gen/Network/Google/Resource/YouTube/Videos/Insert.hs+5−5

@@ -69,7 +69,7 @@ type VideosInsertResource =

6969 QueryParam "key" AuthKey :>

7070 QueryParam "oauth_token" OAuthToken :>

7171 QueryParam "alt" AltJSON :>

72− MultipartRelated '[JSON] Video Body :>

72+ MultipartRelated '[JSON] Video Stream :>

7373 Post '[JSON] Video

7474

7575-- | Uploads a video to YouTube and optionally sets the video\'s metadata.

@@ -82,7 +82,7 @@ data VideosInsert' = VideosInsert'

8282 , _viStabilize :: !(Maybe Bool)

8383 , _viUserIP :: !(Maybe Text)

8484 , _viPayload :: !Video

85− , _viMedia :: !Body

85+ , _viMedia :: !Stream

8686 , _viOnBehalfOfContentOwner :: !(Maybe Text)

8787 , _viKey :: !(Maybe AuthKey)

8888 , _viOnBehalfOfContentOwnerChannel :: !(Maybe Text)

@@ -90,7 +90,7 @@ data VideosInsert' = VideosInsert'

9090 , _viAutoLevels :: !(Maybe Bool)

9191 , _viOAuthToken :: !(Maybe OAuthToken)

9292 , _viFields :: !(Maybe Text)

93− } deriving (Eq,Show,Data,Typeable,Generic)

93+ }

9494

9595-- | Creates a value of 'VideosInsert'' with the minimum fields required to make a request.

9696--

@@ -126,7 +126,7 @@ data VideosInsert' = VideosInsert'

126126videosInsert'

127127 :: Text -- ^ 'part'

128128 -> Video -- ^ 'payload'

129− -> Body -- ^ 'media'

129+ -> Stream -- ^ 'media'

130130 -> VideosInsert'

131131videosInsert' pViPart_ pViPayload_ pViMedia_ =

132132 VideosInsert'

@@ -186,7 +186,7 @@ viPayload :: Lens' VideosInsert' Video

186186viPayload

187187 = lens _viPayload (\ s a -> s{_viPayload = a})

188188

189−viMedia :: Lens' VideosInsert' Body

189+viMedia :: Lens' VideosInsert' Stream

190190viMedia = lens _viMedia (\ s a -> s{_viMedia = a})

191191

192192-- | Note: This parameter is intended exclusively for YouTube content

gogol-youtube/gen/Network/Google/Resource/YouTube/Watermarks/Set.hs+5−5

@@ -62,7 +62,7 @@ type WatermarksSetResource =

6262 QueryParam "key" AuthKey :>

6363 QueryParam "oauth_token" OAuthToken :>

6464 QueryParam "alt" AltJSON :>

65− MultipartRelated '[JSON] InvideoBranding Body :>

65+ MultipartRelated '[JSON] InvideoBranding Stream :>

6666 Post '[JSON] ()

6767

6868-- | Uploads a watermark image to YouTube and sets it for a channel.

@@ -74,12 +74,12 @@ data WatermarksSet' = WatermarksSet'

7474 , _wsUserIP :: !(Maybe Text)

7575 , _wsChannelId :: !Text

7676 , _wsPayload :: !InvideoBranding

77− , _wsMedia :: !Body

77+ , _wsMedia :: !Stream

7878 , _wsOnBehalfOfContentOwner :: !(Maybe Text)

7979 , _wsKey :: !(Maybe AuthKey)

8080 , _wsOAuthToken :: !(Maybe OAuthToken)

8181 , _wsFields :: !(Maybe Text)

82− } deriving (Eq,Show,Data,Typeable,Generic)

82+ }

8383

8484-- | Creates a value of 'WatermarksSet'' with the minimum fields required to make a request.

8585--

@@ -107,7 +107,7 @@ data WatermarksSet' = WatermarksSet'

107107watermarksSet'

108108 :: Text -- ^ 'channelId'

109109 -> InvideoBranding -- ^ 'payload'

110− -> Body -- ^ 'media'

110+ -> Stream -- ^ 'media'

111111 -> WatermarksSet'

112112watermarksSet' pWsChannelId_ pWsPayload_ pWsMedia_ =

113113 WatermarksSet'

@@ -152,7 +152,7 @@ wsPayload :: Lens' WatermarksSet' InvideoBranding

152152wsPayload

153153 = lens _wsPayload (\ s a -> s{_wsPayload = a})

154154

155−wsMedia :: Lens' WatermarksSet' Body

155+wsMedia :: Lens' WatermarksSet' Stream

156156wsMedia = lens _wsMedia (\ s a -> s{_wsMedia = a})

157157

158158-- | Note: This parameter is intended exclusively for YouTube content