amazonka-cognito-sync 0.0.0 → 0.0.1
raw patch · 3 files changed
+24/−16 lines, 3 filesdep ~amazonka-corePVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: amazonka-core
API changes (from Hackage documentation)
- Network.AWS.CognitoSync.RegisterDevice: instance Ord RegisterDevice
- Network.AWS.CognitoSync.Types: data RESTError :: *
- Network.AWS.CognitoSync.Types: instance Ord RecordPatch
+ Network.AWS.CognitoSync.Types: data JSONError :: *
+ Network.AWS.CognitoSync.Types: instance ToByteString Operation
+ Network.AWS.CognitoSync.Types: instance ToByteString Platform
+ Network.AWS.CognitoSync.Types: instance ToHeader Operation
+ Network.AWS.CognitoSync.Types: instance ToHeader Platform
+ Network.AWS.CognitoSync.Types: instance ToQuery Operation
+ Network.AWS.CognitoSync.Types: instance ToQuery Platform
- Network.AWS.CognitoSync.RegisterDevice: rdPlatform :: Lens' RegisterDevice Text
+ Network.AWS.CognitoSync.RegisterDevice: rdPlatform :: Lens' RegisterDevice Platform
- Network.AWS.CognitoSync.RegisterDevice: registerDevice :: Text -> Text -> Text -> Text -> RegisterDevice
+ Network.AWS.CognitoSync.RegisterDevice: registerDevice :: Text -> Text -> Platform -> Text -> RegisterDevice
- Network.AWS.CognitoSync.Types: recordPatch :: Text -> Text -> Integer -> RecordPatch
+ Network.AWS.CognitoSync.Types: recordPatch :: Operation -> Text -> Integer -> RecordPatch
- Network.AWS.CognitoSync.Types: rpOp :: Lens' RecordPatch Text
+ Network.AWS.CognitoSync.Types: rpOp :: Lens' RecordPatch Operation
Files
- amazonka-cognito-sync.cabal +3/−3
- gen/Network/AWS/CognitoSync/RegisterDevice.hs +5/−5
- gen/Network/AWS/CognitoSync/Types.hs +16/−8
amazonka-cognito-sync.cabal view
@@ -1,5 +1,5 @@ name: amazonka-cognito-sync-version: 0.0.0+version: 0.0.1 synopsis: Amazon Cognito Sync SDK. homepage: https://github.com/brendanhay/amazonka license: OtherLicense@@ -58,5 +58,5 @@ other-modules: build-depends:- amazonka-core- , base >= 4.7 && < 5+ amazonka-core == 0.0.1.*+ , base >= 4.7 && < 5
gen/Network/AWS/CognitoSync/RegisterDevice.hs view
@@ -51,9 +51,9 @@ data RegisterDevice = RegisterDevice { _rdIdentityId :: Text , _rdIdentityPoolId :: Text- , _rdPlatform :: Text+ , _rdPlatform :: Platform , _rdToken :: Text- } deriving (Eq, Ord, Show)+ } deriving (Eq, Show) -- | 'RegisterDevice' constructor. --@@ -63,13 +63,13 @@ -- -- * 'rdIdentityPoolId' @::@ 'Text' ----- * 'rdPlatform' @::@ 'Text'+-- * 'rdPlatform' @::@ 'Platform' -- -- * 'rdToken' @::@ 'Text' -- registerDevice :: Text -- ^ 'rdIdentityPoolId' -> Text -- ^ 'rdIdentityId'- -> Text -- ^ 'rdPlatform'+ -> Platform -- ^ 'rdPlatform' -> Text -- ^ 'rdToken' -> RegisterDevice registerDevice p1 p2 p3 p4 = RegisterDevice@@ -90,7 +90,7 @@ rdIdentityPoolId = lens _rdIdentityPoolId (\s a -> s { _rdIdentityPoolId = a }) -- | The SNS platform type (e.g. GCM, SDM, APNS, APNS_SANDBOX).-rdPlatform :: Lens' RegisterDevice Text+rdPlatform :: Lens' RegisterDevice Platform rdPlatform = lens _rdPlatform (\s a -> s { _rdPlatform = a }) -- | The push token.
gen/Network/AWS/CognitoSync/Types.hs view
@@ -25,7 +25,7 @@ -- * Service CognitoSync -- ** Error- , RESTError+ , JSONError -- * IdentityPoolUsage , IdentityPoolUsage@@ -98,7 +98,7 @@ instance AWSService CognitoSync where type Sg CognitoSync = V4- type Er CognitoSync = RESTError+ type Er CognitoSync = JSONError service = Service { _svcEndpoint = regional@@ -109,7 +109,7 @@ , _svcJSONVersion = Just "1.1" } - handle = restError statusSuccess+ handle = jsonError statusSuccess data IdentityPoolUsage = IdentityPoolUsage { _ipuDataStorage :: Maybe Integer@@ -197,6 +197,10 @@ ApnsSandbox -> "APNS_SANDBOX" Gcm -> "GCM" +instance ToByteString Platform+instance ToHeader Platform+instance ToQuery Platform+ instance FromJSON Platform where parseJSON = parseJSONText "Platform" @@ -312,6 +316,10 @@ Remove -> "remove" Replace -> "replace" +instance ToByteString Operation+instance ToHeader Operation+instance ToQuery Operation+ instance FromJSON Operation where parseJSON = parseJSONText "Operation" @@ -477,10 +485,10 @@ data RecordPatch = RecordPatch { _rpDeviceLastModifiedDate :: Maybe RFC822 , _rpKey :: Text- , _rpOp :: Text+ , _rpOp :: Operation , _rpSyncCount :: Integer , _rpValue :: Maybe Text- } deriving (Eq, Ord, Show)+ } deriving (Eq, Show) -- | 'RecordPatch' constructor. --@@ -490,13 +498,13 @@ -- -- * 'rpKey' @::@ 'Text' ----- * 'rpOp' @::@ 'Text'+-- * 'rpOp' @::@ 'Operation' -- -- * 'rpSyncCount' @::@ 'Integer' -- -- * 'rpValue' @::@ 'Maybe' 'Text' ---recordPatch :: Text -- ^ 'rpOp'+recordPatch :: Operation -- ^ 'rpOp' -> Text -- ^ 'rpKey' -> Integer -- ^ 'rpSyncCount' -> RecordPatch@@ -520,7 +528,7 @@ rpKey = lens _rpKey (\s a -> s { _rpKey = a }) -- | An operation, either replace or remove.-rpOp :: Lens' RecordPatch Text+rpOp :: Lens' RecordPatch Operation rpOp = lens _rpOp (\s a -> s { _rpOp = a }) -- | Last known server sync count for this record. Set to 0 if unknown.