gogol-appstate 0.4.0 → 0.5.0

raw patch · 9 files changed

+68/−46 lines, 9 filesdep ~gogol-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: gogol-core

API changes (from Hackage documentation)

Files

• README.md +1/−1
• gen/Network/Google/AppState/Types.hs +1/−1
• gen/Network/Google/AppState/Types/Product.hs +28/−15
• gen/Network/Google/Resource/AppState/States/Clear.hs +8/−6
• gen/Network/Google/Resource/AppState/States/Delete.hs +7/−6
• gen/Network/Google/Resource/AppState/States/Get.hs +7/−6
• gen/Network/Google/Resource/AppState/States/List.hs +7/−6
• gen/Network/Google/Resource/AppState/States/Update.hs +7/−3
• gogol-appstate.cabal +2/−2

@@ -8,7 +8,7 @@  ## Version -`0.3.0`+`0.5.0`   ## Description

@@ -63,4 +63,4 @@  -- | View and manage your data for this application appStateScope :: Proxy '["https://www.googleapis.com/auth/appstate"]-appStateScope = Proxy;+appStateScope = Proxy

@@ -23,12 +23,15 @@ -- | 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))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'WriteResult' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -41,12 +44,13 @@ writeResult     :: WriteResult writeResult =-    WriteResult'+  WriteResult'     { _wrCurrentStateVersion = Nothing     , _wrKind = "appstate#writeResult"     , _wrStateKey = Nothing     } + -- | The version of the data for this key on the server. wrCurrentStateVersion :: Lens' WriteResult (Maybe Text) wrCurrentStateVersion@@ -85,12 +89,15 @@ -- | 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])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -103,12 +110,13 @@ listResponse     :: ListResponse listResponse =-    ListResponse'+  ListResponse'     { _lrMaximumKeyCount = Nothing     , _lrKind = "appstate#listResponse"     , _lrItems = Nothing     } + -- | The maximum number of keys allowed for this user. lrMaximumKeyCount :: Lens' ListResponse (Maybe Int32) lrMaximumKeyCount@@ -146,13 +154,16 @@ -- | 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)     , _grStateKey            :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -167,13 +178,14 @@ getResponse     :: GetResponse getResponse =-    GetResponse'+  GetResponse'     { _grCurrentStateVersion = Nothing     , _grKind = "appstate#getResponse"     , _grData = Nothing     , _grStateKey = Nothing     } + -- | The current app state version. grCurrentStateVersion :: Lens' GetResponse (Maybe Text) grCurrentStateVersion@@ -217,11 +229,14 @@ -- | 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)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'UpdateRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -232,10 +247,8 @@ updateRequest     :: UpdateRequest updateRequest =-    UpdateRequest'-    { _urKind = "appstate#updateRequest"-    , _urData = Nothing-    }+  UpdateRequest' {_urKind = "appstate#updateRequest", _urData = Nothing}+  -- | Uniquely identifies the type of this resource. Value is always the fixed -- string appstate#updateRequest.

@@ -58,11 +58,14 @@ -- 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)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StatesClear' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -74,10 +77,9 @@     :: Int32 -- ^ 'scStateKey'     -> StatesClear statesClear pScStateKey_ =-    StatesClear'-    { _scStateKey = _Coerce # pScStateKey_-    , _scCurrentDataVersion = Nothing-    }+  StatesClear'+    {_scStateKey = _Coerce # pScStateKey_, _scCurrentDataVersion = Nothing}+  -- | The key for the data to be retrieved. scStateKey :: Lens' StatesClear Int32

@@ -59,10 +59,13 @@ -- 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)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StatesDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -71,10 +74,8 @@ statesDelete     :: Int32 -- ^ 'sdStateKey'     -> StatesDelete-statesDelete pSdStateKey_ =-    StatesDelete'-    { _sdStateKey = _Coerce # pSdStateKey_-    }+statesDelete pSdStateKey_ = StatesDelete' {_sdStateKey = _Coerce # pSdStateKey_}+  -- | The key for the data to be retrieved. sdStateKey :: Lens' StatesDelete Int32

@@ -53,10 +53,13 @@ -- 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)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StatesGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -65,10 +68,8 @@ statesGet     :: Int32 -- ^ 'sgStateKey'     -> StatesGet-statesGet pSgStateKey_ =-    StatesGet'-    { _sgStateKey = _Coerce # pSgStateKey_-    }+statesGet pSgStateKey_ = StatesGet' {_sgStateKey = _Coerce # pSgStateKey_}+  -- | The key for the data to be retrieved. sgStateKey :: Lens' StatesGet Int32

@@ -51,10 +51,13 @@ -- | 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)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StatesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -62,10 +65,8 @@ -- * 'slIncludeData' statesList     :: StatesList-statesList =-    StatesList'-    { _slIncludeData = False-    }+statesList = StatesList' {_slIncludeData = False}+  -- | Whether to include the full data in addition to the version number slIncludeData :: Lens' StatesList Bool

@@ -60,12 +60,15 @@ -- 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-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StatesUpdate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -80,11 +83,12 @@     -> UpdateRequest -- ^ 'suPayload'     -> StatesUpdate statesUpdate pSuStateKey_ pSuPayload_ =-    StatesUpdate'+  StatesUpdate'     { _suCurrentStateVersion = Nothing     , _suStateKey = _Coerce # pSuStateKey_     , _suPayload = pSuPayload_     }+  -- | The version of the app state your application is attempting to update. -- If this does not match the current version, this method will return a

@@ -1,5 +1,5 @@ name:                  gogol-appstate-version:               0.4.0+version:               0.5.0 synopsis:              Google App State SDK. homepage:              https://github.com/brendanhay/gogol bug-reports:           https://github.com/brendanhay/gogol/issues@@ -46,5 +46,5 @@         , Network.Google.AppState.Types.Sum      build-depends:-          gogol-core == 0.4.0.*+          gogol-core == 0.5.0.*         , base       >= 4.7 && < 5