gogol-appstate 0.0.1 → 0.1.0

raw patch · 11 files changed

+64/−50 lines, 11 filesdep ~gogol-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: gogol-core

API changes (from Hackage documentation)

Files

• README.md +3/−3
• gen/Network/Google/AppState.hs +4/−1
• gen/Network/Google/AppState/Types.hs +6/−5
• gen/Network/Google/AppState/Types/Product.hs +17/−17
• gen/Network/Google/AppState/Types/Sum.hs +1/−1
• gen/Network/Google/Resource/AppState/States/Clear.hs +6/−4
• gen/Network/Google/Resource/AppState/States/Delete.hs +6/−4
• gen/Network/Google/Resource/AppState/States/Get.hs +6/−4
• gen/Network/Google/Resource/AppState/States/List.hs +6/−4
• gen/Network/Google/Resource/AppState/States/Update.hs +6/−4
• gogol-appstate.cabal +3/−3

@@ -8,7 +8,7 @@  ## Version -`0.0.1`+`0.1.0`   ## Description@@ -18,9 +18,9 @@  ## Contribute -For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/amazonka/issues).+For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/gogol/issues). -> _Note:_ this library is an auto-generated Haskell package. Please see `amazonka-gen` for more information.+> _Note:_ this library is an auto-generated Haskell package. Please see `gogol-gen` for more information.   ## Licence

