amazonka-cloudsearch-domains 0.2.3 → 0.3.0

raw patch · 2 files changed

+10/−12 lines, 2 filesdep ~amazonka-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

• amazonka-cloudsearch-domains.cabal +2/−2
• gen/Network/AWS/CloudSearchDomains/UploadDocuments.hs +8/−10

@@ -1,5 +1,5 @@ name:                  amazonka-cloudsearch-domains-version:               0.2.3+version:               0.3.0 synopsis:              Amazon CloudSearch Domain SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -41,5 +41,5 @@     other-modules:      build-depends:-          amazonka-core == 0.2.3.*+          amazonka-core == 0.3.0.*         , base          >= 4.7     && < 5

@@ -71,8 +71,8 @@  data UploadDocuments = UploadDocuments     { _udContentType :: ContentType-    , _udDocuments   :: Base64-    } deriving (Eq, Read, Show)+    , _udDocuments   :: RqBody+    } deriving (Show)  -- | 'UploadDocuments' constructor. --@@ -80,9 +80,9 @@ -- -- * 'udContentType' @::@ 'ContentType' ----- * 'udDocuments' @::@ 'Base64'+-- * 'udDocuments' @::@ 'RqBody' ---uploadDocuments :: Base64 -- ^ 'udDocuments'+uploadDocuments :: RqBody -- ^ 'udDocuments'                 -> ContentType -- ^ 'udContentType'                 -> UploadDocuments uploadDocuments p1 p2 = UploadDocuments@@ -98,7 +98,7 @@ udContentType = lens _udContentType (\s a -> s { _udContentType = a })  -- | A batch of documents formatted in JSON or HTML.-udDocuments :: Lens' UploadDocuments Base64+udDocuments :: Lens' UploadDocuments RqBody udDocuments = lens _udDocuments (\s a -> s { _udDocuments = a })  data UploadDocumentsResponse = UploadDocumentsResponse@@ -156,16 +156,14 @@         [ "Content-Type" =: _udContentType         ] -instance ToJSON UploadDocuments where-    toJSON UploadDocuments{..} = object-        [ "documents" .= _udDocuments-        ]+instance ToBody UploadDocuments where+    toBody = toBody . _udDocuments  instance AWSRequest UploadDocuments where     type Sv UploadDocuments = CloudSearchDomains     type Rs UploadDocuments = UploadDocumentsResponse -    request  = post+    request  = stream POST     response = jsonResponse  instance FromJSON UploadDocumentsResponse where