on develop help sign in
Regenerating all services
commit6b8e8c5b7ea4f6f89bc193babb376ac5be27cbff authorBrendan Hay <brendan.g.hay@gmail.com> dateTue 6 Oct 2015, 09:07 (11 years ago) parente92bc25
35 files changed+531−53
core/src/Network/Google/Client.hs+72−29 gogol-games-appstate/LICENSE → gogol-appstate/LICENSE gogol-games-appstate/Makefile → gogol-appstate/Makefile gogol-games-appstate/README.md → gogol-appstate/README.md+2−2 gogol-games-appstate/Setup.hs → gogol-appstate/Setup.hs gogol-games-appstate/gen/Network/Google/AppState.hs → gogol-appstate/gen/Network/Google/AppState.hs gogol-games-appstate/gen/Network/Google/AppState/Types.hs → gogol-appstate/gen/Network/Google/AppState/Types.hs gogol-games-appstate/gen/Network/Google/AppState/Types/Product.hs → gogol-appstate/gen/Network/Google/AppState/Types/Product.hs gogol-games-appstate/gen/Network/Google/AppState/Types/Sum.hs → gogol-appstate/gen/Network/Google/AppState/Types/Sum.hs gogol-games-appstate/gen/Network/Google/Resource/AppState/States/Clear.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/Clear.hs gogol-games-appstate/gen/Network/Google/Resource/AppState/States/Delete.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/Delete.hs gogol-games-appstate/gen/Network/Google/Resource/AppState/States/Get.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/Get.hs gogol-games-appstate/gen/Network/Google/Resource/AppState/States/List.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/List.hs gogol-games-appstate/gen/Network/Google/Resource/AppState/States/Update.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/Update.hs gogol-games-appstate/gogol-games-appstate.cabal → gogol-appstate/gogol-appstate.cabal+1−1 gogol-games-appstate/src/.gitkeep → gogol-appstate/src/.gitkeep gogol-games/gen/Network/Google/Games/Types/Sum.hs−6 gogol-groups-migration/README.md+1−1 gogol-groups-migration/gogol-groups-migration.cabal+7−9 gogol-groups-settings/LICENSE+367 gogol-groups-settings/Makefile+1 gogol-groups-settings/README.md+28 gogol-groups-settings/Setup.hs+2 gogol-groups-migration/gen/Network/Google/GroupsSettings.hs → gogol-groups-settings/gen/Network/Google/GroupsSettings.hs gogol-groups-migration/gen/Network/Google/GroupsSettings/Types.hs → gogol-groups-settings/gen/Network/Google/GroupsSettings/Types.hs gogol-groups-migration/gen/Network/Google/GroupsSettings/Types/Product.hs → gogol-groups-settings/gen/Network/Google/GroupsSettings/Types/Product.hs gogol-groups-migration/gen/Network/Google/GroupsSettings/Types/Sum.hs → gogol-groups-settings/gen/Network/Google/GroupsSettings/Types/Sum.hs gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Get.hs → gogol-groups-settings/gen/Network/Google/Resource/GroupsSettings/Groups/Get.hs gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Patch.hs → gogol-groups-settings/gen/Network/Google/Resource/GroupsSettings/Groups/Patch.hs gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Update.hs → gogol-groups-settings/gen/Network/Google/Resource/GroupsSettings/Groups/Update.hs gogol-groups-settings/gogol-groups-settings.cabal+45 gogol-groups-settings/src/.gitkeep gogol-logging/gen/Network/Google/Logging.hs+1−1 gogol-logging/gen/Network/Google/Logging/Types.hs+1−1 gogol-logging/gen/Network/Google/Logging/Types/Product.hs+3−3
core/src/Network/Google/Client.hs+72−29
@@ -79,7 +79,6 @@ data Request = Request
7979 , _rqQuery :: DList (Text, Maybe Text)
8080 , _rqHeaders :: [Header]
8181 , _rqBody :: Maybe (MediaType, LBS.ByteString)
82− , _rqAccept :: [MediaType]
8382 }
8483
8584initialRequest :: ByteString -- ^ Host.
@@ -94,15 +93,8 @@ initialRequest h n p = Request
9493 , _rqQuery = mempty
9594 , _rqHeaders = mempty
9695 , _rqBody = Nothing
97− , _rqAccept = mempty
9896 }
9997
100−clientRequest :: Method -> Request -> ClientRequest
101−clientRequest m Request {..} = def
102− { Client.method = m
103− , Client.checkStatus = \_ _ _ -> Nothing
104− }
105−
10698appendPath :: Request -> Builder -> Request
10799appendPath rq x = rq { _rqPath = _rqPath rq <> "/" <> x }
108100
@@ -115,6 +107,9 @@ appendQuery rq k v = rq { _rqQuery = DList.snoc (_rqQuery rq) (k, v) }
115107setBody :: Request -> MediaType -> LBS.ByteString -> Request
116108setBody rq c x = rq { _rqBody = Just (c, x) }
117109
110+-- setAccept :: Reuqest -> [MediaType] -> Request
111+-- setAccept rq xs = rq { _rqAccept = xs }
112+
118113data Error
119114 = TransportError HttpException
120115 | SerializeError SerializeError
@@ -284,62 +279,92 @@ instance ( MimeRender c a
284279 where
285280 p = Proxy :: Proxy c
286281
282+-- instance GoogleClient fn => GoogleClient (ReqBody (c ': cs) Body :> fn) where
283+
287284instance MimeUnrender c a => GoogleClient (Get (c ': cs) a) where
288285 type Fn (Get (c ': cs) a) = Client a
289286
290− requestBuild Proxy = perform methodGet [200, 203]
287+ requestBuild Proxy = requestMime (Proxy :: Proxy c) methodGet [200, 203]
291288
292−instance GoogleClient (Get (c ': cs) Body) where
293− type Fn (Get (c ': cs) Body) = Client Body
289+instance GoogleClient (Get (c ': cs) ResponseBody) where
290+ type Fn (Get (c ': cs) ResponseBody) = Client ResponseBody
294291
295− requestBuild Proxy = perform methodGet [204]
292+ requestBuild Proxy = requestBody (Proxy :: Proxy c) methodGet [200, 203]
296293
297294instance GoogleClient (Get (c ': cs) ()) where
298295 type Fn (Get (c ': cs) ()) = Client ()
299296
300− requestBuild Proxy = perform methodGet [204]
297+ requestBuild Proxy = requestMime (Proxy :: Proxy c) methodGet [204]
301298
302299instance MimeUnrender c a => GoogleClient (Post (c ': cs) a) where
303300 type Fn (Post (c ': cs) a) = Client a
304301
305− requestBuild Proxy = perform methodPost [200, 201]
302+ requestBuild Proxy = requestMime (Proxy :: Proxy c) methodPost [200, 201]
306303
307304instance GoogleClient (Post (c ': cs) ()) where
308305 type Fn (Post (c ': cs) ()) = Client ()
309306
310− requestBuild Proxy = perform methodPost [204]
307+ requestBuild Proxy = requestMime (Proxy :: Proxy c) methodPost [204]
311308
312309instance MimeUnrender c a => GoogleClient (Put (c ': cs) a) where
313310 type Fn (Put (c ': cs) a) = Client a
314311
315− requestBuild Proxy = perform methodPut [200, 201]
312+ requestBuild Proxy = requestMime (Proxy :: Proxy c) methodPut [200, 201]
316313
317314instance GoogleClient (Put (c ': cs) ()) where
318315 type Fn (Put (c ': cs) ()) = Client ()
319316
320− requestBuild Proxy = perform methodPut [204]
317+ requestBuild Proxy = requestMime (Proxy :: Proxy c) methodPut [204]
321318
322319instance MimeUnrender c a => GoogleClient (Patch (c ': cs) a) where
323320 type Fn (Patch (c ': cs) a) = Client a
324321
325− requestBuild Proxy = perform methodPatch [200, 201]
322+ requestBuild Proxy = requestMime (Proxy :: Proxy c) methodPatch [200, 201]
326323
327324instance GoogleClient (Patch (c ': cs) ()) where
328325 type Fn (Patch (c ': cs) ()) = Client ()
329326
330− requestBuild Proxy = perform methodPatch [204]
327+ requestBuild Proxy = requestMime (Proxy :: Proxy c) methodPatch [204]
331328
332329type Client a = ReaderT Manager IO (Either Error a)
333330
334−perform :: forall c a. Proxy c
331+requestMime :: MimeUnrender c a
332+ => Proxy c
333+ -> Method
334+ -> [Int]
335+ -> Request
336+ -> Client a
337+requestMime p = perform c go
338+ where
339+ c = contentType p
340+
341+ go b = do
342+ lbs <- sinkLBS b
343+ case mimeUnrender c lbs of
344+ Left e -> SerializeError
345+ Right x -> undefined
346+
347+requestbody :: Accept c
348+ => Proxy c
349+ -> Method
350+ -> [Int]
351+ -> Request
352+ -> Client ResponseBody
353+requestBody p = perform c (pure . Right)
354+ where
355+ c = contentType p
356+
357+-- performNoBody = httpNoBody
358+
359+perform :: Accept
360+ -> (ResponseBody -> Client (Either SerializeError a))
335361 -> Method
336362 -> [Int]
337− -> (ResponseBody -> IO (Either SerializeError a))
338363 -> Request
339364 -> Client a
340−perform Proxy meth ns f rq = do
341− m <- ask
342− x <- lift . try $ Client.http m (clientRequest meth rq)
365+perform a meth ns f rq = do
366+ m <- ask
367+ x <- lift . try $ Client.http m (clientRequest meth a rq)
343368 either (failure . TransportError) success x
344369 where
345370 failure = pure . Left
@@ -349,20 +374,38 @@ perform Proxy meth ns f rq = do
349374 b = Client.responseBody rs
350375 hs = Client.responseHeaders rs
351376 case content hs of
352− Nothing -> failure (SerializeError' (SerializeError hs))
377+ unless (matches respCT (acceptCT)) $
378+ left $ UnsupportedContentType respCT respBody
353379
354− Just c | check s -> first SerializeError' <$> f b
380+ Nothing -> failure (SerializeError' (SerializeError hs))
355381
356− Just c -> do
357− lbs <- b $$+- CL.consume
382+ Just _ | statusInvalid s -> do
383+ lbs <- sinkLBS b
358384 failure (ServiceError' (ServiceError s c hs lbs))
359385
386+ Just c | contentInvalid c -> do
387+ lbs <- sinkLBS b
388+ failure (SerializeError' (SerializeError s c hs lbs))
389+
390+
391+ Just c -> first SerializeError' <$> f b
392+
360393 content :: [Header] -> Maybe c
361394 content = parseAccept
362395 . fromMaybe "application/octet-stream"
363396 . lookup hContentType
364397
365− check s = fromEnum s `elem` ns
398+ statusCheck s = fromEnum s `elem` ns
399+ contentCheck = matches a
400+
401+clientRequest :: Method -> MediaType -> Request -> ClientRequest
402+clientRequest m c Request {..} = def
403+ { Client.method = m
404+ , Client.checkStatus = \_ _ _ -> Nothing
405+ }
406+
407+sinkLBS :: ResponseBody -> Client LBS.ByteString
408+sinkLBS = fmap LBS.fromChunks . ($$+- CL.consme)
366409
367410buildText :: ToText a => a -> Builder
368411buildText = Build.fromText . toText
gogol-games-appstate/LICENSE → gogol-appstate/LICENSErenamed

The content is the same.

gogol-games-appstate/Makefile → gogol-appstate/Makefilerenamed

The content is the same.

gogol-games-appstate/README.md → gogol-appstate/README.mdrenamed+2−2
@@ -1,4 +1,4 @@
1−# gogol-games-appstate
1+# gogol-appstate
22
33* [Version](#version)
44* [Description](#description)
@@ -25,4 +25,4 @@ For any problems, comments, or feedback please create an issue [here on GitHub](
2525
2626## Licence
2727
28−`gogol-games-appstate` is released under the [Mozilla Public License Version 2.0](http://www.mozilla.org/MPL/).
28+`gogol-appstate` is released under the [Mozilla Public License Version 2.0](http://www.mozilla.org/MPL/).
gogol-games-appstate/Setup.hs → gogol-appstate/Setup.hsrenamed

The content is the same.

gogol-games-appstate/gen/Network/Google/AppState.hs → gogol-appstate/gen/Network/Google/AppState.hsrenamed

The content is the same.

gogol-games-appstate/gen/Network/Google/AppState/Types.hs → gogol-appstate/gen/Network/Google/AppState/Types.hsrenamed

The content is the same.

gogol-games-appstate/gen/Network/Google/AppState/Types/Product.hs → gogol-appstate/gen/Network/Google/AppState/Types/Product.hsrenamed

The content is the same.

gogol-games-appstate/gen/Network/Google/AppState/Types/Sum.hs → gogol-appstate/gen/Network/Google/AppState/Types/Sum.hsrenamed

The content is the same.

gogol-games-appstate/gen/Network/Google/Resource/AppState/States/Clear.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/Clear.hsrenamed

The content is the same.

gogol-games-appstate/gen/Network/Google/Resource/AppState/States/Delete.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/Delete.hsrenamed

The content is the same.

gogol-games-appstate/gen/Network/Google/Resource/AppState/States/Get.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/Get.hsrenamed

The content is the same.

gogol-games-appstate/gen/Network/Google/Resource/AppState/States/List.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/List.hsrenamed

The content is the same.

gogol-games-appstate/gen/Network/Google/Resource/AppState/States/Update.hs → gogol-appstate/gen/Network/Google/Resource/AppState/States/Update.hsrenamed

The content is the same.

gogol-games-appstate/gogol-games-appstate.cabal → gogol-appstate/gogol-appstate.cabalrenamed+1−1
@@ -1,4 +1,4 @@
1−name: gogol-games-appstate
1+name: gogol-appstate
22version: 0.0.1
33synopsis: Google App State API Client.
44homepage: https://github.com/brendanhay/gogol
gogol-games-appstate/src/.gitkeep → gogol-appstate/src/.gitkeeprenamed

The content is the same.

gogol-games/gen/Network/Google/Games/Types/Sum.hs−6
@@ -21,10 +21,6 @@ import Network.Google.Prelude
2121-- | Collection of players being retrieved
2222data PlayersListCollection
2323 = PlayedWith
24− -- ^ @playedWith@
25− -- (DEPRECATED: please use played_with!) Retrieve a list of players you
26− -- have played a multiplayer game (realtime or turn-based) with recently.
27− | PlayedWith
2824 -- ^ @played_with@
2925 -- Retrieve a list of players you have played a multiplayer game (realtime
3026 -- or turn-based) with recently.
@@ -34,13 +30,11 @@ instance Hashable PlayersListCollection
3430
3531instance FromText PlayersListCollection where
3632 fromText = \case
37− "playedWith" -> Just PlayedWith
3833 "played_with" -> Just PlayedWith
3934 _ -> Nothing
4035
4136instance ToText PlayersListCollection where
4237 toText = \case
43− PlayedWith -> "playedWith"
4438 PlayedWith -> "played_with"
4539
4640instance FromJSON PlayersListCollection where
gogol-groups-migration/README.md+1−1
@@ -13,7 +13,7 @@
1313
1414## Description
1515
16−A client library for the Groups Settings API.
16+A client library for the Groups Migration API.
1717
1818
1919## Contribute
gogol-groups-migration/gogol-groups-migration.cabal+7−9
@@ -1,6 +1,6 @@
11name: gogol-groups-migration
22version: 0.0.1
3−synopsis: Groups Settings API Client.
3+synopsis: Groups Migration API Client.
44homepage: https://github.com/brendanhay/gogol
55bug-reports: https://github.com/brendanhay/gogol/issues
66license: OtherLicense
@@ -14,7 +14,7 @@ cabal-version: >= 1.10
1414extra-source-files: README.md
1515
1616description:
17− Lets you manage permission levels and related settings of a group.
17+ Groups Migration Api.
1818 .
1919 /Warning:/ This is an experimental prototype/preview release which is still
2020 under exploratory development and not intended for public use, caveat emptor!
@@ -30,15 +30,13 @@ library
3030 ghc-options: -Wall
3131
3232 exposed-modules:
33− Network.Google.GroupsSettings
34− , Network.Google.GroupsSettings.Types
35− , Network.Google.Resource.GroupsSettings.Groups.Get
36− , Network.Google.Resource.GroupsSettings.Groups.Patch
37− , Network.Google.Resource.GroupsSettings.Groups.Update
33+ Network.Google.GroupsMigration
34+ , Network.Google.GroupsMigration.Types
35+ , Network.Google.Resource.GroupsMigration.Archive.Insert
3836
3937 other-modules:
40− Network.Google.GroupsSettings.Types.Product
41− , Network.Google.GroupsSettings.Types.Sum
38+ Network.Google.GroupsMigration.Types.Product
39+ , Network.Google.GroupsMigration.Types.Sum
4240
4341 build-depends:
4442 gogol-core == 0.0.1.*
gogol-groups-settings/LICENSEnew file+367
@@ -0,0 +1,367 @@
1+Mozilla Public License Version 2.0
2+==================================
3+
4+1. Definitions
5+--------------
6+
7+1.1. "Contributor"
8+ means each individual or legal entity that creates, contributes to
9+ the creation of, or owns Covered Software.
10+
11+1.2. "Contributor Version"
12+ means the combination of the Contributions of others (if any) used
13+ by a Contributor and that particular Contributor's Contribution.
14+
15+1.3. "Contribution"
16+ means Covered Software of a particular Contributor.
17+
18+1.4. "Covered Software"
19+ means Source Code Form to which the initial Contributor has attached
20+ the notice in Exhibit A, the Executable Form of such Source Code
21+ Form, and Modifications of such Source Code Form, in each case
22+ including portions thereof.
23+
24+1.5. "Incompatible With Secondary Licenses"
25+ means
26+
27+ (a) that the initial Contributor has attached the notice described
28+ in Exhibit B to the Covered Software; or
29+
30+ (b) that the Covered Software was made available under the terms of
31+ version 1.1 or earlier of the License, but not also under the
32+ terms of a Secondary License.
33+
34+1.6. "Executable Form"
35+ means any form of the work other than Source Code Form.
36+
37+1.7. "Larger Work"
38+ means a work that combines Covered Software with other material, in
39+ a separate file or files, that is not Covered Software.
40+
41+1.8. "License"
42+ means this document.
43+
44+1.9. "Licensable"
45+ means having the right to grant, to the maximum extent possible,
46+ whether at the time of the initial grant or subsequently, any and
47+ all of the rights conveyed by this License.
48+
49+1.10. "Modifications"
50+ means any of the following:
51+
52+ (a) any file in Source Code Form that results from an addition to,
53+ deletion from, or modification of the contents of Covered
54+ Software; or
55+
56+ (b) any new file in Source Code Form that contains any Covered
57+ Software.
58+
59+1.11. "Patent Claims" of a Contributor
60+ means any patent claim(s), including without limitation, method,
61+ process, and apparatus claims, in any patent Licensable by such
62+ Contributor that would be infringed, but for the grant of the
63+ License, by the making, using, selling, offering for sale, having
64+ made, import, or transfer of either its Contributions or its
65+ Contributor Version.
66+
67+1.12. "Secondary License"
68+ means either the GNU General Public License, Version 2.0, the GNU
69+ Lesser General Public License, Version 2.1, the GNU Affero General
70+ Public License, Version 3.0, or any later versions of those
71+ licenses.
72+
73+1.13. "Source Code Form"
74+ means the form of the work preferred for making modifications.
75+
76+1.14. "You" (or "Your")
77+ means an individual or a legal entity exercising rights under this
78+ License. For legal entities, "You" includes any entity that
79+ controls, is controlled by, or is under common control with You. For
80+ purposes of this definition, "control" means (a) the power, direct
81+ or indirect, to cause the direction or management of such entity,
82+ whether by contract or otherwise, or (b) ownership of more than
83+ fifty percent (50%) of the outstanding shares or beneficial
84+ ownership of such entity.
85+
86+2. License Grants and Conditions
87+--------------------------------
88+
89+2.1. Grants
90+
91+Each Contributor hereby grants You a world-wide, royalty-free,
92+non-exclusive license:
93+
94+(a) under intellectual property rights (other than patent or trademark)
95+ Licensable by such Contributor to use, reproduce, make available,
96+ modify, display, perform, distribute, and otherwise exploit its
97+ Contributions, either on an unmodified basis, with Modifications, or
98+ as part of a Larger Work; and
99+
100+(b) under Patent Claims of such Contributor to make, use, sell, offer
101+ for sale, have made, import, and otherwise transfer either its
102+ Contributions or its Contributor Version.
103+
104+2.2. Effective Date
105+
106+The licenses granted in Section 2.1 with respect to any Contribution
107+become effective for each Contribution on the date the Contributor first
108+distributes such Contribution.
109+
110+2.3. Limitations on Grant Scope
111+
112+The licenses granted in this Section 2 are the only rights granted under
113+this License. No additional rights or licenses will be implied from the
114+distribution or licensing of Covered Software under this License.
115+Notwithstanding Section 2.1(b) above, no patent license is granted by a
116+Contributor:
117+
118+(a) for any code that a Contributor has removed from Covered Software;
119+ or
120+
121+(b) for infringements caused by: (i) Your and any other third party's
122+ modifications of Covered Software, or (ii) the combination of its
123+ Contributions with other software (except as part of its Contributor
124+ Version); or
125+
126+(c) under Patent Claims infringed by Covered Software in the absence of
127+ its Contributions.
128+
129+This License does not grant any rights in the trademarks, service marks,
130+or logos of any Contributor (except as may be necessary to comply with
131+the notice requirements in Section 3.4).
132+
133+2.4. Subsequent Licenses
134+
135+No Contributor makes additional grants as a result of Your choice to
136+distribute the Covered Software under a subsequent version of this
137+License (see Section 10.2) or under the terms of a Secondary License (if
138+permitted under the terms of Section 3.3).
139+
140+2.5. Representation
141+
142+Each Contributor represents that the Contributor believes its
143+Contributions are its original creation(s) or it has sufficient rights
144+to grant the rights to its Contributions conveyed by this License.
145+
146+2.6. Fair Use
147+
148+This License is not intended to limit any rights You have under
149+applicable copyright doctrines of fair use, fair dealing, or other
150+equivalents.
151+
152+2.7. Conditions
153+
154+Sections 3.1, 3.2, 3.3, and 3.4 are conditions of the licenses granted
155+in Section 2.1.
156+
157+3. Responsibilities
158+-------------------
159+
160+3.1. Distribution of Source Form
161+
162+All distribution of Covered Software in Source Code Form, including any
163+Modifications that You create or to which You contribute, must be under
164+the terms of this License. You must inform recipients that the Source
165+Code Form of the Covered Software is governed by the terms of this
166+License, and how they can obtain a copy of this License. You may not
167+attempt to alter or restrict the recipients' rights in the Source Code
168+Form.
169+
170+3.2. Distribution of Executable Form
171+
172+If You distribute Covered Software in Executable Form then:
173+
174+(a) such Covered Software must also be made available in Source Code
175+ Form, as described in Section 3.1, and You must inform recipients of
176+ the Executable Form how they can obtain a copy of such Source Code
177+ Form by reasonable means in a timely manner, at a charge no more
178+ than the cost of distribution to the recipient; and
179+
180+(b) You may distribute such Executable Form under the terms of this
181+ License, or sublicense it under different terms, provided that the
182+ license for the Executable Form does not attempt to limit or alter
183+ the recipients' rights in the Source Code Form under this License.
184+
185+3.3. Distribution of a Larger Work
186+
187+You may create and distribute a Larger Work under terms of Your choice,
188+provided that You also comply with the requirements of this License for
189+the Covered Software. If the Larger Work is a combination of Covered
190+Software with a work governed by one or more Secondary Licenses, and the
191+Covered Software is not Incompatible With Secondary Licenses, this
192+License permits You to additionally distribute such Covered Software
193+under the terms of such Secondary License(s), so that the recipient of
194+the Larger Work may, at their option, further distribute the Covered
195+Software under the terms of either this License or such Secondary
196+License(s).
197+
198+3.4. Notices
199+
200+You may not remove or alter the substance of any license notices
201+(including copyright notices, patent notices, disclaimers of warranty,
202+or limitations of liability) contained within the Source Code Form of
203+the Covered Software, except that You may alter any license notices to
204+the extent required to remedy known factual inaccuracies.
205+
206+3.5. Application of Additional Terms
207+
208+You may choose to offer, and to charge a fee for, warranty, support,
209+indemnity or liability obligations to one or more recipients of Covered
210+Software. However, You may do so only on Your own behalf, and not on
211+behalf of any Contributor. You must make it absolutely clear that any
212+such warranty, support, indemnity, or liability obligation is offered by
213+You alone, and You hereby agree to indemnify every Contributor for any
214+liability incurred by such Contributor as a result of warranty, support,
215+indemnity or liability terms You offer. You may include additional
216+disclaimers of warranty and limitations of liability specific to any
217+jurisdiction.
218+
219+4. Inability to Comply Due to Statute or Regulation
220+---------------------------------------------------
221+
222+If it is impossible for You to comply with any of the terms of this
223+License with respect to some or all of the Covered Software due to
224+statute, judicial order, or regulation then You must: (a) comply with
225+the terms of this License to the maximum extent possible; and (b)
226+describe the limitations and the code they affect. Such description must
227+be placed in a text file included with all distributions of the Covered
228+Software under this License. Except to the extent prohibited by statute
229+or regulation, such description must be sufficiently detailed for a
230+recipient of ordinary skill to be able to understand it.
231+
232+5. Termination
233+--------------
234+
235+5.1. The rights granted under this License will terminate automatically
236+if You fail to comply with any of its terms. However, if You become
237+compliant, then the rights granted under this License from a particular
238+Contributor are reinstated (a) provisionally, unless and until such
239+Contributor explicitly and finally terminates Your grants, and (b) on an
240+ongoing basis, if such Contributor fails to notify You of the
241+non-compliance by some reasonable means prior to 60 days after You have
242+come back into compliance. Moreover, Your grants from a particular
243+Contributor are reinstated on an ongoing basis if such Contributor
244+notifies You of the non-compliance by some reasonable means, this is the
245+first time You have received notice of non-compliance with this License
246+from such Contributor, and You become compliant prior to 30 days after
247+Your receipt of the notice.
248+
249+5.2. If You initiate litigation against any entity by asserting a patent
250+infringement claim (excluding declaratory judgment actions,
251+counter-claims, and cross-claims) alleging that a Contributor Version
252+directly or indirectly infringes any patent, then the rights granted to
253+You by any and all Contributors for the Covered Software under Section
254+2.1 of this License shall terminate.
255+
256+5.3. In the event of termination under Sections 5.1 or 5.2 above, all
257+end user license agreements (excluding distributors and resellers) which
258+have been validly granted by You or Your distributors under this License
259+prior to termination shall survive termination.
260+
261+************************************************************************
262+* *
263+* 6. Disclaimer of Warranty *
264+* ------------------------- *
265+* *
266+* Covered Software is provided under this License on an "as is" *
267+* basis, without warranty of any kind, either expressed, implied, or *
268+* statutory, including, without limitation, warranties that the *
269+* Covered Software is free of defects, merchantable, fit for a *
270+* particular purpose or non-infringing. The entire risk as to the *
271+* quality and performance of the Covered Software is with You. *
272+* Should any Covered Software prove defective in any respect, You *
273+* (not any Contributor) assume the cost of any necessary servicing, *
274+* repair, or correction. This disclaimer of warranty constitutes an *
275+* essential part of this License. No use of any Covered Software is *
276+* authorized under this License except under this disclaimer. *
277+* *
278+************************************************************************
279+
280+************************************************************************
281+* *
282+* 7. Limitation of Liability *
283+* -------------------------- *
284+* *
285+* Under no circumstances and under no legal theory, whether tort *
286+* (including negligence), contract, or otherwise, shall any *
287+* Contributor, or anyone who distributes Covered Software as *
288+* permitted above, be liable to You for any direct, indirect, *
289+* special, incidental, or consequential damages of any character *
290+* including, without limitation, damages for lost profits, loss of *
291+* goodwill, work stoppage, computer failure or malfunction, or any *
292+* and all other commercial damages or losses, even if such party *
293+* shall have been informed of the possibility of such damages. This *
294+* limitation of liability shall not apply to liability for death or *
295+* personal injury resulting from such party's negligence to the *
296+* extent applicable law prohibits such limitation. Some *
297+* jurisdictions do not allow the exclusion or limitation of *
298+* incidental or consequential damages, so this exclusion and *
299+* limitation may not apply to You. *
300+* *
301+************************************************************************
302+
303+8. Litigation
304+-------------
305+
306+Any litigation relating to this License may be brought only in the
307+courts of a jurisdiction where the defendant maintains its principal
308+place of business and such litigation shall be governed by laws of that
309+jurisdiction, without reference to its conflict-of-law provisions.
310+Nothing in this Section shall prevent a party's ability to bring
311+cross-claims or counter-claims.
312+
313+9. Miscellaneous
314+----------------
315+
316+This License represents the complete agreement concerning the subject
317+matter hereof. If any provision of this License is held to be
318+unenforceable, such provision shall be reformed only to the extent
319+necessary to make it enforceable. Any law or regulation which provides
320+that the language of a contract shall be construed against the drafter
321+shall not be used to construe this License against a Contributor.
322+
323+10. Versions of the License
324+---------------------------
325+
326+10.1. New Versions
327+
328+Mozilla Foundation is the license steward. Except as provided in Section
329+10.3, no one other than the license steward has the right to modify or
330+publish new versions of this License. Each version will be given a
331+distinguishing version number.
332+
333+10.2. Effect of New Versions
334+
335+You may distribute the Covered Software under the terms of the version
336+of the License under which You originally received the Covered Software,
337+or under the terms of any subsequent version published by the license
338+steward.
339+
340+10.3. Modified Versions
341+
342+If you create software not governed by this License, and you want to
343+create a new license for such software, you may create and use a
344+modified version of this License if you rename the license and remove
345+any references to the name of the license steward (except to note that
346+such modified license differs from this License).
347+
348+10.4. Distributing Source Code Form that is Incompatible With Secondary
349+Licenses
350+
351+If You choose to distribute Source Code Form that is Incompatible With
352+Secondary Licenses under the terms of this version of the License, the
353+notice described in Exhibit B of this License must be attached.
354+
355+Exhibit A - Source Code Form License Notice
356+-------------------------------------------
357+
358+ This Source Code Form is subject to the terms of the Mozilla Public
359+ License, v. 2.0. If a copy of the MPL was not distributed with this
360+ file, You can obtain one at http://mozilla.org/MPL/2.0/.
361+
362+If it is not possible or desirable to put the notice in a particular
363+file, then You may include the notice in a location (such as a LICENSE
364+file in a relevant directory) where a recipient would be likely to look
365+for such a notice.
366+
367+You may add additional accurate notices of copyright ownership.
gogol-groups-settings/Makefilenew file+1
@@ -0,0 +1 @@
1+include ../share/library.mk
gogol-groups-settings/README.mdnew file+28
@@ -0,0 +1,28 @@
1+# gogol-groups-settings
2+
3+* [Version](#version)
4+* [Description](#description)
5+* [Contribute](#contribute)
6+* [Licence](#licence)
7+
8+
9+## Version
10+
11+`0.0.1`
12+
13+
14+## Description
15+
16+A client library for the Groups Settings API.
17+
18+
19+## Contribute
20+
21+For any problems, comments, or feedback please create an issue [here on GitHub](https://github.com/brendanhay/amazonka/issues).
22+
23+> _Note:_ this library is an auto-generated Haskell package. Please see `amazonka-gen` for more information.
24+
25+
26+## Licence
27+
28+`gogol-groups-settings` is released under the [Mozilla Public License Version 2.0](http://www.mozilla.org/MPL/).
gogol-groups-settings/Setup.hsnew file+2
@@ -0,0 +1,2 @@
1+import Distribution.Simple
2+main = defaultMain
gogol-groups-migration/gen/Network/Google/GroupsSettings.hs → gogol-groups-settings/gen/Network/Google/GroupsSettings.hsrenamed

The content is the same.

gogol-groups-migration/gen/Network/Google/GroupsSettings/Types.hs → gogol-groups-settings/gen/Network/Google/GroupsSettings/Types.hsrenamed

The content is the same.

gogol-groups-migration/gen/Network/Google/GroupsSettings/Types/Product.hs → gogol-groups-settings/gen/Network/Google/GroupsSettings/Types/Product.hsrenamed

The content is the same.

gogol-groups-migration/gen/Network/Google/GroupsSettings/Types/Sum.hs → gogol-groups-settings/gen/Network/Google/GroupsSettings/Types/Sum.hsrenamed

The content is the same.

gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Get.hs → gogol-groups-settings/gen/Network/Google/Resource/GroupsSettings/Groups/Get.hsrenamed

The content is the same.

gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Patch.hs → gogol-groups-settings/gen/Network/Google/Resource/GroupsSettings/Groups/Patch.hsrenamed

The content is the same.

gogol-groups-migration/gen/Network/Google/Resource/GroupsSettings/Groups/Update.hs → gogol-groups-settings/gen/Network/Google/Resource/GroupsSettings/Groups/Update.hsrenamed

The content is the same.

gogol-groups-settings/gogol-groups-settings.cabalnew file+45
@@ -0,0 +1,45 @@
1+name: gogol-groups-settings
2+version: 0.0.1
3+synopsis: Groups Settings API Client.
4+homepage: https://github.com/brendanhay/gogol
5+bug-reports: https://github.com/brendanhay/gogol/issues
6+license: OtherLicense
7+license-file: LICENSE
8+author: Brendan Hay
9+maintainer: Brendan Hay <brendan.g.hay@gmail.com>
10+copyright: Copyright (c) 2015 Brendan Hay
11+category: Network, Google, Cloud
12+build-type: Simple
13+cabal-version: >= 1.10
14+extra-source-files: README.md
15+
16+description:
17+ Lets you manage permission levels and related settings of a group.
18+ .
19+ /Warning:/ This is an experimental prototype/preview release which is still
20+ under exploratory development and not intended for public use, caveat emptor!
21+
22+source-repository head
23+ type: git
24+ location: git://github.com/brendanhay/gogol.git
25+
26+library
27+ default-language: Haskell2010
28+ hs-source-dirs: src gen
29+
30+ ghc-options: -Wall
31+
32+ exposed-modules:
33+ Network.Google.GroupsSettings
34+ , Network.Google.GroupsSettings.Types
35+ , Network.Google.Resource.GroupsSettings.Groups.Get
36+ , Network.Google.Resource.GroupsSettings.Groups.Patch
37+ , Network.Google.Resource.GroupsSettings.Groups.Update
38+
39+ other-modules:
40+ Network.Google.GroupsSettings.Types.Product
41+ , Network.Google.GroupsSettings.Types.Sum
42+
43+ build-depends:
44+ gogol-core == 0.0.1.*
45+ , base >= 4.7 && < 5
gogol-groups-settings/src/.gitkeepnew file

No changes to the content.

gogol-logging/gen/Network/Google/Logging.hs+1−1
@@ -92,7 +92,7 @@ module Network.Google.Logging
9292
9393 -- ** Log
9494 , Log
95− , log
95+ , log'
9696 , lName
9797 , lDisplayName
9898 , lPayloadType
gogol-logging/gen/Network/Google/Logging/Types.hs+1−1
@@ -20,7 +20,7 @@ module Network.Google.Logging.Types
2020
2121 -- * Log
2222 , Log
23− , log
23+ , log'
2424 , lName
2525 , lDisplayName
2626 , lPayloadType
gogol-logging/gen/Network/Google/Logging/Types/Product.hs+3−3
@@ -22,7 +22,7 @@ import Network.Google.Prelude
2222
2323-- | _Output only._ Describes a log, which is a named stream of log entries.
2424--
25−-- /See:/ 'log' smart constructor.
25+-- /See:/ 'log'' smart constructor.
2626data Log = Log
2727 { _lName :: !(Maybe Text)
2828 , _lDisplayName :: !(Maybe Text)
@@ -38,9 +38,9 @@ data Log = Log
3838-- * 'lDisplayName'
3939--
4040-- * 'lPayloadType'
41−log
41+log'
4242 :: Log
43−log =
43+log' =
4444 Log
4545 { _lName = Nothing
4646 , _lDisplayName = Nothing