@@ -33,11 +33,12 @@ module Network.Google.Resource.Games.TurnBasedMatches.List
3333 , TurnBasedMatchesList
3434
3535 -- * Request Lenses
36− , tMaxCompletedMatches
37− , tIncludeMatchData
38− , tLanguage
39− , tPageToken
40− , tMaxResults
36+ , turMaxCompletedMatches
37+ , turConsistencyToken
38+ , turIncludeMatchData
39+ , turLanguage
40+ , turPageToken
41+ , turMaxResults
4142 ) where
4243
4344import Network.Google.Games.Types
@@ -50,55 +51,67 @@ type TurnBasedMatchesListResource =
5051 "v1" :>
5152 "turnbasedmatches" :>
5253 QueryParam "maxCompletedMatches" (Textual Int32) :>
53− QueryParam "includeMatchData" Bool :>
54− QueryParam "language" Text :>
55− QueryParam "pageToken" Text :>
56− QueryParam "maxResults" (Textual Int32) :>
57− QueryParam "alt" AltJSON :>
58− Get '[JSON] TurnBasedMatchList
54+ QueryParam "consistencyToken" (Textual Int64) :>
55+ QueryParam "includeMatchData" Bool :>
56+ QueryParam "language" Text :>
57+ QueryParam "pageToken" Text :>
58+ QueryParam "maxResults" (Textual Int32) :>
59+ QueryParam "alt" AltJSON :>
60+ Get '[JSON] TurnBasedMatchList
5961
6062-- | Returns turn-based matches the player is or was involved in.
6163--
6264-- /See:/ 'turnBasedMatchesList' smart constructor.
6365data TurnBasedMatchesList = TurnBasedMatchesList'
64− { _tMaxCompletedMatches :: !(Maybe (Textual Int32))
65− , _tIncludeMatchData :: !(Maybe Bool)
66− , _tLanguage :: !(Maybe Text)
67− , _tPageToken :: !(Maybe Text)
68− , _tMaxResults :: !(Maybe (Textual Int32))
66+ { _turMaxCompletedMatches :: !(Maybe (Textual Int32))
67+ , _turConsistencyToken :: !(Maybe (Textual Int64))
68+ , _turIncludeMatchData :: !(Maybe Bool)
69+ , _turLanguage :: !(Maybe Text)
70+ , _turPageToken :: !(Maybe Text)
71+ , _turMaxResults :: !(Maybe (Textual Int32))
6972 } deriving (Eq,Show,Data,Typeable,Generic)
7073
7174-- | Creates a value of 'TurnBasedMatchesList' with the minimum fields required to make a request.
7275--
7376-- Use one of the following lenses to modify other fields as desired:
7477--
75−-- * 'tMaxCompletedMatches'
78+-- * 'turMaxCompletedMatches'
7679--
77−-- * 'tIncludeMatchData'
80+-- * 'turConsistencyToken'
7881--
79−-- * 'tLanguage'
82+-- * 'turIncludeMatchData'
8083--
81−-- * 'tPageToken'
84+-- * 'turLanguage'
8285--
83−-- * 'tMaxResults'
86+-- * 'turPageToken'
87+--
88+-- * 'turMaxResults'
8489turnBasedMatchesList
8590 :: TurnBasedMatchesList
8691turnBasedMatchesList =
8792 TurnBasedMatchesList'
88− { _tMaxCompletedMatches = Nothing
89− , _tIncludeMatchData = Nothing
90− , _tLanguage = Nothing
91− , _tPageToken = Nothing
92− , _tMaxResults = Nothing
93+ { _turMaxCompletedMatches = Nothing
94+ , _turConsistencyToken = Nothing
95+ , _turIncludeMatchData = Nothing
96+ , _turLanguage = Nothing
97+ , _turPageToken = Nothing
98+ , _turMaxResults = Nothing
9399 }
94100
95101-- | The maximum number of completed or canceled matches to return in the
96102-- response. If not set, all matches returned could be completed or
97103-- canceled.
98−tMaxCompletedMatches :: Lens' TurnBasedMatchesList (Maybe Int32)
99−tMaxCompletedMatches
100− = lens _tMaxCompletedMatches
101− (\ s a -> s{_tMaxCompletedMatches = a})
104+turMaxCompletedMatches :: Lens' TurnBasedMatchesList (Maybe Int32)
105+turMaxCompletedMatches
106+ = lens _turMaxCompletedMatches
107+ (\ s a -> s{_turMaxCompletedMatches = a})
108+ . mapping _Coerce
109+
110+-- | The last-seen mutation timestamp.
111+turConsistencyToken :: Lens' TurnBasedMatchesList (Maybe Int64)
112+turConsistencyToken
113+ = lens _turConsistencyToken
114+ (\ s a -> s{_turConsistencyToken = a})
102115 . mapping _Coerce
103116
104117-- | True if match data should be returned in the response. Note that not all
@@ -106,28 +119,29 @@ tMaxCompletedMatches
106119-- server may decide to only return data for some of the matches to limit
107120-- download size for the client. The remainder of the data for these
108121-- matches will be retrievable on request.
109−tIncludeMatchData :: Lens' TurnBasedMatchesList (Maybe Bool)
110−tIncludeMatchData
111− = lens _tIncludeMatchData
112− (\ s a -> s{_tIncludeMatchData = a})
122+turIncludeMatchData :: Lens' TurnBasedMatchesList (Maybe Bool)
123+turIncludeMatchData
124+ = lens _turIncludeMatchData
125+ (\ s a -> s{_turIncludeMatchData = a})
113126
114127-- | The preferred language to use for strings returned by this method.
115−tLanguage :: Lens' TurnBasedMatchesList (Maybe Text)
116−tLanguage
117− = lens _tLanguage (\ s a -> s{_tLanguage = a})
128+turLanguage :: Lens' TurnBasedMatchesList (Maybe Text)
129+turLanguage
130+ = lens _turLanguage (\ s a -> s{_turLanguage = a})
118131
119132-- | The token returned by the previous request.
120−tPageToken :: Lens' TurnBasedMatchesList (Maybe Text)
121−tPageToken
122− = lens _tPageToken (\ s a -> s{_tPageToken = a})
133+turPageToken :: Lens' TurnBasedMatchesList (Maybe Text)
134+turPageToken
135+ = lens _turPageToken (\ s a -> s{_turPageToken = a})
123136
124137-- | The maximum number of matches to return in the response, used for
125138-- paging. For any response, the actual number of matches to return may be
126139-- less than the specified maxResults.
127−tMaxResults :: Lens' TurnBasedMatchesList (Maybe Int32)
128−tMaxResults
129− = lens _tMaxResults (\ s a -> s{_tMaxResults = a}) .
130− mapping _Coerce
140+turMaxResults :: Lens' TurnBasedMatchesList (Maybe Int32)
141+turMaxResults
142+ = lens _turMaxResults
143+ (\ s a -> s{_turMaxResults = a})
144+ . mapping _Coerce
131145
132146instance GoogleRequest TurnBasedMatchesList where
133147 type Rs TurnBasedMatchesList = TurnBasedMatchList
@@ -135,10 +149,11 @@ instance GoogleRequest TurnBasedMatchesList where
135149 '["https://www.googleapis.com/auth/games",
136150 "https://www.googleapis.com/auth/plus.login"]
137151 requestClient TurnBasedMatchesList'{..}
138− = go _tMaxCompletedMatches _tIncludeMatchData
139− _tLanguage
140− _tPageToken
141− _tMaxResults
152+ = go _turMaxCompletedMatches _turConsistencyToken
153+ _turIncludeMatchData
154+ _turLanguage
155+ _turPageToken
156+ _turMaxResults
142157 (Just AltJSON)
143158 gamesService
144159 where go