@@ -7,7 +7,7 @@  -- | -- Module      : Network.Google.AppState--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -20,6 +20,9 @@     (     -- * Service Configuration       appStateService++    -- * OAuth Scopes+    , appStateScope      -- * API Declaration     , AppStateAPI

@@ -1,3 +1,4 @@+{-# LANGUAGE DataKinds          #-} {-# LANGUAGE DeriveDataTypeable #-} {-# LANGUAGE DeriveGeneric      #-} {-# LANGUAGE NoImplicitPrelude  #-}@@ -7,7 +8,7 @@  -- | -- Module      : Network.Google.AppState.Types--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -19,7 +20,7 @@       appStateService      -- * OAuth Scopes-    , appstateScope+    , appStateScope      -- * WriteResult     , WriteResult@@ -55,11 +56,11 @@ import           Network.Google.Prelude  -- | Default request referring to version 'v1' of the Google App State API. This contains the host and root path used as a starting point for constructing service requests.-appStateService :: Service+appStateService :: ServiceConfig appStateService   = defaultService (ServiceId "appstate:v1")       "www.googleapis.com"  -- | View and manage your data for this application-appstateScope :: OAuthScope-appstateScope = "https://www.googleapis.com/auth/appstate";+appStateScope :: Proxy '["https://www.googleapis.com/auth/appstate"]+appStateScope = Proxy;

@@ -9,7 +9,7 @@  -- | -- Module      : Network.Google.AppState.Types.Product--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -23,7 +23,7 @@ -- | This is a JSON template for an app state write result. -- -- /See:/ 'writeResult' smart constructor.-data WriteResult = WriteResult+data WriteResult = WriteResult'     { _wrCurrentStateVersion :: !(Maybe Text)     , _wrKind                :: !Text     , _wrStateKey            :: !(Maybe (Textual Int32))@@ -41,7 +41,7 @@ writeResult     :: WriteResult writeResult =-    WriteResult+    WriteResult'     { _wrCurrentStateVersion = Nothing     , _wrKind = "appstate#writeResult"     , _wrStateKey = Nothing@@ -68,13 +68,13 @@         parseJSON           = withObject "WriteResult"               (\ o ->-                 WriteResult <$>+                 WriteResult' <$>                    (o .:? "currentStateVersion") <*>                      (o .:? "kind" .!= "appstate#writeResult")                      <*> (o .:? "stateKey"))  instance ToJSON WriteResult where-        toJSON WriteResult{..}+        toJSON WriteResult'{..}           = object               (catMaybes                  [("currentStateVersion" .=) <$>@@ -85,7 +85,7 @@ -- | This is a JSON template to convert a list-response for app state. -- -- /See:/ 'listResponse' smart constructor.-data ListResponse = ListResponse+data ListResponse = ListResponse'     { _lrMaximumKeyCount :: !(Maybe (Textual Int32))     , _lrKind            :: !Text     , _lrItems           :: !(Maybe [GetResponse])@@ -103,7 +103,7 @@ listResponse     :: ListResponse listResponse =-    ListResponse+    ListResponse'     { _lrMaximumKeyCount = Nothing     , _lrKind = "appstate#listResponse"     , _lrItems = Nothing@@ -131,13 +131,13 @@         parseJSON           = withObject "ListResponse"               (\ o ->-                 ListResponse <$>+                 ListResponse' <$>                    (o .:? "maximumKeyCount") <*>                      (o .:? "kind" .!= "appstate#listResponse")                      <*> (o .:? "items" .!= mempty))  instance ToJSON ListResponse where-        toJSON ListResponse{..}+        toJSON ListResponse'{..}           = object               (catMaybes                  [("maximumKeyCount" .=) <$> _lrMaximumKeyCount,@@ -146,7 +146,7 @@ -- | This is a JSON template for an app state resource. -- -- /See:/ 'getResponse' smart constructor.-data GetResponse = GetResponse+data GetResponse = GetResponse'     { _grCurrentStateVersion :: !(Maybe Text)     , _grKind                :: !Text     , _grData                :: !(Maybe Text)@@ -167,7 +167,7 @@ getResponse     :: GetResponse getResponse =-    GetResponse+    GetResponse'     { _grCurrentStateVersion = Nothing     , _grKind = "appstate#getResponse"     , _grData = Nothing@@ -199,14 +199,14 @@         parseJSON           = withObject "GetResponse"               (\ o ->-                 GetResponse <$>+                 GetResponse' <$>                    (o .:? "currentStateVersion") <*>                      (o .:? "kind" .!= "appstate#getResponse")                      <*> (o .:? "data")                      <*> (o .:? "stateKey"))  instance ToJSON GetResponse where-        toJSON GetResponse{..}+        toJSON GetResponse'{..}           = object               (catMaybes                  [("currentStateVersion" .=) <$>@@ -217,7 +217,7 @@ -- | This is a JSON template for a requests which update app state -- -- /See:/ 'updateRequest' smart constructor.-data UpdateRequest = UpdateRequest+data UpdateRequest = UpdateRequest'     { _urKind :: !Text     , _urData :: !(Maybe Text)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -232,7 +232,7 @@ updateRequest     :: UpdateRequest updateRequest =-    UpdateRequest+    UpdateRequest'     { _urKind = "appstate#updateRequest"     , _urData = Nothing     }@@ -250,12 +250,12 @@         parseJSON           = withObject "UpdateRequest"               (\ o ->-                 UpdateRequest <$>+                 UpdateRequest' <$>                    (o .:? "kind" .!= "appstate#updateRequest") <*>                      (o .:? "data"))  instance ToJSON UpdateRequest where-        toJSON UpdateRequest{..}+        toJSON UpdateRequest'{..}           = object               (catMaybes                  [Just ("kind" .= _urKind), ("data" .=) <$> _urData])

@@ -8,7 +8,7 @@  -- | -- Module      : Network.Google.AppState.Types.Sum--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated

@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.AppState.States.Clear--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -58,7 +58,7 @@ -- in a conflict error on version mismatch. -- -- /See:/ 'statesClear' smart constructor.-data StatesClear = StatesClear+data StatesClear = StatesClear'     { _scStateKey           :: !(Textual Int32)     , _scCurrentDataVersion :: !(Maybe Text)     } deriving (Eq,Show,Data,Typeable,Generic)@@ -74,7 +74,7 @@     :: Int32 -- ^ 'scStateKey'     -> StatesClear statesClear pScStateKey_ =-    StatesClear+    StatesClear'     { _scStateKey = _Coerce # pScStateKey_     , _scCurrentDataVersion = Nothing     }@@ -94,7 +94,9 @@  instance GoogleRequest StatesClear where         type Rs StatesClear = WriteResult-        requestClient StatesClear{..}+        type Scopes StatesClear =+             '["https://www.googleapis.com/auth/appstate"]+        requestClient StatesClear'{..}           = go _scStateKey _scCurrentDataVersion (Just AltJSON)               appStateService           where go

@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.AppState.States.Delete--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -59,7 +59,7 @@ -- can result in data loss and data corruption. -- -- /See:/ 'statesDelete' smart constructor.-newtype StatesDelete = StatesDelete+newtype StatesDelete = StatesDelete'     { _sdStateKey :: Textual Int32     } deriving (Eq,Show,Data,Typeable,Generic) @@ -72,7 +72,7 @@     :: Int32 -- ^ 'sdStateKey'     -> StatesDelete statesDelete pSdStateKey_ =-    StatesDelete+    StatesDelete'     { _sdStateKey = _Coerce # pSdStateKey_     } @@ -84,7 +84,9 @@  instance GoogleRequest StatesDelete where         type Rs StatesDelete = ()-        requestClient StatesDelete{..}+        type Scopes StatesDelete =+             '["https://www.googleapis.com/auth/appstate"]+        requestClient StatesDelete'{..}           = go _sdStateKey (Just AltJSON) appStateService           where go                   = buildClient (Proxy :: Proxy StatesDeleteResource)

@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.AppState.States.Get--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -53,7 +53,7 @@ -- exist on the server, an HTTP 404 will be returned. -- -- /See:/ 'statesGet' smart constructor.-newtype StatesGet = StatesGet+newtype StatesGet = StatesGet'     { _sgStateKey :: Textual Int32     } deriving (Eq,Show,Data,Typeable,Generic) @@ -66,7 +66,7 @@     :: Int32 -- ^ 'sgStateKey'     -> StatesGet statesGet pSgStateKey_ =-    StatesGet+    StatesGet'     { _sgStateKey = _Coerce # pSgStateKey_     } @@ -78,7 +78,9 @@  instance GoogleRequest StatesGet where         type Rs StatesGet = GetResponse-        requestClient StatesGet{..}+        type Scopes StatesGet =+             '["https://www.googleapis.com/auth/appstate"]+        requestClient StatesGet'{..}           = go _sgStateKey (Just AltJSON) appStateService           where go                   = buildClient (Proxy :: Proxy StatesGetResource)

@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.AppState.States.List--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -51,7 +51,7 @@ -- | Lists all the states keys, and optionally the state data. -- -- /See:/ 'statesList' smart constructor.-newtype StatesList = StatesList+newtype StatesList = StatesList'     { _slIncludeData :: Bool     } deriving (Eq,Show,Data,Typeable,Generic) @@ -63,7 +63,7 @@ statesList     :: StatesList statesList =-    StatesList+    StatesList'     { _slIncludeData = False     } @@ -75,7 +75,9 @@  instance GoogleRequest StatesList where         type Rs StatesList = ListResponse-        requestClient StatesList{..}+        type Scopes StatesList =+             '["https://www.googleapis.com/auth/appstate"]+        requestClient StatesList'{..}           = go (Just _slIncludeData) (Just AltJSON)               appStateService           where go

@@ -14,7 +14,7 @@  -- | -- Module      : Network.Google.Resource.AppState.States.Update--- Copyright   : (c) 2015 Brendan Hay+-- Copyright   : (c) 2015-2016 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : auto-generated@@ -60,7 +60,7 @@ -- face of concurrent writes. Maximum per-key size is 128KB. -- -- /See:/ 'statesUpdate' smart constructor.-data StatesUpdate = StatesUpdate+data StatesUpdate = StatesUpdate'     { _suCurrentStateVersion :: !(Maybe Text)     , _suStateKey            :: !(Textual Int32)     , _suPayload             :: !UpdateRequest@@ -80,7 +80,7 @@     -> UpdateRequest -- ^ 'suPayload'     -> StatesUpdate statesUpdate pSuStateKey_ pSuPayload_ =-    StatesUpdate+    StatesUpdate'     { _suCurrentStateVersion = Nothing     , _suStateKey = _Coerce # pSuStateKey_     , _suPayload = pSuPayload_@@ -108,7 +108,9 @@  instance GoogleRequest StatesUpdate where         type Rs StatesUpdate = WriteResult-        requestClient StatesUpdate{..}+        type Scopes StatesUpdate =+             '["https://www.googleapis.com/auth/appstate"]+        requestClient StatesUpdate'{..}           = go _suStateKey _suCurrentStateVersion               (Just AltJSON)               _suPayload

@@ -1,5 +1,5 @@ name:                  gogol-appstate-version:               0.0.1+version:               0.1.0 synopsis:              Google App State SDK. homepage:              https://github.com/brendanhay/gogol bug-reports:           https://github.com/brendanhay/gogol/issues@@ -7,7 +7,7 @@ license-file:          LICENSE author:                Brendan Hay maintainer:            Brendan Hay <brendan.g.hay@gmail.com>-copyright:             Copyright (c) 2015 Brendan Hay+copyright:             Copyright (c) 2015-2016 Brendan Hay category:              Network, Google, Cloud build-type:            Simple cabal-version:         >= 1.10@@ -46,5 +46,5 @@         , Network.Google.AppState.Types.Sum      build-depends:-          gogol-core == 0.0.1.*+          gogol-core == 0.1.0.*         , base       >= 4.7 && < 5