on develop help sign in
Regenerating all services
commit6ca0a2addec5bd1976b17576f4bfa2a337ffe647 authorBrendan Hay <brendan.g.hay@gmail.com> dateSun 11 Oct 2015, 16:02 (11 years ago) parent990d59b
99 files changed+1934−1973
gen/src/Gen/AST/Flatten.hs+1−1 gen/src/Gen/AST/Render.hs+1−1 gen/src/Gen/AST/Solve.hs+5−5 gogol-admin-directory/gen/Network/Google/Directory.hs+3−3 gogol-admin-directory/gen/Network/Google/Directory/Types.hs+3−3 gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+27−29 gogol-admin-reports/gen/Network/Google/Reports.hs+2−2 gogol-admin-reports/gen/Network/Google/Reports/Types.hs+2−2 gogol-admin-reports/gen/Network/Google/Reports/Types/Product.hs+19−19 gogol-analytics/gen/Network/Google/Analytics.hs+4−4 gogol-analytics/gen/Network/Google/Analytics/Types.hs+4−4 gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+39−39 gogol-android-publisher/gen/Network/Google/AndroidPublisher.hs+2−2 gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs+2−2 gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+20−20 gogol-appengine/gen/Network/Google/AppEngine.hs+9−9 gogol-appengine/gen/Network/Google/AppEngine/Types.hs+9−9 gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+83−87 gogol-apps-calendar/gen/Network/Google/AppsCalendar.hs+8−8 gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types.hs+8−8 gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+76−77 gogol-bigquery/gen/Network/Google/BigQuery.hs+2−2 gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+2−2 gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+19−19 gogol-civicinfo/gen/Network/Google/CivicInfo.hs+2−2 gogol-civicinfo/gen/Network/Google/CivicInfo/Types.hs+2−2 gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+20−20 gogol-compute/gen/Network/Google/Compute.hs+14−14 gogol-compute/gen/Network/Google/Compute/Types.hs+14−14 gogol-compute/gen/Network/Google/Compute/Types/Product.hs+139−140 gogol-customsearch/gen/Network/Google/CustomSearch.hs+7−7 gogol-customsearch/gen/Network/Google/CustomSearch/Types.hs+7−7 gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+51−51 gogol-dataflow/gen/Network/Google/Dataflow.hs+24−24 gogol-dataflow/gen/Network/Google/Dataflow/Types.hs+24−24 gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+229−234 gogol-datastore/gen/Network/Google/Datastore.hs+1−1 gogol-datastore/gen/Network/Google/Datastore/Types.hs+1−1 gogol-datastore/gen/Network/Google/Datastore/Types/Product.hs+9−9 gogol-debugger/gen/Network/Google/Debugger.hs+1−1 gogol-debugger/gen/Network/Google/Debugger/Types.hs+1−1 gogol-debugger/gen/Network/Google/Debugger/Types/Product.hs+9−9 gogol-discovery/gen/Network/Google/Discovery.hs+14−14 gogol-discovery/gen/Network/Google/Discovery/Types.hs+14−14 gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+123−131 gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch.hs+1−1 gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types.hs+1−1 gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+9−9 gogol-drive/gen/Network/Google/Drive.hs+4−4 gogol-drive/gen/Network/Google/Drive/Types.hs+4−4 gogol-drive/gen/Network/Google/Drive/Types/Product.hs+37−39 gogol-fonts/gen/Network/Google/Fonts.hs+1−1 gogol-fonts/gen/Network/Google/Fonts/Types.hs+1−1 gogol-fonts/gen/Network/Google/Fonts/Types/Product.hs+9−9 gogol-genomics/gen/Network/Google/Genomics.hs+11−11 gogol-genomics/gen/Network/Google/Genomics/Types.hs+11−11 gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+101−106 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit.hs+1−1 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+1−1 gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+10−10 gogol-logging/gen/Network/Google/Logging.hs+5−5 gogol-logging/gen/Network/Google/Logging/Types.hs+5−5 gogol-logging/gen/Network/Google/Logging/Types/Product.hs+49−50 gogol-maps-engine/gen/Network/Google/MapsEngine.hs+1−1 gogol-maps-engine/gen/Network/Google/MapsEngine/Types.hs+1−1 gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+9−10 gogol-monitoring/gen/Network/Google/Monitoring.hs+2−2 gogol-monitoring/gen/Network/Google/Monitoring/Types.hs+2−2 gogol-monitoring/gen/Network/Google/Monitoring/Types/Product.hs+19−20 gogol-pagespeed/gen/Network/Google/PageSpeed.hs+27−27 gogol-pagespeed/gen/Network/Google/PageSpeed/Types.hs+27−27 gogol-pagespeed/gen/Network/Google/PageSpeed/Types/Product.hs+263−264 gogol-partners/gen/Network/Google/Partners.hs+1−1 gogol-partners/gen/Network/Google/Partners/Types.hs+1−1 gogol-partners/gen/Network/Google/Partners/Types/Product.hs+10−10 gogol-prediction/gen/Network/Google/Prediction.hs+9−9 gogol-prediction/gen/Network/Google/Prediction/Types.hs+9−9 gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+81−83 gogol-proximitybeacon/gen/Network/Google/ProximityBeacon.hs+1−1 gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types.hs+1−1 gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+9−9 gogol-pubsub/gen/Network/Google/PubSub.hs+2−2 gogol-pubsub/gen/Network/Google/PubSub/Types.hs+2−2 gogol-pubsub/gen/Network/Google/PubSub/Types/Product.hs+18−20 gogol-resourcemanager/gen/Network/Google/ResourceManager.hs+1−1 gogol-resourcemanager/gen/Network/Google/ResourceManager/Types.hs+1−1 gogol-resourcemanager/gen/Network/Google/ResourceManager/Types/Product.hs+9−9 gogol-resourceviews/gen/Network/Google/ResourceViews.hs+1−1 gogol-resourceviews/gen/Network/Google/ResourceViews/Types.hs+1−1 gogol-resourceviews/gen/Network/Google/ResourceViews/Types/Product.hs+10−10 gogol-storage-transfer/gen/Network/Google/StorageTransfer.hs+3−3 gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types.hs+3−3 gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+27−28 gogol-storage/gen/Network/Google/Storage.hs+2−2 gogol-storage/gen/Network/Google/Storage/Types.hs+2−2 gogol-storage/gen/Network/Google/Storage/Types/Product.hs+18−18 gogol-youtube/gen/Network/Google/YouTube.hs+4−4 gogol-youtube/gen/Network/Google/YouTube/Types.hs+4−4 gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+36−38
gen/src/Gen/AST/Flatten.hs+1−1
@@ -90,7 +90,7 @@ schema g ml (Fix f) = go (maybe g (reference g) ml) f >>= uncurry insert
9090 Arr <$> schema p (Just "item") (setRequired e)
9191
9292 object p (Obj aps ps) = Obj
93− <$> traverse (localSchema p "properties") aps
93+ <$> traverse (localSchema p "additional") aps
9494 <*> Map.traverseWithKey (localSchema p) ps
9595
9696 name i p xs
gen/src/Gen/AST/Render.hs+1−1
@@ -74,7 +74,7 @@ renderSchema s = go (_schema s)
7474 a <- traverse getSolved aps
7575 p <- traverse getSolved ps
7676 let ap = setAdditional <$> a
77− ts = maybe p (flip (Map.insert "properties") p) ap
77+ ts = maybe p (flip (Map.insert "addtional") p) ap
7878 prod ts
7979 where
8080 prod ts = Prod (dname k) (i ^. iDescription)
gen/src/Gen/AST/Solve.hs+5−5
@@ -151,16 +151,16 @@ getPrefix :: Global -> AST Prefix
151151getPrefix g = loc "getPrefix" g $ memo prefixed g go
152152 where
153153 go = \case
154− SObj _ (Obj _ ps) -> field ps
155− SEnm _ (Enm vs) -> branch (map fst vs)
156− _ -> pure mempty
154+ SObj _ (Obj aps ps) -> field (isJust aps) ps
155+ SEnm _ (Enm vs) -> branch (map fst vs)
156+ _ -> pure mempty
157157
158− field rs = do
158+ field aps rs = do
159159 p <- uniq fields (acronymPrefixes g) ks
160160 pure (Prefix p)
161161 where
162162 ls = Map.keys rs
163− ks = Set.fromList (map (CI.mk . local) ls)
163+ ks = Set.fromList (map (CI.mk . local) (ls ++ ["additional" | aps]))
164164
165165 branch vs = do
166166 p <- uniq branches ps (Set.fromList (map CI.mk vs))
gogol-admin-directory/gen/Network/Google/Directory.hs+3−3
@@ -417,7 +417,7 @@ module Network.Google.Directory
417417 -- ** UserCustomSchemas
418418 , UserCustomSchemas
419419 , userCustomSchemas
420− , ucsProperties
420+ , ucsAddtional
421421
422422 -- ** Aliases
423423 , Aliases
@@ -597,7 +597,7 @@ module Network.Google.Directory
597597 -- ** ChannelParams
598598 , ChannelParams
599599 , channelParams
600− , cpProperties
600+ , cpAddtional
601601
602602 -- ** UserOrganization
603603 , UserOrganization
@@ -713,7 +713,7 @@ module Network.Google.Directory
713713 -- ** UserCustomProperties
714714 , UserCustomProperties
715715 , userCustomProperties
716− , ucpProperties
716+ , ucpAddtional
717717
718718 -- ** ChromeosDevicesListOrderBy
719719 , ChromeosDevicesListOrderBy (..)
gogol-admin-directory/gen/Network/Google/Directory/Types.hs+3−3
@@ -207,7 +207,7 @@ module Network.Google.Directory.Types
207207 -- * UserCustomSchemas
208208 , UserCustomSchemas
209209 , userCustomSchemas
210− , ucsProperties
210+ , ucsAddtional
211211
212212 -- * Aliases
213213 , Aliases
@@ -387,7 +387,7 @@ module Network.Google.Directory.Types
387387 -- * ChannelParams
388388 , ChannelParams
389389 , channelParams
390− , cpProperties
390+ , cpAddtional
391391
392392 -- * UserOrganization
393393 , UserOrganization
@@ -503,7 +503,7 @@ module Network.Google.Directory.Types
503503 -- * UserCustomProperties
504504 , UserCustomProperties
505505 , userCustomProperties
506− , ucpProperties
506+ , ucpAddtional
507507
508508 -- * ChromeosDevicesListOrderBy
509509 , ChromeosDevicesListOrderBy (..)
gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+27−29
@@ -1502,26 +1502,25 @@ instance ToJSON Tokens where
15021502--
15031503-- /See:/ 'userCustomSchemas' smart constructor.
15041504newtype UserCustomSchemas = UserCustomSchemas
1505− { _ucsProperties :: HashMap Text UserCustomProperties
1505+ { _ucsAddtional :: HashMap Text UserCustomProperties
15061506 } deriving (Eq,Show,Data,Typeable,Generic)
15071507
15081508-- | Creates a value of 'UserCustomSchemas' with the minimum fields required to make a request.
15091509--
15101510-- Use one of the following lenses to modify other fields as desired:
15111511--
1512−-- * 'ucsProperties'
1512+-- * 'ucsAddtional'
15131513userCustomSchemas
1514− :: HashMap Text UserCustomProperties -- ^ 'properties'
1514+ :: HashMap Text UserCustomProperties -- ^ 'addtional'
15151515 -> UserCustomSchemas
1516−userCustomSchemas pUcsProperties_ =
1516+userCustomSchemas pUcsAddtional_ =
15171517 UserCustomSchemas
1518− { _ucsProperties = pUcsProperties_
1518+ { _ucsAddtional = pUcsAddtional_
15191519 }
15201520
1521−ucsProperties :: Lens' UserCustomSchemas (HashMap Text UserCustomProperties)
1522−ucsProperties
1523− = lens _ucsProperties
1524− (\ s a -> s{_ucsProperties = a})
1521+ucsAddtional :: Lens' UserCustomSchemas (HashMap Text UserCustomProperties)
1522+ucsAddtional
1523+ = lens _ucsAddtional (\ s a -> s{_ucsAddtional = a})
15251524
15261525instance FromJSON UserCustomSchemas where
15271526 parseJSON
@@ -1529,7 +1528,7 @@ instance FromJSON UserCustomSchemas where
15291528 (\ o -> UserCustomSchemas <$> (parseJSONObject o))
15301529
15311530instance ToJSON UserCustomSchemas where
1532− toJSON = toJSON . _ucsProperties
1531+ toJSON = toJSON . _ucsAddtional
15331532
15341533-- | JSON response template to list aliases in Directory API.
15351534--
@@ -2961,26 +2960,26 @@ instance ToJSON UserRelation where
29612960--
29622961-- /See:/ 'channelParams' smart constructor.
29632962newtype ChannelParams = ChannelParams
2964− { _cpProperties :: HashMap Text Text
2963+ { _cpAddtional :: HashMap Text Text
29652964 } deriving (Eq,Show,Data,Typeable,Generic)
29662965
29672966-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
29682967--
29692968-- Use one of the following lenses to modify other fields as desired:
29702969--
2971−-- * 'cpProperties'
2970+-- * 'cpAddtional'
29722971channelParams
2973− :: HashMap Text Text -- ^ 'properties'
2972+ :: HashMap Text Text -- ^ 'addtional'
29742973 -> ChannelParams
2975−channelParams pCpProperties_ =
2974+channelParams pCpAddtional_ =
29762975 ChannelParams
2977− { _cpProperties = pCpProperties_
2976+ { _cpAddtional = pCpAddtional_
29782977 }
29792978
29802979-- | Declares a new parameter by name.
2981−cpProperties :: Lens' ChannelParams (HashMap Text Text)
2982−cpProperties
2983− = lens _cpProperties (\ s a -> s{_cpProperties = a})
2980+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
2981+cpAddtional
2982+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
29842983
29852984instance FromJSON ChannelParams where
29862985 parseJSON
@@ -2988,7 +2987,7 @@ instance FromJSON ChannelParams where
29882987 (\ o -> ChannelParams <$> (parseJSONObject o))
29892988
29902989instance ToJSON ChannelParams where
2991− toJSON = toJSON . _cpProperties
2990+ toJSON = toJSON . _cpAddtional
29922991
29932992-- | JSON template for an organization entry.
29942993--
@@ -3985,26 +3984,25 @@ instance ToJSON Member where
39853984--
39863985-- /See:/ 'userCustomProperties' smart constructor.
39873986newtype UserCustomProperties = UserCustomProperties
3988− { _ucpProperties :: HashMap Text JSONValue
3987+ { _ucpAddtional :: HashMap Text JSONValue
39893988 } deriving (Eq,Show,Data,Typeable,Generic)
39903989
39913990-- | Creates a value of 'UserCustomProperties' with the minimum fields required to make a request.
39923991--
39933992-- Use one of the following lenses to modify other fields as desired:
39943993--
3995−-- * 'ucpProperties'
3994+-- * 'ucpAddtional'
39963995userCustomProperties
3997− :: HashMap Text JSONValue -- ^ 'properties'
3996+ :: HashMap Text JSONValue -- ^ 'addtional'
39983997 -> UserCustomProperties
3999−userCustomProperties pUcpProperties_ =
3998+userCustomProperties pUcpAddtional_ =
40003999 UserCustomProperties
4001− { _ucpProperties = pUcpProperties_
4000+ { _ucpAddtional = pUcpAddtional_
40024001 }
40034002
4004−ucpProperties :: Lens' UserCustomProperties (HashMap Text JSONValue)
4005−ucpProperties
4006− = lens _ucpProperties
4007− (\ s a -> s{_ucpProperties = a})
4003+ucpAddtional :: Lens' UserCustomProperties (HashMap Text JSONValue)
4004+ucpAddtional
4005+ = lens _ucpAddtional (\ s a -> s{_ucpAddtional = a})
40084006
40094007instance FromJSON UserCustomProperties where
40104008 parseJSON
@@ -4012,7 +4010,7 @@ instance FromJSON UserCustomProperties where
40124010 (\ o -> UserCustomProperties <$> (parseJSONObject o))
40134011
40144012instance ToJSON UserCustomProperties where
4015− toJSON = toJSON . _ucpProperties
4013+ toJSON = toJSON . _ucpAddtional
40164014
40174015-- | Template for notifications list response.
40184016--
gogol-admin-reports/gen/Network/Google/Reports.hs+2−2
@@ -71,7 +71,7 @@ module Network.Google.Reports
7171 -- ** UsageReportParametersItemMsgValueItem
7272 , UsageReportParametersItemMsgValueItem
7373 , usageReportParametersItemMsgValueItem
74− , urpimviProperties
74+ , urpimviAddtional
7575
7676 -- ** Activities
7777 , Activities
@@ -127,7 +127,7 @@ module Network.Google.Reports
127127 -- ** ChannelParams
128128 , ChannelParams
129129 , channelParams
130− , cpProperties
130+ , cpAddtional
131131
132132 -- ** Activity
133133 , Activity
gogol-admin-reports/gen/Network/Google/Reports/Types.hs+2−2
@@ -48,7 +48,7 @@ module Network.Google.Reports.Types
4848 -- * UsageReportParametersItemMsgValueItem
4949 , UsageReportParametersItemMsgValueItem
5050 , usageReportParametersItemMsgValueItem
51− , urpimviProperties
51+ , urpimviAddtional
5252
5353 -- * Activities
5454 , Activities
@@ -104,7 +104,7 @@ module Network.Google.Reports.Types
104104 -- * ChannelParams
105105 , ChannelParams
106106 , channelParams
107− , cpProperties
107+ , cpAddtional
108108
109109 -- * Activity
110110 , Activity
gogol-admin-reports/gen/Network/Google/Reports/Types/Product.hs+19−19
@@ -274,26 +274,26 @@ instance ToJSON UsageReports where
274274--
275275-- /See:/ 'usageReportParametersItemMsgValueItem' smart constructor.
276276newtype UsageReportParametersItemMsgValueItem = UsageReportParametersItemMsgValueItem
277− { _urpimviProperties :: HashMap Text JSONValue
277+ { _urpimviAddtional :: HashMap Text JSONValue
278278 } deriving (Eq,Show,Data,Typeable,Generic)
279279
280280-- | Creates a value of 'UsageReportParametersItemMsgValueItem' with the minimum fields required to make a request.
281281--
282282-- Use one of the following lenses to modify other fields as desired:
283283--
284−-- * 'urpimviProperties'
284+-- * 'urpimviAddtional'
285285usageReportParametersItemMsgValueItem
286− :: HashMap Text JSONValue -- ^ 'properties'
286+ :: HashMap Text JSONValue -- ^ 'addtional'
287287 -> UsageReportParametersItemMsgValueItem
288−usageReportParametersItemMsgValueItem pUrpimviProperties_ =
288+usageReportParametersItemMsgValueItem pUrpimviAddtional_ =
289289 UsageReportParametersItemMsgValueItem
290− { _urpimviProperties = pUrpimviProperties_
290+ { _urpimviAddtional = pUrpimviAddtional_
291291 }
292292
293−urpimviProperties :: Lens' UsageReportParametersItemMsgValueItem (HashMap Text JSONValue)
294−urpimviProperties
295− = lens _urpimviProperties
296− (\ s a -> s{_urpimviProperties = a})
293+urpimviAddtional :: Lens' UsageReportParametersItemMsgValueItem (HashMap Text JSONValue)
294+urpimviAddtional
295+ = lens _urpimviAddtional
296+ (\ s a -> s{_urpimviAddtional = a})
297297
298298instance FromJSON
299299 UsageReportParametersItemMsgValueItem where
@@ -305,7 +305,7 @@ instance FromJSON
305305
306306instance ToJSON UsageReportParametersItemMsgValueItem
307307 where
308− toJSON = toJSON . _urpimviProperties
308+ toJSON = toJSON . _urpimviAddtional
309309
310310-- | JSON template for a collection of activites.
311311--
@@ -754,26 +754,26 @@ instance ToJSON ActivityEventsItem where
754754--
755755-- /See:/ 'channelParams' smart constructor.
756756newtype ChannelParams = ChannelParams
757− { _cpProperties :: HashMap Text Text
757+ { _cpAddtional :: HashMap Text Text
758758 } deriving (Eq,Show,Data,Typeable,Generic)
759759
760760-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
761761--
762762-- Use one of the following lenses to modify other fields as desired:
763763--
764−-- * 'cpProperties'
764+-- * 'cpAddtional'
765765channelParams
766− :: HashMap Text Text -- ^ 'properties'
766+ :: HashMap Text Text -- ^ 'addtional'
767767 -> ChannelParams
768−channelParams pCpProperties_ =
768+channelParams pCpAddtional_ =
769769 ChannelParams
770− { _cpProperties = pCpProperties_
770+ { _cpAddtional = pCpAddtional_
771771 }
772772
773773-- | Declares a new parameter by name.
774−cpProperties :: Lens' ChannelParams (HashMap Text Text)
775−cpProperties
776− = lens _cpProperties (\ s a -> s{_cpProperties = a})
774+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
775+cpAddtional
776+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
777777
778778instance FromJSON ChannelParams where
779779 parseJSON
@@ -781,7 +781,7 @@ instance FromJSON ChannelParams where
781781 (\ o -> ChannelParams <$> (parseJSONObject o))
782782
783783instance ToJSON ChannelParams where
784− toJSON = toJSON . _cpProperties
784+ toJSON = toJSON . _cpAddtional
785785
786786-- | JSON template for the activity resource.
787787--
gogol-analytics/gen/Network/Google/Analytics.hs+4−4
@@ -331,7 +331,7 @@ module Network.Google.Analytics
331331 -- ** GaDataTotalsForAllResults
332332 , GaDataTotalsForAllResults
333333 , gaDataTotalsForAllResults
334− , gdtfarProperties
334+ , gdtfarAddtional
335335
336336 -- ** ProFileParentLink
337337 , ProFileParentLink
@@ -645,7 +645,7 @@ module Network.Google.Analytics
645645 -- ** RealtimeDataTotalsForAllResults
646646 , RealtimeDataTotalsForAllResults
647647 , realtimeDataTotalsForAllResults
648− , rdtfarProperties
648+ , rdtfarAddtional
649649
650650 -- ** CustomDataSource
651651 , CustomDataSource
@@ -1213,7 +1213,7 @@ module Network.Google.Analytics
12131213 -- ** McfDataTotalsForAllResults
12141214 , McfDataTotalsForAllResults
12151215 , mcfDataTotalsForAllResults
1216− , mdtfarProperties
1216+ , mdtfarAddtional
12171217
12181218 -- ** UnSampledReportCloudStorageDownloadDetails
12191219 , UnSampledReportCloudStorageDownloadDetails
@@ -1243,7 +1243,7 @@ module Network.Google.Analytics
12431243 -- ** ColumnAttributes
12441244 , ColumnAttributes
12451245 , columnAttributes
1246− , caProperties
1246+ , caAddtional
12471247 ) where
12481248
12491249import Network.Google.Analytics.Types
gogol-analytics/gen/Network/Google/Analytics/Types.hs+4−4
@@ -90,7 +90,7 @@ module Network.Google.Analytics.Types
9090 -- * GaDataTotalsForAllResults
9191 , GaDataTotalsForAllResults
9292 , gaDataTotalsForAllResults
93− , gdtfarProperties
93+ , gdtfarAddtional
9494
9595 -- * ProFileParentLink
9696 , ProFileParentLink
@@ -404,7 +404,7 @@ module Network.Google.Analytics.Types
404404 -- * RealtimeDataTotalsForAllResults
405405 , RealtimeDataTotalsForAllResults
406406 , realtimeDataTotalsForAllResults
407− , rdtfarProperties
407+ , rdtfarAddtional
408408
409409 -- * CustomDataSource
410410 , CustomDataSource
@@ -972,7 +972,7 @@ module Network.Google.Analytics.Types
972972 -- * McfDataTotalsForAllResults
973973 , McfDataTotalsForAllResults
974974 , mcfDataTotalsForAllResults
975− , mdtfarProperties
975+ , mdtfarAddtional
976976
977977 -- * UnSampledReportCloudStorageDownloadDetails
978978 , UnSampledReportCloudStorageDownloadDetails
@@ -1002,7 +1002,7 @@ module Network.Google.Analytics.Types
10021002 -- * ColumnAttributes
10031003 , ColumnAttributes
10041004 , columnAttributes
1005− , caProperties
1005+ , caAddtional
10061006 ) where
10071007
10081008import Network.Google.Analytics.Types.Product
gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+39−39
@@ -692,28 +692,28 @@ instance ToJSON McfDataColumnHeadersItem where
692692--
693693-- /See:/ 'gaDataTotalsForAllResults' smart constructor.
694694newtype GaDataTotalsForAllResults = GaDataTotalsForAllResults
695− { _gdtfarProperties :: HashMap Text Text
695+ { _gdtfarAddtional :: HashMap Text Text
696696 } deriving (Eq,Show,Data,Typeable,Generic)
697697
698698-- | Creates a value of 'GaDataTotalsForAllResults' with the minimum fields required to make a request.
699699--
700700-- Use one of the following lenses to modify other fields as desired:
701701--
702−-- * 'gdtfarProperties'
702+-- * 'gdtfarAddtional'
703703gaDataTotalsForAllResults
704− :: HashMap Text Text -- ^ 'properties'
704+ :: HashMap Text Text -- ^ 'addtional'
705705 -> GaDataTotalsForAllResults
706−gaDataTotalsForAllResults pGdtfarProperties_ =
706+gaDataTotalsForAllResults pGdtfarAddtional_ =
707707 GaDataTotalsForAllResults
708− { _gdtfarProperties = pGdtfarProperties_
708+ { _gdtfarAddtional = pGdtfarAddtional_
709709 }
710710
711711-- | Key-value pair for the total value of a metric. Key is the metric name
712712-- and the value is the total value for that metric.
713−gdtfarProperties :: Lens' GaDataTotalsForAllResults (HashMap Text Text)
714−gdtfarProperties
715− = lens _gdtfarProperties
716− (\ s a -> s{_gdtfarProperties = a})
713+gdtfarAddtional :: Lens' GaDataTotalsForAllResults (HashMap Text Text)
714+gdtfarAddtional
715+ = lens _gdtfarAddtional
716+ (\ s a -> s{_gdtfarAddtional = a})
717717
718718instance FromJSON GaDataTotalsForAllResults where
719719 parseJSON
@@ -722,7 +722,7 @@ instance FromJSON GaDataTotalsForAllResults where
722722 GaDataTotalsForAllResults <$> (parseJSONObject o))
723723
724724instance ToJSON GaDataTotalsForAllResults where
725− toJSON = toJSON . _gdtfarProperties
725+ toJSON = toJSON . _gdtfarAddtional
726726
727727-- | Parent link for this view (profile). Points to the web property to which
728728-- this view (profile) belongs.
@@ -3733,28 +3733,28 @@ instance ToJSON GaData where
37333733--
37343734-- /See:/ 'realtimeDataTotalsForAllResults' smart constructor.
37353735newtype RealtimeDataTotalsForAllResults = RealtimeDataTotalsForAllResults
3736− { _rdtfarProperties :: HashMap Text Text
3736+ { _rdtfarAddtional :: HashMap Text Text
37373737 } deriving (Eq,Show,Data,Typeable,Generic)
37383738
37393739-- | Creates a value of 'RealtimeDataTotalsForAllResults' with the minimum fields required to make a request.
37403740--
37413741-- Use one of the following lenses to modify other fields as desired:
37423742--
3743−-- * 'rdtfarProperties'
3743+-- * 'rdtfarAddtional'
37443744realtimeDataTotalsForAllResults
3745− :: HashMap Text Text -- ^ 'properties'
3745+ :: HashMap Text Text -- ^ 'addtional'
37463746 -> RealtimeDataTotalsForAllResults
3747−realtimeDataTotalsForAllResults pRdtfarProperties_ =
3747+realtimeDataTotalsForAllResults pRdtfarAddtional_ =
37483748 RealtimeDataTotalsForAllResults
3749− { _rdtfarProperties = pRdtfarProperties_
3749+ { _rdtfarAddtional = pRdtfarAddtional_
37503750 }
37513751
37523752-- | Key-value pair for the total value of a metric. Key is the metric name
37533753-- and the value is the total value for that metric.
3754−rdtfarProperties :: Lens' RealtimeDataTotalsForAllResults (HashMap Text Text)
3755−rdtfarProperties
3756− = lens _rdtfarProperties
3757− (\ s a -> s{_rdtfarProperties = a})
3754+rdtfarAddtional :: Lens' RealtimeDataTotalsForAllResults (HashMap Text Text)
3755+rdtfarAddtional
3756+ = lens _rdtfarAddtional
3757+ (\ s a -> s{_rdtfarAddtional = a})
37583758
37593759instance FromJSON RealtimeDataTotalsForAllResults
37603760 where
@@ -3765,7 +3765,7 @@ instance FromJSON RealtimeDataTotalsForAllResults
37653765 (parseJSONObject o))
37663766
37673767instance ToJSON RealtimeDataTotalsForAllResults where
3768− toJSON = toJSON . _rdtfarProperties
3768+ toJSON = toJSON . _rdtfarAddtional
37693769
37703770-- | JSON template for an Analytics custom data source.
37713771--
@@ -9167,28 +9167,28 @@ instance ToJSON ExperimentVariationsItem where
91679167--
91689168-- /See:/ 'mcfDataTotalsForAllResults' smart constructor.
91699169newtype McfDataTotalsForAllResults = McfDataTotalsForAllResults
9170− { _mdtfarProperties :: HashMap Text Text
9170+ { _mdtfarAddtional :: HashMap Text Text
91719171 } deriving (Eq,Show,Data,Typeable,Generic)
91729172
91739173-- | Creates a value of 'McfDataTotalsForAllResults' with the minimum fields required to make a request.
91749174--
91759175-- Use one of the following lenses to modify other fields as desired:
91769176--
9177−-- * 'mdtfarProperties'
9177+-- * 'mdtfarAddtional'
91789178mcfDataTotalsForAllResults
9179− :: HashMap Text Text -- ^ 'properties'
9179+ :: HashMap Text Text -- ^ 'addtional'
91809180 -> McfDataTotalsForAllResults
9181−mcfDataTotalsForAllResults pMdtfarProperties_ =
9181+mcfDataTotalsForAllResults pMdtfarAddtional_ =
91829182 McfDataTotalsForAllResults
9183− { _mdtfarProperties = pMdtfarProperties_
9183+ { _mdtfarAddtional = pMdtfarAddtional_
91849184 }
91859185
91869186-- | Key-value pair for the total value of a metric. Key is the metric name
91879187-- and the value is the total value for that metric.
9188−mdtfarProperties :: Lens' McfDataTotalsForAllResults (HashMap Text Text)
9189−mdtfarProperties
9190− = lens _mdtfarProperties
9191− (\ s a -> s{_mdtfarProperties = a})
9188+mdtfarAddtional :: Lens' McfDataTotalsForAllResults (HashMap Text Text)
9189+mdtfarAddtional
9190+ = lens _mdtfarAddtional
9191+ (\ s a -> s{_mdtfarAddtional = a})
91929192
91939193instance FromJSON McfDataTotalsForAllResults where
91949194 parseJSON
@@ -9197,7 +9197,7 @@ instance FromJSON McfDataTotalsForAllResults where
91979197 McfDataTotalsForAllResults <$> (parseJSONObject o))
91989198
91999199instance ToJSON McfDataTotalsForAllResults where
9200− toJSON = toJSON . _mdtfarProperties
9200+ toJSON = toJSON . _mdtfarAddtional
92019201
92029202-- | Download details for a file stored in Google Cloud Storage.
92039203--
@@ -9410,26 +9410,26 @@ instance ToJSON GoalParentLink where
94109410--
94119411-- /See:/ 'columnAttributes' smart constructor.
94129412newtype ColumnAttributes = ColumnAttributes
9413− { _caProperties :: HashMap Text Text
9413+ { _caAddtional :: HashMap Text Text
94149414 } deriving (Eq,Show,Data,Typeable,Generic)
94159415
94169416-- | Creates a value of 'ColumnAttributes' with the minimum fields required to make a request.
94179417--
94189418-- Use one of the following lenses to modify other fields as desired:
94199419--
9420−-- * 'caProperties'
9420+-- * 'caAddtional'
94219421columnAttributes
9422− :: HashMap Text Text -- ^ 'properties'
9422+ :: HashMap Text Text -- ^ 'addtional'
94239423 -> ColumnAttributes
9424−columnAttributes pCaProperties_ =
9424+columnAttributes pCaAddtional_ =
94259425 ColumnAttributes
9426− { _caProperties = pCaProperties_
9426+ { _caAddtional = pCaAddtional_
94279427 }
94289428
94299429-- | The name of the attribute.
9430−caProperties :: Lens' ColumnAttributes (HashMap Text Text)
9431−caProperties
9432− = lens _caProperties (\ s a -> s{_caProperties = a})
9430+caAddtional :: Lens' ColumnAttributes (HashMap Text Text)
9431+caAddtional
9432+ = lens _caAddtional (\ s a -> s{_caAddtional = a})
94339433
94349434instance FromJSON ColumnAttributes where
94359435 parseJSON
@@ -9437,4 +9437,4 @@ instance FromJSON ColumnAttributes where
94379437 (\ o -> ColumnAttributes <$> (parseJSONObject o))
94389438
94399439instance ToJSON ColumnAttributes where
9440− toJSON = toJSON . _caProperties
9440+ toJSON = toJSON . _caAddtional
gogol-android-publisher/gen/Network/Google/AndroidPublisher.hs+2−2
@@ -184,7 +184,7 @@ module Network.Google.AndroidPublisher
184184 -- ** InAppProductListings
185185 , InAppProductListings
186186 , inAppProductListings
187− , iaplProperties
187+ , iaplAddtional
188188
189189 -- ** InAppProductsUpdateResponse
190190 , InAppProductsUpdateResponse
@@ -349,7 +349,7 @@ module Network.Google.AndroidPublisher
349349 -- ** InAppProductPrices
350350 , InAppProductPrices
351351 , inAppProductPrices
352− , iAppProperties
352+ , iAppAddtional
353353
354354 -- ** InAppProductsBatchRequest
355355 , InAppProductsBatchRequest
gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs+2−2
@@ -21,7 +21,7 @@ module Network.Google.AndroidPublisher.Types
2121 -- * InAppProductListings
2222 , InAppProductListings
2323 , inAppProductListings
24− , iaplProperties
24+ , iaplAddtional
2525
2626 -- * InAppProductsUpdateResponse
2727 , InAppProductsUpdateResponse
@@ -186,7 +186,7 @@ module Network.Google.AndroidPublisher.Types
186186 -- * InAppProductPrices
187187 , InAppProductPrices
188188 , inAppProductPrices
189− , iAppProperties
189+ , iAppAddtional
190190
191191 -- * InAppProductsBatchRequest
192192 , InAppProductsBatchRequest
gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+20−20
@@ -24,28 +24,28 @@ import Network.Google.Prelude
2424--
2525-- /See:/ 'inAppProductListings' smart constructor.
2626newtype InAppProductListings = InAppProductListings
27− { _iaplProperties :: HashMap Text InAppProductListing
27+ { _iaplAddtional :: HashMap Text InAppProductListing
2828 } deriving (Eq,Show,Data,Typeable,Generic)
2929
3030-- | Creates a value of 'InAppProductListings' with the minimum fields required to make a request.
3131--
3232-- Use one of the following lenses to modify other fields as desired:
3333--
34−-- * 'iaplProperties'
34+-- * 'iaplAddtional'
3535inAppProductListings
36− :: HashMap Text InAppProductListing -- ^ 'properties'
36+ :: HashMap Text InAppProductListing -- ^ 'addtional'
3737 -> InAppProductListings
38−inAppProductListings pIaplProperties_ =
38+inAppProductListings pIaplAddtional_ =
3939 InAppProductListings
40− { _iaplProperties = pIaplProperties_
40+ { _iaplAddtional = pIaplAddtional_
4141 }
4242
4343-- | The language of the localized data, as defined by BCP 47. i.e.:
4444-- \"en-US\", \"en-GB\".
45−iaplProperties :: Lens' InAppProductListings (HashMap Text InAppProductListing)
46−iaplProperties
47− = lens _iaplProperties
48− (\ s a -> s{_iaplProperties = a})
45+iaplAddtional :: Lens' InAppProductListings (HashMap Text InAppProductListing)
46+iaplAddtional
47+ = lens _iaplAddtional
48+ (\ s a -> s{_iaplAddtional = a})
4949
5050instance FromJSON InAppProductListings where
5151 parseJSON
@@ -53,7 +53,7 @@ instance FromJSON InAppProductListings where
5353 (\ o -> InAppProductListings <$> (parseJSONObject o))
5454
5555instance ToJSON InAppProductListings where
56− toJSON = toJSON . _iaplProperties
56+ toJSON = toJSON . _iaplAddtional
5757
5858--
5959-- /See:/ 'inAppProductsUpdateResponse' smart constructor.
@@ -1270,27 +1270,27 @@ instance ToJSON AppDetails where
12701270--
12711271-- /See:/ 'inAppProductPrices' smart constructor.
12721272newtype InAppProductPrices = InAppProductPrices
1273− { _iAppProperties :: HashMap Text Price
1273+ { _iAppAddtional :: HashMap Text Price
12741274 } deriving (Eq,Show,Data,Typeable,Generic)
12751275
12761276-- | Creates a value of 'InAppProductPrices' with the minimum fields required to make a request.
12771277--
12781278-- Use one of the following lenses to modify other fields as desired:
12791279--
1280−-- * 'iAppProperties'
1280+-- * 'iAppAddtional'
12811281inAppProductPrices
1282− :: HashMap Text Price -- ^ 'properties'
1282+ :: HashMap Text Price -- ^ 'addtional'
12831283 -> InAppProductPrices
1284−inAppProductPrices pIAppProperties_ =
1284+inAppProductPrices pIAppAddtional_ =
12851285 InAppProductPrices
1286− { _iAppProperties = pIAppProperties_
1286+ { _iAppAddtional = pIAppAddtional_
12871287 }
12881288
12891289-- | Region code, as defined by ISO 3166-2.
1290−iAppProperties :: Lens' InAppProductPrices (HashMap Text Price)
1291−iAppProperties
1292− = lens _iAppProperties
1293− (\ s a -> s{_iAppProperties = a})
1290+iAppAddtional :: Lens' InAppProductPrices (HashMap Text Price)
1291+iAppAddtional
1292+ = lens _iAppAddtional
1293+ (\ s a -> s{_iAppAddtional = a})
12941294
12951295instance FromJSON InAppProductPrices where
12961296 parseJSON
@@ -1298,7 +1298,7 @@ instance FromJSON InAppProductPrices where
12981298 (\ o -> InAppProductPrices <$> (parseJSONObject o))
12991299
13001300instance ToJSON InAppProductPrices where
1301− toJSON = toJSON . _iAppProperties
1301+ toJSON = toJSON . _iAppAddtional
13021302
13031303--
13041304-- /See:/ 'inAppProductsBatchRequest' smart constructor.
gogol-appengine/gen/Network/Google/AppEngine.hs+9−9
@@ -69,7 +69,7 @@ module Network.Google.AppEngine
6969 -- ** OperationSchema
7070 , OperationSchema
7171 , operationSchema
72− , osProperties
72+ , osAddtional
7373
7474 -- ** TrafficSplit
7575 , TrafficSplit
@@ -130,7 +130,7 @@ module Network.Google.AppEngine
130130 -- ** VersionEnvVariables
131131 , VersionEnvVariables
132132 , versionEnvVariables
133− , vevProperties
133+ , vevAddtional
134134
135135 -- ** Application
136136 , Application
@@ -144,7 +144,7 @@ module Network.Google.AppEngine
144144 -- ** VersionBetaSettings
145145 , VersionBetaSettings
146146 , versionBetaSettings
147− , vbsProperties
147+ , vbsAddtional
148148
149149 -- ** Operation
150150 , Operation
@@ -165,7 +165,7 @@ module Network.Google.AppEngine
165165 -- ** StaticDirectoryHandlerHTTPHeaders
166166 , StaticDirectoryHandlerHTTPHeaders
167167 , staticDirectoryHandlerHTTPHeaders
168− , sdhhttphProperties
168+ , sdhhttphAddtional
169169
170170 -- ** ListVersionsResponse
171171 , ListVersionsResponse
@@ -207,7 +207,7 @@ module Network.Google.AppEngine
207207 -- ** StatusDetailsItem
208208 , StatusDetailsItem
209209 , statusDetailsItem
210− , sdiProperties
210+ , sdiAddtional
211211
212212 -- ** Network
213213 , Network
@@ -219,7 +219,7 @@ module Network.Google.AppEngine
219219 -- ** StaticFilesHandlerHTTPHeaders
220220 , StaticFilesHandlerHTTPHeaders
221221 , staticFilesHandlerHTTPHeaders
222− , sfhhttphProperties
222+ , sfhhttphAddtional
223223
224224 -- ** Resources
225225 , Resources
@@ -231,7 +231,7 @@ module Network.Google.AppEngine
231231 -- ** DeploymentFiles
232232 , DeploymentFiles
233233 , deploymentFiles
234− , dfProperties
234+ , dfAddtional
235235
236236 -- ** CPUUtilization
237237 , CPUUtilization
@@ -242,7 +242,7 @@ module Network.Google.AppEngine
242242 -- ** TrafficSplitAllocations
243243 , TrafficSplitAllocations
244244 , trafficSplitAllocations
245− , tsaProperties
245+ , tsaAddtional
246246
247247 -- ** ManualScaling
248248 , ManualScaling
@@ -329,7 +329,7 @@ module Network.Google.AppEngine
329329 -- ** OperationResponse
330330 , OperationResponse
331331 , operationResponse
332− , orProperties
332+ , orAddtional
333333
334334 -- ** ContainerInfo
335335 , ContainerInfo
gogol-appengine/gen/Network/Google/AppEngine/Types.hs+9−9
@@ -28,7 +28,7 @@ module Network.Google.AppEngine.Types
2828 -- * OperationSchema
2929 , OperationSchema
3030 , operationSchema
31− , osProperties
31+ , osAddtional
3232
3333 -- * TrafficSplit
3434 , TrafficSplit
@@ -89,7 +89,7 @@ module Network.Google.AppEngine.Types
8989 -- * VersionEnvVariables
9090 , VersionEnvVariables
9191 , versionEnvVariables
92− , vevProperties
92+ , vevAddtional
9393
9494 -- * Application
9595 , Application
@@ -103,7 +103,7 @@ module Network.Google.AppEngine.Types
103103 -- * VersionBetaSettings
104104 , VersionBetaSettings
105105 , versionBetaSettings
106− , vbsProperties
106+ , vbsAddtional
107107
108108 -- * Operation
109109 , Operation
@@ -124,7 +124,7 @@ module Network.Google.AppEngine.Types
124124 -- * StaticDirectoryHandlerHTTPHeaders
125125 , StaticDirectoryHandlerHTTPHeaders
126126 , staticDirectoryHandlerHTTPHeaders
127− , sdhhttphProperties
127+ , sdhhttphAddtional
128128
129129 -- * ListVersionsResponse
130130 , ListVersionsResponse
@@ -166,7 +166,7 @@ module Network.Google.AppEngine.Types
166166 -- * StatusDetailsItem
167167 , StatusDetailsItem
168168 , statusDetailsItem
169− , sdiProperties
169+ , sdiAddtional
170170
171171 -- * Network
172172 , Network
@@ -178,7 +178,7 @@ module Network.Google.AppEngine.Types
178178 -- * StaticFilesHandlerHTTPHeaders
179179 , StaticFilesHandlerHTTPHeaders
180180 , staticFilesHandlerHTTPHeaders
181− , sfhhttphProperties
181+ , sfhhttphAddtional
182182
183183 -- * Resources
184184 , Resources
@@ -190,7 +190,7 @@ module Network.Google.AppEngine.Types
190190 -- * DeploymentFiles
191191 , DeploymentFiles
192192 , deploymentFiles
193− , dfProperties
193+ , dfAddtional
194194
195195 -- * CPUUtilization
196196 , CPUUtilization
@@ -201,7 +201,7 @@ module Network.Google.AppEngine.Types
201201 -- * TrafficSplitAllocations
202202 , TrafficSplitAllocations
203203 , trafficSplitAllocations
204− , tsaProperties
204+ , tsaAddtional
205205
206206 -- * ManualScaling
207207 , ManualScaling
@@ -288,7 +288,7 @@ module Network.Google.AppEngine.Types
288288 -- * OperationResponse
289289 , OperationResponse
290290 , operationResponse
291− , orProperties
291+ , orAddtional
292292
293293 -- * ContainerInfo
294294 , ContainerInfo
gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+83−87
@@ -125,26 +125,26 @@ instance ToJSON Status where
125125--
126126-- /See:/ 'operationSchema' smart constructor.
127127newtype OperationSchema = OperationSchema
128− { _osProperties :: HashMap Text JSONValue
128+ { _osAddtional :: HashMap Text JSONValue
129129 } deriving (Eq,Show,Data,Typeable,Generic)
130130
131131-- | Creates a value of 'OperationSchema' with the minimum fields required to make a request.
132132--
133133-- Use one of the following lenses to modify other fields as desired:
134134--
135−-- * 'osProperties'
135+-- * 'osAddtional'
136136operationSchema
137− :: HashMap Text JSONValue -- ^ 'properties'
137+ :: HashMap Text JSONValue -- ^ 'addtional'
138138 -> OperationSchema
139−operationSchema pOsProperties_ =
139+operationSchema pOsAddtional_ =
140140 OperationSchema
141− { _osProperties = pOsProperties_
141+ { _osAddtional = pOsAddtional_
142142 }
143143
144144-- | Properties of the object. Contains field \'ype with type URL.
145−osProperties :: Lens' OperationSchema (HashMap Text JSONValue)
146−osProperties
147− = lens _osProperties (\ s a -> s{_osProperties = a})
145+osAddtional :: Lens' OperationSchema (HashMap Text JSONValue)
146+osAddtional
147+ = lens _osAddtional (\ s a -> s{_osAddtional = a})
148148
149149instance FromJSON OperationSchema where
150150 parseJSON
@@ -152,7 +152,7 @@ instance FromJSON OperationSchema where
152152 (\ o -> OperationSchema <$> (parseJSONObject o))
153153
154154instance ToJSON OperationSchema where
155− toJSON = toJSON . _osProperties
155+ toJSON = toJSON . _osAddtional
156156
157157-- | Configuration for traffic splitting for versions within a single module.
158158-- Traffic splitting allows traffic directed to the module to be assigned
@@ -683,26 +683,25 @@ instance ToJSON APIConfigHandler where
683683--
684684-- /See:/ 'versionEnvVariables' smart constructor.
685685newtype VersionEnvVariables = VersionEnvVariables
686− { _vevProperties :: HashMap Text Text
686+ { _vevAddtional :: HashMap Text Text
687687 } deriving (Eq,Show,Data,Typeable,Generic)
688688
689689-- | Creates a value of 'VersionEnvVariables' with the minimum fields required to make a request.
690690--
691691-- Use one of the following lenses to modify other fields as desired:
692692--
693−-- * 'vevProperties'
693+-- * 'vevAddtional'
694694versionEnvVariables
695− :: HashMap Text Text -- ^ 'properties'
695+ :: HashMap Text Text -- ^ 'addtional'
696696 -> VersionEnvVariables
697−versionEnvVariables pVevProperties_ =
697+versionEnvVariables pVevAddtional_ =
698698 VersionEnvVariables
699− { _vevProperties = pVevProperties_
699+ { _vevAddtional = pVevAddtional_
700700 }
701701
702−vevProperties :: Lens' VersionEnvVariables (HashMap Text Text)
703−vevProperties
704− = lens _vevProperties
705− (\ s a -> s{_vevProperties = a})
702+vevAddtional :: Lens' VersionEnvVariables (HashMap Text Text)
703+vevAddtional
704+ = lens _vevAddtional (\ s a -> s{_vevAddtional = a})
706705
707706instance FromJSON VersionEnvVariables where
708707 parseJSON
@@ -710,7 +709,7 @@ instance FromJSON VersionEnvVariables where
710709 (\ o -> VersionEnvVariables <$> (parseJSONObject o))
711710
712711instance ToJSON VersionEnvVariables where
713− toJSON = toJSON . _vevProperties
712+ toJSON = toJSON . _vevAddtional
714713
715714-- | An Application contains the top-level configuration of an App Engine
716715-- application.
@@ -808,26 +807,25 @@ instance ToJSON Application where
808807--
809808-- /See:/ 'versionBetaSettings' smart constructor.
810809newtype VersionBetaSettings = VersionBetaSettings
811− { _vbsProperties :: HashMap Text Text
810+ { _vbsAddtional :: HashMap Text Text
812811 } deriving (Eq,Show,Data,Typeable,Generic)
813812
814813-- | Creates a value of 'VersionBetaSettings' with the minimum fields required to make a request.
815814--
816815-- Use one of the following lenses to modify other fields as desired:
817816--
818−-- * 'vbsProperties'
817+-- * 'vbsAddtional'
819818versionBetaSettings
820− :: HashMap Text Text -- ^ 'properties'
819+ :: HashMap Text Text -- ^ 'addtional'
821820 -> VersionBetaSettings
822−versionBetaSettings pVbsProperties_ =
821+versionBetaSettings pVbsAddtional_ =
823822 VersionBetaSettings
824− { _vbsProperties = pVbsProperties_
823+ { _vbsAddtional = pVbsAddtional_
825824 }
826825
827−vbsProperties :: Lens' VersionBetaSettings (HashMap Text Text)
828−vbsProperties
829− = lens _vbsProperties
830− (\ s a -> s{_vbsProperties = a})
826+vbsAddtional :: Lens' VersionBetaSettings (HashMap Text Text)
827+vbsAddtional
828+ = lens _vbsAddtional (\ s a -> s{_vbsAddtional = a})
831829
832830instance FromJSON VersionBetaSettings where
833831 parseJSON
@@ -835,7 +833,7 @@ instance FromJSON VersionBetaSettings where
835833 (\ o -> VersionBetaSettings <$> (parseJSONObject o))
836834
837835instance ToJSON VersionBetaSettings where
838− toJSON = toJSON . _vbsProperties
836+ toJSON = toJSON . _vbsAddtional
839837
840838-- | This resource represents a long-running operation that is the result of
841839-- a network API call.
@@ -995,26 +993,26 @@ instance ToJSON URLDispatchRule where
995993--
996994-- /See:/ 'staticDirectoryHandlerHTTPHeaders' smart constructor.
997995newtype StaticDirectoryHandlerHTTPHeaders = StaticDirectoryHandlerHTTPHeaders
998− { _sdhhttphProperties :: HashMap Text Text
996+ { _sdhhttphAddtional :: HashMap Text Text
999997 } deriving (Eq,Show,Data,Typeable,Generic)
1000998
1001999-- | Creates a value of 'StaticDirectoryHandlerHTTPHeaders' with the minimum fields required to make a request.
10021000--
10031001-- Use one of the following lenses to modify other fields as desired:
10041002--
1005−-- * 'sdhhttphProperties'
1003+-- * 'sdhhttphAddtional'
10061004staticDirectoryHandlerHTTPHeaders
1007− :: HashMap Text Text -- ^ 'properties'
1005+ :: HashMap Text Text -- ^ 'addtional'
10081006 -> StaticDirectoryHandlerHTTPHeaders
1009−staticDirectoryHandlerHTTPHeaders pSdhhttphProperties_ =
1007+staticDirectoryHandlerHTTPHeaders pSdhhttphAddtional_ =
10101008 StaticDirectoryHandlerHTTPHeaders
1011− { _sdhhttphProperties = pSdhhttphProperties_
1009+ { _sdhhttphAddtional = pSdhhttphAddtional_
10121010 }
10131011
1014−sdhhttphProperties :: Lens' StaticDirectoryHandlerHTTPHeaders (HashMap Text Text)
1015−sdhhttphProperties
1016− = lens _sdhhttphProperties
1017− (\ s a -> s{_sdhhttphProperties = a})
1012+sdhhttphAddtional :: Lens' StaticDirectoryHandlerHTTPHeaders (HashMap Text Text)
1013+sdhhttphAddtional
1014+ = lens _sdhhttphAddtional
1015+ (\ s a -> s{_sdhhttphAddtional = a})
10181016
10191017instance FromJSON StaticDirectoryHandlerHTTPHeaders
10201018 where
@@ -1026,7 +1024,7 @@ instance FromJSON StaticDirectoryHandlerHTTPHeaders
10261024
10271025instance ToJSON StaticDirectoryHandlerHTTPHeaders
10281026 where
1029− toJSON = toJSON . _sdhhttphProperties
1027+ toJSON = toJSON . _sdhhttphAddtional
10301028
10311029-- | Response message for \`Versions.ListVersions\`.
10321030--
@@ -1375,27 +1373,26 @@ instance ToJSON APIEndpointHandler where
13751373--
13761374-- /See:/ 'statusDetailsItem' smart constructor.
13771375newtype StatusDetailsItem = StatusDetailsItem
1378− { _sdiProperties :: HashMap Text JSONValue
1376+ { _sdiAddtional :: HashMap Text JSONValue
13791377 } deriving (Eq,Show,Data,Typeable,Generic)
13801378
13811379-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
13821380--
13831381-- Use one of the following lenses to modify other fields as desired:
13841382--
1385−-- * 'sdiProperties'
1383+-- * 'sdiAddtional'
13861384statusDetailsItem
1387− :: HashMap Text JSONValue -- ^ 'properties'
1385+ :: HashMap Text JSONValue -- ^ 'addtional'
13881386 -> StatusDetailsItem
1389−statusDetailsItem pSdiProperties_ =
1387+statusDetailsItem pSdiAddtional_ =
13901388 StatusDetailsItem
1391− { _sdiProperties = pSdiProperties_
1389+ { _sdiAddtional = pSdiAddtional_
13921390 }
13931391
13941392-- | Properties of the object. Contains field \'ype with type URL.
1395−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1396−sdiProperties
1397− = lens _sdiProperties
1398− (\ s a -> s{_sdiProperties = a})
1393+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1394+sdiAddtional
1395+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
13991396
14001397instance FromJSON StatusDetailsItem where
14011398 parseJSON
@@ -1403,7 +1400,7 @@ instance FromJSON StatusDetailsItem where
14031400 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
14041401
14051402instance ToJSON StatusDetailsItem where
1406− toJSON = toJSON . _sdiProperties
1403+ toJSON = toJSON . _sdiAddtional
14071404
14081405-- | Used to specify extra network settings (for VM runtimes only).
14091406--
@@ -1473,26 +1470,26 @@ instance ToJSON Network where
14731470--
14741471-- /See:/ 'staticFilesHandlerHTTPHeaders' smart constructor.
14751472newtype StaticFilesHandlerHTTPHeaders = StaticFilesHandlerHTTPHeaders
1476− { _sfhhttphProperties :: HashMap Text Text
1473+ { _sfhhttphAddtional :: HashMap Text Text
14771474 } deriving (Eq,Show,Data,Typeable,Generic)
14781475
14791476-- | Creates a value of 'StaticFilesHandlerHTTPHeaders' with the minimum fields required to make a request.
14801477--
14811478-- Use one of the following lenses to modify other fields as desired:
14821479--
1483−-- * 'sfhhttphProperties'
1480+-- * 'sfhhttphAddtional'
14841481staticFilesHandlerHTTPHeaders
1485− :: HashMap Text Text -- ^ 'properties'
1482+ :: HashMap Text Text -- ^ 'addtional'
14861483 -> StaticFilesHandlerHTTPHeaders
1487−staticFilesHandlerHTTPHeaders pSfhhttphProperties_ =
1484+staticFilesHandlerHTTPHeaders pSfhhttphAddtional_ =
14881485 StaticFilesHandlerHTTPHeaders
1489− { _sfhhttphProperties = pSfhhttphProperties_
1486+ { _sfhhttphAddtional = pSfhhttphAddtional_
14901487 }
14911488
1492−sfhhttphProperties :: Lens' StaticFilesHandlerHTTPHeaders (HashMap Text Text)
1493−sfhhttphProperties
1494− = lens _sfhhttphProperties
1495− (\ s a -> s{_sfhhttphProperties = a})
1489+sfhhttphAddtional :: Lens' StaticFilesHandlerHTTPHeaders (HashMap Text Text)
1490+sfhhttphAddtional
1491+ = lens _sfhhttphAddtional
1492+ (\ s a -> s{_sfhhttphAddtional = a})
14961493
14971494instance FromJSON StaticFilesHandlerHTTPHeaders where
14981495 parseJSON
@@ -1502,7 +1499,7 @@ instance FromJSON StaticFilesHandlerHTTPHeaders where
15021499 (parseJSONObject o))
15031500
15041501instance ToJSON StaticFilesHandlerHTTPHeaders where
1505− toJSON = toJSON . _sfhhttphProperties
1502+ toJSON = toJSON . _sfhhttphAddtional
15061503
15071504-- | Used to specify how many machine resources an app version needs.
15081505--
@@ -1565,25 +1562,25 @@ instance ToJSON Resources where
15651562--
15661563-- /See:/ 'deploymentFiles' smart constructor.
15671564newtype DeploymentFiles = DeploymentFiles
1568− { _dfProperties :: HashMap Text FileInfo
1565+ { _dfAddtional :: HashMap Text FileInfo
15691566 } deriving (Eq,Show,Data,Typeable,Generic)
15701567
15711568-- | Creates a value of 'DeploymentFiles' with the minimum fields required to make a request.
15721569--
15731570-- Use one of the following lenses to modify other fields as desired:
15741571--
1575−-- * 'dfProperties'
1572+-- * 'dfAddtional'
15761573deploymentFiles
1577− :: HashMap Text FileInfo -- ^ 'properties'
1574+ :: HashMap Text FileInfo -- ^ 'addtional'
15781575 -> DeploymentFiles
1579−deploymentFiles pDfProperties_ =
1576+deploymentFiles pDfAddtional_ =
15801577 DeploymentFiles
1581− { _dfProperties = pDfProperties_
1578+ { _dfAddtional = pDfAddtional_
15821579 }
15831580
1584−dfProperties :: Lens' DeploymentFiles (HashMap Text FileInfo)
1585−dfProperties
1586− = lens _dfProperties (\ s a -> s{_dfProperties = a})
1581+dfAddtional :: Lens' DeploymentFiles (HashMap Text FileInfo)
1582+dfAddtional
1583+ = lens _dfAddtional (\ s a -> s{_dfAddtional = a})
15871584
15881585instance FromJSON DeploymentFiles where
15891586 parseJSON
@@ -1591,7 +1588,7 @@ instance FromJSON DeploymentFiles where
15911588 (\ o -> DeploymentFiles <$> (parseJSONObject o))
15921589
15931590instance ToJSON DeploymentFiles where
1594− toJSON = toJSON . _dfProperties
1591+ toJSON = toJSON . _dfAddtional
15951592
15961593-- | Target scaling by CPU usage.
15971594--
@@ -1655,26 +1652,25 @@ instance ToJSON CPUUtilization where
16551652--
16561653-- /See:/ 'trafficSplitAllocations' smart constructor.
16571654newtype TrafficSplitAllocations = TrafficSplitAllocations
1658− { _tsaProperties :: HashMap Text Double
1655+ { _tsaAddtional :: HashMap Text Double
16591656 } deriving (Eq,Show,Data,Typeable,Generic)
16601657
16611658-- | Creates a value of 'TrafficSplitAllocations' with the minimum fields required to make a request.
16621659--
16631660-- Use one of the following lenses to modify other fields as desired:
16641661--
1665−-- * 'tsaProperties'
1662+-- * 'tsaAddtional'
16661663trafficSplitAllocations
1667− :: HashMap Text Double -- ^ 'properties'
1664+ :: HashMap Text Double -- ^ 'addtional'
16681665 -> TrafficSplitAllocations
1669−trafficSplitAllocations pTsaProperties_ =
1666+trafficSplitAllocations pTsaAddtional_ =
16701667 TrafficSplitAllocations
1671− { _tsaProperties = pTsaProperties_
1668+ { _tsaAddtional = pTsaAddtional_
16721669 }
16731670
1674−tsaProperties :: Lens' TrafficSplitAllocations (HashMap Text Double)
1675−tsaProperties
1676− = lens _tsaProperties
1677− (\ s a -> s{_tsaProperties = a})
1671+tsaAddtional :: Lens' TrafficSplitAllocations (HashMap Text Double)
1672+tsaAddtional
1673+ = lens _tsaAddtional (\ s a -> s{_tsaAddtional = a})
16781674
16791675instance FromJSON TrafficSplitAllocations where
16801676 parseJSON
@@ -1683,7 +1679,7 @@ instance FromJSON TrafficSplitAllocations where
16831679 TrafficSplitAllocations <$> (parseJSONObject o))
16841680
16851681instance ToJSON TrafficSplitAllocations where
1686− toJSON = toJSON . _tsaProperties
1682+ toJSON = toJSON . _tsaAddtional
16871683
16881684-- | A module with manual scaling runs continuously, allowing you to perform
16891685-- complex initialization and rely on the state of its memory over time.
@@ -2538,26 +2534,26 @@ instance ToJSON SourceReference where
25382534--
25392535-- /See:/ 'operationResponse' smart constructor.
25402536newtype OperationResponse = OperationResponse
2541− { _orProperties :: HashMap Text JSONValue
2537+ { _orAddtional :: HashMap Text JSONValue
25422538 } deriving (Eq,Show,Data,Typeable,Generic)
25432539
25442540-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
25452541--
25462542-- Use one of the following lenses to modify other fields as desired:
25472543--
2548−-- * 'orProperties'
2544+-- * 'orAddtional'
25492545operationResponse
2550− :: HashMap Text JSONValue -- ^ 'properties'
2546+ :: HashMap Text JSONValue -- ^ 'addtional'
25512547 -> OperationResponse
2552−operationResponse pOrProperties_ =
2548+operationResponse pOrAddtional_ =
25532549 OperationResponse
2554− { _orProperties = pOrProperties_
2550+ { _orAddtional = pOrAddtional_
25552551 }
25562552
25572553-- | Properties of the object. Contains field \'ype with type URL.
2558−orProperties :: Lens' OperationResponse (HashMap Text JSONValue)
2559−orProperties
2560− = lens _orProperties (\ s a -> s{_orProperties = a})
2554+orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
2555+orAddtional
2556+ = lens _orAddtional (\ s a -> s{_orAddtional = a})
25612557
25622558instance FromJSON OperationResponse where
25632559 parseJSON
@@ -2565,7 +2561,7 @@ instance FromJSON OperationResponse where
25652561 (\ o -> OperationResponse <$> (parseJSONObject o))
25662562
25672563instance ToJSON OperationResponse where
2568− toJSON = toJSON . _orProperties
2564+ toJSON = toJSON . _orAddtional
25692565
25702566-- | A Docker (container) image which should be used to start the
25712567-- application.
gogol-apps-calendar/gen/Network/Google/AppsCalendar.hs+8−8
@@ -213,7 +213,7 @@ module Network.Google.AppsCalendar
213213 -- ** ColorsEvent
214214 , ColorsEvent
215215 , colorsEvent
216− , ceProperties
216+ , ceAddtional
217217
218218 -- ** Settings
219219 , Settings
@@ -298,7 +298,7 @@ module Network.Google.AppsCalendar
298298 -- ** FreeBusyResponseGroups
299299 , FreeBusyResponseGroups
300300 , freeBusyResponseGroups
301− , fbrgProperties
301+ , fbrgAddtional
302302
303303 -- ** EventReminders
304304 , EventReminders
@@ -309,7 +309,7 @@ module Network.Google.AppsCalendar
309309 -- ** ColorsCalendar
310310 , ColorsCalendar
311311 , colorsCalendar
312− , ccProperties
312+ , ccAddtional
313313
314314 -- ** CalendarNotification
315315 , CalendarNotification
@@ -320,12 +320,12 @@ module Network.Google.AppsCalendar
320320 -- ** EventExtendedPropertiesPrivate
321321 , EventExtendedPropertiesPrivate
322322 , eventExtendedPropertiesPrivate
323− , eeppProperties
323+ , eeppAddtional
324324
325325 -- ** ChannelParams
326326 , ChannelParams
327327 , channelParams
328− , cpProperties
328+ , cpAddtional
329329
330330 -- ** Events
331331 , Events
@@ -430,7 +430,7 @@ module Network.Google.AppsCalendar
430430 -- ** EventGadgetPreferences
431431 , EventGadgetPreferences
432432 , eventGadgetPreferences
433− , egpProperties
433+ , egpAddtional
434434
435435 -- ** FreeBusyRequest
436436 , FreeBusyRequest
@@ -457,7 +457,7 @@ module Network.Google.AppsCalendar
457457 -- ** EventExtendedPropertiesShared
458458 , EventExtendedPropertiesShared
459459 , eventExtendedPropertiesShared
460− , eepsProperties
460+ , eepsAddtional
461461
462462 -- ** CalendarListWatchMinAccessRole
463463 , CalendarListWatchMinAccessRole (..)
@@ -465,7 +465,7 @@ module Network.Google.AppsCalendar
465465 -- ** FreeBusyResponseCalendars
466466 , FreeBusyResponseCalendars
467467 , freeBusyResponseCalendars
468− , fbrcProperties
468+ , fbrcAddtional
469469
470470 -- ** ACL
471471 , ACL
gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types.hs+8−8
@@ -95,7 +95,7 @@ module Network.Google.AppsCalendar.Types
9595 -- * ColorsEvent
9696 , ColorsEvent
9797 , colorsEvent
98− , ceProperties
98+ , ceAddtional
9999
100100 -- * Settings
101101 , Settings
@@ -180,7 +180,7 @@ module Network.Google.AppsCalendar.Types
180180 -- * FreeBusyResponseGroups
181181 , FreeBusyResponseGroups
182182 , freeBusyResponseGroups
183− , fbrgProperties
183+ , fbrgAddtional
184184
185185 -- * EventReminders
186186 , EventReminders
@@ -191,7 +191,7 @@ module Network.Google.AppsCalendar.Types
191191 -- * ColorsCalendar
192192 , ColorsCalendar
193193 , colorsCalendar
194− , ccProperties
194+ , ccAddtional
195195
196196 -- * CalendarNotification
197197 , CalendarNotification
@@ -202,12 +202,12 @@ module Network.Google.AppsCalendar.Types
202202 -- * EventExtendedPropertiesPrivate
203203 , EventExtendedPropertiesPrivate
204204 , eventExtendedPropertiesPrivate
205− , eeppProperties
205+ , eeppAddtional
206206
207207 -- * ChannelParams
208208 , ChannelParams
209209 , channelParams
210− , cpProperties
210+ , cpAddtional
211211
212212 -- * Events
213213 , Events
@@ -312,7 +312,7 @@ module Network.Google.AppsCalendar.Types
312312 -- * EventGadgetPreferences
313313 , EventGadgetPreferences
314314 , eventGadgetPreferences
315− , egpProperties
315+ , egpAddtional
316316
317317 -- * FreeBusyRequest
318318 , FreeBusyRequest
@@ -339,7 +339,7 @@ module Network.Google.AppsCalendar.Types
339339 -- * EventExtendedPropertiesShared
340340 , EventExtendedPropertiesShared
341341 , eventExtendedPropertiesShared
342− , eepsProperties
342+ , eepsAddtional
343343
344344 -- * CalendarListWatchMinAccessRole
345345 , CalendarListWatchMinAccessRole (..)
@@ -347,7 +347,7 @@ module Network.Google.AppsCalendar.Types
347347 -- * FreeBusyResponseCalendars
348348 , FreeBusyResponseCalendars
349349 , freeBusyResponseCalendars
350− , fbrcProperties
350+ , fbrcAddtional
351351
352352 -- * ACL
353353 , ACL
gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+76−77
@@ -873,26 +873,26 @@ instance ToJSON ACLRuleScope where
873873--
874874-- /See:/ 'colorsEvent' smart constructor.
875875newtype ColorsEvent = ColorsEvent
876− { _ceProperties :: HashMap Text ColorDefinition
876+ { _ceAddtional :: HashMap Text ColorDefinition
877877 } deriving (Eq,Show,Data,Typeable,Generic)
878878
879879-- | Creates a value of 'ColorsEvent' with the minimum fields required to make a request.
880880--
881881-- Use one of the following lenses to modify other fields as desired:
882882--
883−-- * 'ceProperties'
883+-- * 'ceAddtional'
884884colorsEvent
885− :: HashMap Text ColorDefinition -- ^ 'properties'
885+ :: HashMap Text ColorDefinition -- ^ 'addtional'
886886 -> ColorsEvent
887−colorsEvent pCeProperties_ =
887+colorsEvent pCeAddtional_ =
888888 ColorsEvent
889− { _ceProperties = pCeProperties_
889+ { _ceAddtional = pCeAddtional_
890890 }
891891
892892-- | An event color definition.
893−ceProperties :: Lens' ColorsEvent (HashMap Text ColorDefinition)
894−ceProperties
895− = lens _ceProperties (\ s a -> s{_ceProperties = a})
893+ceAddtional :: Lens' ColorsEvent (HashMap Text ColorDefinition)
894+ceAddtional
895+ = lens _ceAddtional (\ s a -> s{_ceAddtional = a})
896896
897897instance FromJSON ColorsEvent where
898898 parseJSON
@@ -900,7 +900,7 @@ instance FromJSON ColorsEvent where
900900 (\ o -> ColorsEvent <$> (parseJSONObject o))
901901
902902instance ToJSON ColorsEvent where
903− toJSON = toJSON . _ceProperties
903+ toJSON = toJSON . _ceAddtional
904904
905905--
906906-- /See:/ 'settings' smart constructor.
@@ -1556,27 +1556,27 @@ instance ToJSON Setting where
15561556--
15571557-- /See:/ 'freeBusyResponseGroups' smart constructor.
15581558newtype FreeBusyResponseGroups = FreeBusyResponseGroups
1559− { _fbrgProperties :: HashMap Text FreeBusyGroup
1559+ { _fbrgAddtional :: HashMap Text FreeBusyGroup
15601560 } deriving (Eq,Show,Data,Typeable,Generic)
15611561
15621562-- | Creates a value of 'FreeBusyResponseGroups' with the minimum fields required to make a request.
15631563--
15641564-- Use one of the following lenses to modify other fields as desired:
15651565--
1566−-- * 'fbrgProperties'
1566+-- * 'fbrgAddtional'
15671567freeBusyResponseGroups
1568− :: HashMap Text FreeBusyGroup -- ^ 'properties'
1568+ :: HashMap Text FreeBusyGroup -- ^ 'addtional'
15691569 -> FreeBusyResponseGroups
1570−freeBusyResponseGroups pFbrgProperties_ =
1570+freeBusyResponseGroups pFbrgAddtional_ =
15711571 FreeBusyResponseGroups
1572− { _fbrgProperties = pFbrgProperties_
1572+ { _fbrgAddtional = pFbrgAddtional_
15731573 }
15741574
15751575-- | List of calendars that are members of this group.
1576−fbrgProperties :: Lens' FreeBusyResponseGroups (HashMap Text FreeBusyGroup)
1577−fbrgProperties
1578− = lens _fbrgProperties
1579− (\ s a -> s{_fbrgProperties = a})
1576+fbrgAddtional :: Lens' FreeBusyResponseGroups (HashMap Text FreeBusyGroup)
1577+fbrgAddtional
1578+ = lens _fbrgAddtional
1579+ (\ s a -> s{_fbrgAddtional = a})
15801580
15811581instance FromJSON FreeBusyResponseGroups where
15821582 parseJSON
@@ -1585,7 +1585,7 @@ instance FromJSON FreeBusyResponseGroups where
15851585 FreeBusyResponseGroups <$> (parseJSONObject o))
15861586
15871587instance ToJSON FreeBusyResponseGroups where
1588− toJSON = toJSON . _fbrgProperties
1588+ toJSON = toJSON . _fbrgAddtional
15891589
15901590-- | Information about the event\'s reminders for the authenticated user.
15911591--
@@ -1646,26 +1646,26 @@ instance ToJSON EventReminders where
16461646--
16471647-- /See:/ 'colorsCalendar' smart constructor.
16481648newtype ColorsCalendar = ColorsCalendar
1649− { _ccProperties :: HashMap Text ColorDefinition
1649+ { _ccAddtional :: HashMap Text ColorDefinition
16501650 } deriving (Eq,Show,Data,Typeable,Generic)
16511651
16521652-- | Creates a value of 'ColorsCalendar' with the minimum fields required to make a request.
16531653--
16541654-- Use one of the following lenses to modify other fields as desired:
16551655--
1656−-- * 'ccProperties'
1656+-- * 'ccAddtional'
16571657colorsCalendar
1658− :: HashMap Text ColorDefinition -- ^ 'properties'
1658+ :: HashMap Text ColorDefinition -- ^ 'addtional'
16591659 -> ColorsCalendar
1660−colorsCalendar pCcProperties_ =
1660+colorsCalendar pCcAddtional_ =
16611661 ColorsCalendar
1662− { _ccProperties = pCcProperties_
1662+ { _ccAddtional = pCcAddtional_
16631663 }
16641664
16651665-- | A calendar color defintion.
1666−ccProperties :: Lens' ColorsCalendar (HashMap Text ColorDefinition)
1667−ccProperties
1668− = lens _ccProperties (\ s a -> s{_ccProperties = a})
1666+ccAddtional :: Lens' ColorsCalendar (HashMap Text ColorDefinition)
1667+ccAddtional
1668+ = lens _ccAddtional (\ s a -> s{_ccAddtional = a})
16691669
16701670instance FromJSON ColorsCalendar where
16711671 parseJSON
@@ -1673,7 +1673,7 @@ instance FromJSON ColorsCalendar where
16731673 (\ o -> ColorsCalendar <$> (parseJSONObject o))
16741674
16751675instance ToJSON ColorsCalendar where
1676− toJSON = toJSON . _ccProperties
1676+ toJSON = toJSON . _ccAddtional
16771677
16781678--
16791679-- /See:/ 'calendarNotification' smart constructor.
@@ -1734,27 +1734,27 @@ instance ToJSON CalendarNotification where
17341734--
17351735-- /See:/ 'eventExtendedPropertiesPrivate' smart constructor.
17361736newtype EventExtendedPropertiesPrivate = EventExtendedPropertiesPrivate
1737− { _eeppProperties :: HashMap Text Text
1737+ { _eeppAddtional :: HashMap Text Text
17381738 } deriving (Eq,Show,Data,Typeable,Generic)
17391739
17401740-- | Creates a value of 'EventExtendedPropertiesPrivate' with the minimum fields required to make a request.
17411741--
17421742-- Use one of the following lenses to modify other fields as desired:
17431743--
1744−-- * 'eeppProperties'
1744+-- * 'eeppAddtional'
17451745eventExtendedPropertiesPrivate
1746− :: HashMap Text Text -- ^ 'properties'
1746+ :: HashMap Text Text -- ^ 'addtional'
17471747 -> EventExtendedPropertiesPrivate
1748−eventExtendedPropertiesPrivate pEeppProperties_ =
1748+eventExtendedPropertiesPrivate pEeppAddtional_ =
17491749 EventExtendedPropertiesPrivate
1750− { _eeppProperties = pEeppProperties_
1750+ { _eeppAddtional = pEeppAddtional_
17511751 }
17521752
17531753-- | The name of the private property and the corresponding value.
1754−eeppProperties :: Lens' EventExtendedPropertiesPrivate (HashMap Text Text)
1755−eeppProperties
1756− = lens _eeppProperties
1757− (\ s a -> s{_eeppProperties = a})
1754+eeppAddtional :: Lens' EventExtendedPropertiesPrivate (HashMap Text Text)
1755+eeppAddtional
1756+ = lens _eeppAddtional
1757+ (\ s a -> s{_eeppAddtional = a})
17581758
17591759instance FromJSON EventExtendedPropertiesPrivate
17601760 where
@@ -1765,32 +1765,32 @@ instance FromJSON EventExtendedPropertiesPrivate
17651765 (parseJSONObject o))
17661766
17671767instance ToJSON EventExtendedPropertiesPrivate where
1768− toJSON = toJSON . _eeppProperties
1768+ toJSON = toJSON . _eeppAddtional
17691769
17701770-- | Additional parameters controlling delivery channel behavior. Optional.
17711771--
17721772-- /See:/ 'channelParams' smart constructor.
17731773newtype ChannelParams = ChannelParams
1774− { _cpProperties :: HashMap Text Text
1774+ { _cpAddtional :: HashMap Text Text
17751775 } deriving (Eq,Show,Data,Typeable,Generic)
17761776
17771777-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
17781778--
17791779-- Use one of the following lenses to modify other fields as desired:
17801780--
1781−-- * 'cpProperties'
1781+-- * 'cpAddtional'
17821782channelParams
1783− :: HashMap Text Text -- ^ 'properties'
1783+ :: HashMap Text Text -- ^ 'addtional'
17841784 -> ChannelParams
1785−channelParams pCpProperties_ =
1785+channelParams pCpAddtional_ =
17861786 ChannelParams
1787− { _cpProperties = pCpProperties_
1787+ { _cpAddtional = pCpAddtional_
17881788 }
17891789
17901790-- | Declares a new parameter by name.
1791−cpProperties :: Lens' ChannelParams (HashMap Text Text)
1792−cpProperties
1793− = lens _cpProperties (\ s a -> s{_cpProperties = a})
1791+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
1792+cpAddtional
1793+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
17941794
17951795instance FromJSON ChannelParams where
17961796 parseJSON
@@ -1798,7 +1798,7 @@ instance FromJSON ChannelParams where
17981798 (\ o -> ChannelParams <$> (parseJSONObject o))
17991799
18001800instance ToJSON ChannelParams where
1801− toJSON = toJSON . _cpProperties
1801+ toJSON = toJSON . _cpAddtional
18021802
18031803--
18041804-- /See:/ 'events' smart constructor.
@@ -2724,27 +2724,26 @@ instance ToJSON EventGadget where
27242724--
27252725-- /See:/ 'eventGadgetPreferences' smart constructor.
27262726newtype EventGadgetPreferences = EventGadgetPreferences
2727− { _egpProperties :: HashMap Text Text
2727+ { _egpAddtional :: HashMap Text Text
27282728 } deriving (Eq,Show,Data,Typeable,Generic)
27292729
27302730-- | Creates a value of 'EventGadgetPreferences' with the minimum fields required to make a request.
27312731--
27322732-- Use one of the following lenses to modify other fields as desired:
27332733--
2734−-- * 'egpProperties'
2734+-- * 'egpAddtional'
27352735eventGadgetPreferences
2736− :: HashMap Text Text -- ^ 'properties'
2736+ :: HashMap Text Text -- ^ 'addtional'
27372737 -> EventGadgetPreferences
2738−eventGadgetPreferences pEgpProperties_ =
2738+eventGadgetPreferences pEgpAddtional_ =
27392739 EventGadgetPreferences
2740− { _egpProperties = pEgpProperties_
2740+ { _egpAddtional = pEgpAddtional_
27412741 }
27422742
27432743-- | The preference name and corresponding value.
2744−egpProperties :: Lens' EventGadgetPreferences (HashMap Text Text)
2745−egpProperties
2746− = lens _egpProperties
2747− (\ s a -> s{_egpProperties = a})
2744+egpAddtional :: Lens' EventGadgetPreferences (HashMap Text Text)
2745+egpAddtional
2746+ = lens _egpAddtional (\ s a -> s{_egpAddtional = a})
27482747
27492748instance FromJSON EventGadgetPreferences where
27502749 parseJSON
@@ -2753,7 +2752,7 @@ instance FromJSON EventGadgetPreferences where
27532752 EventGadgetPreferences <$> (parseJSONObject o))
27542753
27552754instance ToJSON EventGadgetPreferences where
2756− toJSON = toJSON . _egpProperties
2755+ toJSON = toJSON . _egpAddtional
27572756
27582757--
27592758-- /See:/ 'freeBusyRequest' smart constructor.
@@ -2940,27 +2939,27 @@ instance ToJSON ACLRule where
29402939--
29412940-- /See:/ 'eventExtendedPropertiesShared' smart constructor.
29422941newtype EventExtendedPropertiesShared = EventExtendedPropertiesShared
2943− { _eepsProperties :: HashMap Text Text
2942+ { _eepsAddtional :: HashMap Text Text
29442943 } deriving (Eq,Show,Data,Typeable,Generic)
29452944
29462945-- | Creates a value of 'EventExtendedPropertiesShared' with the minimum fields required to make a request.
29472946--
29482947-- Use one of the following lenses to modify other fields as desired:
29492948--
2950−-- * 'eepsProperties'
2949+-- * 'eepsAddtional'
29512950eventExtendedPropertiesShared
2952− :: HashMap Text Text -- ^ 'properties'
2951+ :: HashMap Text Text -- ^ 'addtional'
29532952 -> EventExtendedPropertiesShared
2954−eventExtendedPropertiesShared pEepsProperties_ =
2953+eventExtendedPropertiesShared pEepsAddtional_ =
29552954 EventExtendedPropertiesShared
2956− { _eepsProperties = pEepsProperties_
2955+ { _eepsAddtional = pEepsAddtional_
29572956 }
29582957
29592958-- | The name of the shared property and the corresponding value.
2960−eepsProperties :: Lens' EventExtendedPropertiesShared (HashMap Text Text)
2961−eepsProperties
2962− = lens _eepsProperties
2963− (\ s a -> s{_eepsProperties = a})
2959+eepsAddtional :: Lens' EventExtendedPropertiesShared (HashMap Text Text)
2960+eepsAddtional
2961+ = lens _eepsAddtional
2962+ (\ s a -> s{_eepsAddtional = a})
29642963
29652964instance FromJSON EventExtendedPropertiesShared where
29662965 parseJSON
@@ -2970,33 +2969,33 @@ instance FromJSON EventExtendedPropertiesShared where
29702969 (parseJSONObject o))
29712970
29722971instance ToJSON EventExtendedPropertiesShared where
2973− toJSON = toJSON . _eepsProperties
2972+ toJSON = toJSON . _eepsAddtional
29742973
29752974-- | List of free\/busy information for calendars.
29762975--
29772976-- /See:/ 'freeBusyResponseCalendars' smart constructor.
29782977newtype FreeBusyResponseCalendars = FreeBusyResponseCalendars
2979− { _fbrcProperties :: HashMap Text FreeBusyCalendar
2978+ { _fbrcAddtional :: HashMap Text FreeBusyCalendar
29802979 } deriving (Eq,Show,Data,Typeable,Generic)
29812980
29822981-- | Creates a value of 'FreeBusyResponseCalendars' with the minimum fields required to make a request.
29832982--
29842983-- Use one of the following lenses to modify other fields as desired:
29852984--
2986−-- * 'fbrcProperties'
2985+-- * 'fbrcAddtional'
29872986freeBusyResponseCalendars
2988− :: HashMap Text FreeBusyCalendar -- ^ 'properties'
2987+ :: HashMap Text FreeBusyCalendar -- ^ 'addtional'
29892988 -> FreeBusyResponseCalendars
2990−freeBusyResponseCalendars pFbrcProperties_ =
2989+freeBusyResponseCalendars pFbrcAddtional_ =
29912990 FreeBusyResponseCalendars
2992− { _fbrcProperties = pFbrcProperties_
2991+ { _fbrcAddtional = pFbrcAddtional_
29932992 }
29942993
29952994-- | Free\/busy expansions for a single calendar.
2996−fbrcProperties :: Lens' FreeBusyResponseCalendars (HashMap Text FreeBusyCalendar)
2997−fbrcProperties
2998− = lens _fbrcProperties
2999− (\ s a -> s{_fbrcProperties = a})
2995+fbrcAddtional :: Lens' FreeBusyResponseCalendars (HashMap Text FreeBusyCalendar)
2996+fbrcAddtional
2997+ = lens _fbrcAddtional
2998+ (\ s a -> s{_fbrcAddtional = a})
30002999
30013000instance FromJSON FreeBusyResponseCalendars where
30023001 parseJSON
@@ -3005,7 +3004,7 @@ instance FromJSON FreeBusyResponseCalendars where
30053004 FreeBusyResponseCalendars <$> (parseJSONObject o))
30063005
30073006instance ToJSON FreeBusyResponseCalendars where
3008− toJSON = toJSON . _fbrcProperties
3007+ toJSON = toJSON . _fbrcAddtional
30093008
30103009--
30113010-- /See:/ 'acl' smart constructor.
gogol-bigquery/gen/Network/Google/BigQuery.hs+2−2
@@ -383,7 +383,7 @@ module Network.Google.BigQuery
383383 -- ** JSONObject
384384 , JSONObject
385385 , jsonObject
386− , joProperties
386+ , joAddtional
387387
388388 -- ** JobConfigurationQuery
389389 , JobConfigurationQuery
@@ -418,7 +418,7 @@ module Network.Google.BigQuery
418418 -- ** JobConfigurationQueryTableDefinitions
419419 , JobConfigurationQueryTableDefinitions
420420 , jobConfigurationQueryTableDefinitions
421− , jcqtdProperties
421+ , jcqtdAddtional
422422
423423 -- ** TableCell
424424 , TableCell
gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+2−2
@@ -313,7 +313,7 @@ module Network.Google.BigQuery.Types
313313 -- * JSONObject
314314 , JSONObject
315315 , jsonObject
316− , joProperties
316+ , joAddtional
317317
318318 -- * JobConfigurationQuery
319319 , JobConfigurationQuery
@@ -348,7 +348,7 @@ module Network.Google.BigQuery.Types
348348 -- * JobConfigurationQueryTableDefinitions
349349 , JobConfigurationQueryTableDefinitions
350350 , jobConfigurationQueryTableDefinitions
351− , jcqtdProperties
351+ , jcqtdAddtional
352352
353353 -- * TableCell
354354 , TableCell
gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+19−19
@@ -2831,25 +2831,25 @@ instance ToJSON JobCancelResponse where
28312831--
28322832-- /See:/ 'jsonObject' smart constructor.
28332833newtype JSONObject = JSONObject
2834− { _joProperties :: HashMap Text JSONValue
2834+ { _joAddtional :: HashMap Text JSONValue
28352835 } deriving (Eq,Show,Data,Typeable,Generic)
28362836
28372837-- | Creates a value of 'JSONObject' with the minimum fields required to make a request.
28382838--
28392839-- Use one of the following lenses to modify other fields as desired:
28402840--
2841−-- * 'joProperties'
2841+-- * 'joAddtional'
28422842jsonObject
2843− :: HashMap Text JSONValue -- ^ 'properties'
2843+ :: HashMap Text JSONValue -- ^ 'addtional'
28442844 -> JSONObject
2845−jsonObject pJoProperties_ =
2845+jsonObject pJoAddtional_ =
28462846 JSONObject
2847− { _joProperties = pJoProperties_
2847+ { _joAddtional = pJoAddtional_
28482848 }
28492849
2850−joProperties :: Lens' JSONObject (HashMap Text JSONValue)
2851−joProperties
2852− = lens _joProperties (\ s a -> s{_joProperties = a})
2850+joAddtional :: Lens' JSONObject (HashMap Text JSONValue)
2851+joAddtional
2852+ = lens _joAddtional (\ s a -> s{_joAddtional = a})
28532853
28542854instance FromJSON JSONObject where
28552855 parseJSON
@@ -2857,7 +2857,7 @@ instance FromJSON JSONObject where
28572857 (\ o -> JSONObject <$> (parseJSONObject o))
28582858
28592859instance ToJSON JSONObject where
2860− toJSON = toJSON . _joProperties
2860+ toJSON = toJSON . _joAddtional
28612861
28622862--
28632863-- /See:/ 'jobConfigurationQuery' smart constructor.
@@ -3180,26 +3180,26 @@ instance ToJSON JobList where
31803180--
31813181-- /See:/ 'jobConfigurationQueryTableDefinitions' smart constructor.
31823182newtype JobConfigurationQueryTableDefinitions = JobConfigurationQueryTableDefinitions
3183− { _jcqtdProperties :: HashMap Text ExternalDataConfiguration
3183+ { _jcqtdAddtional :: HashMap Text ExternalDataConfiguration
31843184 } deriving (Eq,Show,Data,Typeable,Generic)
31853185
31863186-- | Creates a value of 'JobConfigurationQueryTableDefinitions' with the minimum fields required to make a request.
31873187--
31883188-- Use one of the following lenses to modify other fields as desired:
31893189--
3190−-- * 'jcqtdProperties'
3190+-- * 'jcqtdAddtional'
31913191jobConfigurationQueryTableDefinitions
3192− :: HashMap Text ExternalDataConfiguration -- ^ 'properties'
3192+ :: HashMap Text ExternalDataConfiguration -- ^ 'addtional'
31933193 -> JobConfigurationQueryTableDefinitions
3194−jobConfigurationQueryTableDefinitions pJcqtdProperties_ =
3194+jobConfigurationQueryTableDefinitions pJcqtdAddtional_ =
31953195 JobConfigurationQueryTableDefinitions
3196− { _jcqtdProperties = pJcqtdProperties_
3196+ { _jcqtdAddtional = pJcqtdAddtional_
31973197 }
31983198
3199−jcqtdProperties :: Lens' JobConfigurationQueryTableDefinitions (HashMap Text ExternalDataConfiguration)
3200−jcqtdProperties
3201− = lens _jcqtdProperties
3202− (\ s a -> s{_jcqtdProperties = a})
3199+jcqtdAddtional :: Lens' JobConfigurationQueryTableDefinitions (HashMap Text ExternalDataConfiguration)
3200+jcqtdAddtional
3201+ = lens _jcqtdAddtional
3202+ (\ s a -> s{_jcqtdAddtional = a})
32033203
32043204instance FromJSON
32053205 JobConfigurationQueryTableDefinitions where
@@ -3211,7 +3211,7 @@ instance FromJSON
32113211
32123212instance ToJSON JobConfigurationQueryTableDefinitions
32133213 where
3214− toJSON = toJSON . _jcqtdProperties
3214+ toJSON = toJSON . _jcqtdAddtional
32153215
32163216--
32173217-- /See:/ 'tableCell' smart constructor.
gogol-civicinfo/gen/Network/Google/CivicInfo.hs+2−2
@@ -43,7 +43,7 @@ module Network.Google.CivicInfo
4343 -- ** RepresentativeInfoResponseDivisions
4444 , RepresentativeInfoResponseDivisions
4545 , representativeInfoResponseDivisions
46− , rirdProperties
46+ , rirdAddtional
4747
4848 -- ** VoterInfoResponse
4949 , VoterInfoResponse
@@ -195,7 +195,7 @@ module Network.Google.CivicInfo
195195 -- ** RepresentativeInfoDataDivisions
196196 , RepresentativeInfoDataDivisions
197197 , representativeInfoDataDivisions
198− , riddProperties
198+ , riddAddtional
199199
200200 -- ** RepresentativesRepresentativeInfoByAddressRoles
201201 , RepresentativesRepresentativeInfoByAddressRoles (..)
gogol-civicinfo/gen/Network/Google/CivicInfo/Types.hs+2−2
@@ -21,7 +21,7 @@ module Network.Google.CivicInfo.Types
2121 -- * RepresentativeInfoResponseDivisions
2222 , RepresentativeInfoResponseDivisions
2323 , representativeInfoResponseDivisions
24− , rirdProperties
24+ , rirdAddtional
2525
2626 -- * VoterInfoResponse
2727 , VoterInfoResponse
@@ -173,7 +173,7 @@ module Network.Google.CivicInfo.Types
173173 -- * RepresentativeInfoDataDivisions
174174 , RepresentativeInfoDataDivisions
175175 , representativeInfoDataDivisions
176− , riddProperties
176+ , riddAddtional
177177
178178 -- * RepresentativesRepresentativeInfoByAddressRoles
179179 , RepresentativesRepresentativeInfoByAddressRoles (..)
gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+20−20
@@ -24,27 +24,27 @@ import Network.Google.Prelude
2424--
2525-- /See:/ 'representativeInfoResponseDivisions' smart constructor.
2626newtype RepresentativeInfoResponseDivisions = RepresentativeInfoResponseDivisions
27− { _rirdProperties :: HashMap Text GeographicDivision
27+ { _rirdAddtional :: HashMap Text GeographicDivision
2828 } deriving (Eq,Show,Data,Typeable,Generic)
2929
3030-- | Creates a value of 'RepresentativeInfoResponseDivisions' with the minimum fields required to make a request.
3131--
3232-- Use one of the following lenses to modify other fields as desired:
3333--
34−-- * 'rirdProperties'
34+-- * 'rirdAddtional'
3535representativeInfoResponseDivisions
36− :: HashMap Text GeographicDivision -- ^ 'properties'
36+ :: HashMap Text GeographicDivision -- ^ 'addtional'
3737 -> RepresentativeInfoResponseDivisions
38−representativeInfoResponseDivisions pRirdProperties_ =
38+representativeInfoResponseDivisions pRirdAddtional_ =
3939 RepresentativeInfoResponseDivisions
40− { _rirdProperties = pRirdProperties_
40+ { _rirdAddtional = pRirdAddtional_
4141 }
4242
4343-- | The unique Open Civic Data identifier for this division.
44−rirdProperties :: Lens' RepresentativeInfoResponseDivisions (HashMap Text GeographicDivision)
45−rirdProperties
46− = lens _rirdProperties
47− (\ s a -> s{_rirdProperties = a})
44+rirdAddtional :: Lens' RepresentativeInfoResponseDivisions (HashMap Text GeographicDivision)
45+rirdAddtional
46+ = lens _rirdAddtional
47+ (\ s a -> s{_rirdAddtional = a})
4848
4949instance FromJSON RepresentativeInfoResponseDivisions
5050 where
@@ -56,7 +56,7 @@ instance FromJSON RepresentativeInfoResponseDivisions
5656
5757instance ToJSON RepresentativeInfoResponseDivisions
5858 where
59− toJSON = toJSON . _rirdProperties
59+ toJSON = toJSON . _rirdAddtional
6060
6161-- | The result of a voter info lookup query.
6262--
@@ -1520,27 +1520,27 @@ instance ToJSON DivisionSearchResponse where
15201520--
15211521-- /See:/ 'representativeInfoDataDivisions' smart constructor.
15221522newtype RepresentativeInfoDataDivisions = RepresentativeInfoDataDivisions
1523− { _riddProperties :: HashMap Text GeographicDivision
1523+ { _riddAddtional :: HashMap Text GeographicDivision
15241524 } deriving (Eq,Show,Data,Typeable,Generic)
15251525
15261526-- | Creates a value of 'RepresentativeInfoDataDivisions' with the minimum fields required to make a request.
15271527--
15281528-- Use one of the following lenses to modify other fields as desired:
15291529--
1530−-- * 'riddProperties'
1530+-- * 'riddAddtional'
15311531representativeInfoDataDivisions
1532− :: HashMap Text GeographicDivision -- ^ 'properties'
1532+ :: HashMap Text GeographicDivision -- ^ 'addtional'
15331533 -> RepresentativeInfoDataDivisions
1534−representativeInfoDataDivisions pRiddProperties_ =
1534+representativeInfoDataDivisions pRiddAddtional_ =
15351535 RepresentativeInfoDataDivisions
1536− { _riddProperties = pRiddProperties_
1536+ { _riddAddtional = pRiddAddtional_
15371537 }
15381538
15391539-- | The unique Open Civic Data identifier for this division.
1540−riddProperties :: Lens' RepresentativeInfoDataDivisions (HashMap Text GeographicDivision)
1541−riddProperties
1542− = lens _riddProperties
1543− (\ s a -> s{_riddProperties = a})
1540+riddAddtional :: Lens' RepresentativeInfoDataDivisions (HashMap Text GeographicDivision)
1541+riddAddtional
1542+ = lens _riddAddtional
1543+ (\ s a -> s{_riddAddtional = a})
15441544
15451545instance FromJSON RepresentativeInfoDataDivisions
15461546 where
@@ -1551,7 +1551,7 @@ instance FromJSON RepresentativeInfoDataDivisions
15511551 (parseJSONObject o))
15521552
15531553instance ToJSON RepresentativeInfoDataDivisions where
1554− toJSON = toJSON . _riddProperties
1554+ toJSON = toJSON . _riddAddtional
15551555
15561556-- | Information about individual election officials.
15571557--
gogol-compute/gen/Network/Google/Compute.hs+14−14
@@ -573,12 +573,12 @@ module Network.Google.Compute
573573 -- ** MachineTypeAggregatedListItems
574574 , MachineTypeAggregatedListItems
575575 , machineTypeAggregatedListItems
576− , mtaliProperties
576+ , mtaliAddtional
577577
578578 -- ** DiskTypeAggregatedListItems
579579 , DiskTypeAggregatedListItems
580580 , diskTypeAggregatedListItems
581− , dtaliProperties
581+ , dtaliAddtional
582582
583583 -- ** FirewallList
584584 , FirewallList
@@ -608,7 +608,7 @@ module Network.Google.Compute
608608 -- ** AutoscalerAggregatedListItems
609609 , AutoscalerAggregatedListItems
610610 , autoscalerAggregatedListItems
611− , aaliProperties
611+ , aaliAddtional
612612
613613 -- ** InstanceGroupManagersSetInstanceTemplateRequest
614614 , InstanceGroupManagersSetInstanceTemplateRequest
@@ -752,7 +752,7 @@ module Network.Google.Compute
752752 -- ** InstanceGroupAggregatedListItems
753753 , InstanceGroupAggregatedListItems
754754 , instanceGroupAggregatedListItems
755− , igaliProperties
755+ , igaliAddtional
756756
757757 -- ** TargetPoolList
758758 , TargetPoolList
@@ -1098,7 +1098,7 @@ module Network.Google.Compute
10981098 -- ** InstanceAggregatedListItems
10991099 , InstanceAggregatedListItems
11001100 , instanceAggregatedListItems
1101− , ialiProperties
1101+ , ialiAddtional
11021102
11031103 -- ** AutoscalersScopedListWarning
11041104 , AutoscalersScopedListWarning
@@ -1343,7 +1343,7 @@ module Network.Google.Compute
13431343 -- ** TargetInstanceAggregatedListItems
13441344 , TargetInstanceAggregatedListItems
13451345 , targetInstanceAggregatedListItems
1346− , tialiProperties
1346+ , tialiAddtional
13471347
13481348 -- ** InstanceGroupAggregatedList
13491349 , InstanceGroupAggregatedList
@@ -1447,7 +1447,7 @@ module Network.Google.Compute
14471447 -- ** DiskAggregatedListItems
14481448 , DiskAggregatedListItems
14491449 , diskAggregatedListItems
1450− , daliProperties
1450+ , daliAddtional
14511451
14521452 -- ** UsageExportLocation
14531453 , UsageExportLocation
@@ -1479,7 +1479,7 @@ module Network.Google.Compute
14791479 -- ** InstanceGroupManagerAggregatedListItems
14801480 , InstanceGroupManagerAggregatedListItems
14811481 , instanceGroupManagerAggregatedListItems
1482− , igmaliProperties
1482+ , igmaliAddtional
14831483
14841484 -- ** InstanceGroupManagersDeleteInstancesRequest
14851485 , InstanceGroupManagersDeleteInstancesRequest
@@ -1516,12 +1516,12 @@ module Network.Google.Compute
15161516 -- ** ForwardingRuleAggregatedListItems
15171517 , ForwardingRuleAggregatedListItems
15181518 , forwardingRuleAggregatedListItems
1519− , fraliProperties
1519+ , fraliAddtional
15201520
15211521 -- ** OperationAggregatedListItems
15221522 , OperationAggregatedListItems
15231523 , operationAggregatedListItems
1524− , oaliProperties
1524+ , oaliAddtional
15251525
15261526 -- ** InstanceGroupManagerActionsSummary
15271527 , InstanceGroupManagerActionsSummary
@@ -1563,7 +1563,7 @@ module Network.Google.Compute
15631563 -- ** TargetPoolAggregatedListItems
15641564 , TargetPoolAggregatedListItems
15651565 , targetPoolAggregatedListItems
1566− , tpaliProperties
1566+ , tpaliAddtional
15671567
15681568 -- ** TargetInstancesScopedList
15691569 , TargetInstancesScopedList
@@ -1574,7 +1574,7 @@ module Network.Google.Compute
15741574 -- ** AddressAggregatedListItems
15751575 , AddressAggregatedListItems
15761576 , addressAggregatedListItems
1577− , aaliProperties
1577+ , aAddtional
15781578
15791579 -- ** AutoscalerList
15801580 , AutoscalerList
@@ -1894,7 +1894,7 @@ module Network.Google.Compute
18941894 -- ** TargetVPNGatewayAggregatedListItems
18951895 , TargetVPNGatewayAggregatedListItems
18961896 , targetVPNGatewayAggregatedListItems
1897− , tvgaliProperties
1897+ , tvgaliAddtional
18981898
18991899 -- ** TargetPoolsScopedListWarning
19001900 , TargetPoolsScopedListWarning
@@ -2224,7 +2224,7 @@ module Network.Google.Compute
22242224 -- ** VPNTunnelAggregatedListItems
22252225 , VPNTunnelAggregatedListItems
22262226 , vpnTunnelAggregatedListItems
2227− , vtaliProperties
2227+ , vtaliAddtional
22282228
22292229 -- ** Tags
22302230 , Tags
gogol-compute/gen/Network/Google/Compute/Types.hs+14−14
@@ -44,12 +44,12 @@ module Network.Google.Compute.Types
4444 -- * MachineTypeAggregatedListItems
4545 , MachineTypeAggregatedListItems
4646 , machineTypeAggregatedListItems
47− , mtaliProperties
47+ , mtaliAddtional
4848
4949 -- * DiskTypeAggregatedListItems
5050 , DiskTypeAggregatedListItems
5151 , diskTypeAggregatedListItems
52− , dtaliProperties
52+ , dtaliAddtional
5353
5454 -- * FirewallList
5555 , FirewallList
@@ -79,7 +79,7 @@ module Network.Google.Compute.Types
7979 -- * AutoscalerAggregatedListItems
8080 , AutoscalerAggregatedListItems
8181 , autoscalerAggregatedListItems
82− , aaliProperties
82+ , aaliAddtional
8383
8484 -- * InstanceGroupManagersSetInstanceTemplateRequest
8585 , InstanceGroupManagersSetInstanceTemplateRequest
@@ -223,7 +223,7 @@ module Network.Google.Compute.Types
223223 -- * InstanceGroupAggregatedListItems
224224 , InstanceGroupAggregatedListItems
225225 , instanceGroupAggregatedListItems
226− , igaliProperties
226+ , igaliAddtional
227227
228228 -- * TargetPoolList
229229 , TargetPoolList
@@ -569,7 +569,7 @@ module Network.Google.Compute.Types
569569 -- * InstanceAggregatedListItems
570570 , InstanceAggregatedListItems
571571 , instanceAggregatedListItems
572− , ialiProperties
572+ , ialiAddtional
573573
574574 -- * AutoscalersScopedListWarning
575575 , AutoscalersScopedListWarning
@@ -814,7 +814,7 @@ module Network.Google.Compute.Types
814814 -- * TargetInstanceAggregatedListItems
815815 , TargetInstanceAggregatedListItems
816816 , targetInstanceAggregatedListItems
817− , tialiProperties
817+ , tialiAddtional
818818
819819 -- * InstanceGroupAggregatedList
820820 , InstanceGroupAggregatedList
@@ -918,7 +918,7 @@ module Network.Google.Compute.Types
918918 -- * DiskAggregatedListItems
919919 , DiskAggregatedListItems
920920 , diskAggregatedListItems
921− , daliProperties
921+ , daliAddtional
922922
923923 -- * UsageExportLocation
924924 , UsageExportLocation
@@ -950,7 +950,7 @@ module Network.Google.Compute.Types
950950 -- * InstanceGroupManagerAggregatedListItems
951951 , InstanceGroupManagerAggregatedListItems
952952 , instanceGroupManagerAggregatedListItems
953− , igmaliProperties
953+ , igmaliAddtional
954954
955955 -- * InstanceGroupManagersDeleteInstancesRequest
956956 , InstanceGroupManagersDeleteInstancesRequest
@@ -987,12 +987,12 @@ module Network.Google.Compute.Types
987987 -- * ForwardingRuleAggregatedListItems
988988 , ForwardingRuleAggregatedListItems
989989 , forwardingRuleAggregatedListItems
990− , fraliProperties
990+ , fraliAddtional
991991
992992 -- * OperationAggregatedListItems
993993 , OperationAggregatedListItems
994994 , operationAggregatedListItems
995− , oaliProperties
995+ , oaliAddtional
996996
997997 -- * InstanceGroupManagerActionsSummary
998998 , InstanceGroupManagerActionsSummary
@@ -1034,7 +1034,7 @@ module Network.Google.Compute.Types
10341034 -- * TargetPoolAggregatedListItems
10351035 , TargetPoolAggregatedListItems
10361036 , targetPoolAggregatedListItems
1037− , tpaliProperties
1037+ , tpaliAddtional
10381038
10391039 -- * TargetInstancesScopedList
10401040 , TargetInstancesScopedList
@@ -1045,7 +1045,7 @@ module Network.Google.Compute.Types
10451045 -- * AddressAggregatedListItems
10461046 , AddressAggregatedListItems
10471047 , addressAggregatedListItems
1048− , aaliProperties
1048+ , aAddtional
10491049
10501050 -- * AutoscalerList
10511051 , AutoscalerList
@@ -1365,7 +1365,7 @@ module Network.Google.Compute.Types
13651365 -- * TargetVPNGatewayAggregatedListItems
13661366 , TargetVPNGatewayAggregatedListItems
13671367 , targetVPNGatewayAggregatedListItems
1368− , tvgaliProperties
1368+ , tvgaliAddtional
13691369
13701370 -- * TargetPoolsScopedListWarning
13711371 , TargetPoolsScopedListWarning
@@ -1695,7 +1695,7 @@ module Network.Google.Compute.Types
16951695 -- * VPNTunnelAggregatedListItems
16961696 , VPNTunnelAggregatedListItems
16971697 , vpnTunnelAggregatedListItems
1698− , vtaliProperties
1698+ , vtaliAddtional
16991699
17001700 -- * Tags
17011701 , Tags
gogol-compute/gen/Network/Google/Compute/Types/Product.hs+139−140
@@ -160,27 +160,27 @@ instance ToJSON
160160--
161161-- /See:/ 'machineTypeAggregatedListItems' smart constructor.
162162newtype MachineTypeAggregatedListItems = MachineTypeAggregatedListItems
163− { _mtaliProperties :: HashMap Text MachineTypesScopedList
163+ { _mtaliAddtional :: HashMap Text MachineTypesScopedList
164164 } deriving (Eq,Show,Data,Typeable,Generic)
165165
166166-- | Creates a value of 'MachineTypeAggregatedListItems' with the minimum fields required to make a request.
167167--
168168-- Use one of the following lenses to modify other fields as desired:
169169--
170−-- * 'mtaliProperties'
170+-- * 'mtaliAddtional'
171171machineTypeAggregatedListItems
172− :: HashMap Text MachineTypesScopedList -- ^ 'properties'
172+ :: HashMap Text MachineTypesScopedList -- ^ 'addtional'
173173 -> MachineTypeAggregatedListItems
174−machineTypeAggregatedListItems pMtaliProperties_ =
174+machineTypeAggregatedListItems pMtaliAddtional_ =
175175 MachineTypeAggregatedListItems
176− { _mtaliProperties = pMtaliProperties_
176+ { _mtaliAddtional = pMtaliAddtional_
177177 }
178178
179179-- | [Output Only] Name of the scope containing this set of machine types.
180−mtaliProperties :: Lens' MachineTypeAggregatedListItems (HashMap Text MachineTypesScopedList)
181−mtaliProperties
182− = lens _mtaliProperties
183− (\ s a -> s{_mtaliProperties = a})
180+mtaliAddtional :: Lens' MachineTypeAggregatedListItems (HashMap Text MachineTypesScopedList)
181+mtaliAddtional
182+ = lens _mtaliAddtional
183+ (\ s a -> s{_mtaliAddtional = a})
184184
185185instance FromJSON MachineTypeAggregatedListItems
186186 where
@@ -191,33 +191,33 @@ instance FromJSON MachineTypeAggregatedListItems
191191 (parseJSONObject o))
192192
193193instance ToJSON MachineTypeAggregatedListItems where
194− toJSON = toJSON . _mtaliProperties
194+ toJSON = toJSON . _mtaliAddtional
195195
196196-- | [Output Only] A map of scoped disk type lists.
197197--
198198-- /See:/ 'diskTypeAggregatedListItems' smart constructor.
199199newtype DiskTypeAggregatedListItems = DiskTypeAggregatedListItems
200− { _dtaliProperties :: HashMap Text DiskTypesScopedList
200+ { _dtaliAddtional :: HashMap Text DiskTypesScopedList
201201 } deriving (Eq,Show,Data,Typeable,Generic)
202202
203203-- | Creates a value of 'DiskTypeAggregatedListItems' with the minimum fields required to make a request.
204204--
205205-- Use one of the following lenses to modify other fields as desired:
206206--
207−-- * 'dtaliProperties'
207+-- * 'dtaliAddtional'
208208diskTypeAggregatedListItems
209− :: HashMap Text DiskTypesScopedList -- ^ 'properties'
209+ :: HashMap Text DiskTypesScopedList -- ^ 'addtional'
210210 -> DiskTypeAggregatedListItems
211−diskTypeAggregatedListItems pDtaliProperties_ =
211+diskTypeAggregatedListItems pDtaliAddtional_ =
212212 DiskTypeAggregatedListItems
213− { _dtaliProperties = pDtaliProperties_
213+ { _dtaliAddtional = pDtaliAddtional_
214214 }
215215
216216-- | [Output Only] Name of the scope containing this set of disk types.
217−dtaliProperties :: Lens' DiskTypeAggregatedListItems (HashMap Text DiskTypesScopedList)
218−dtaliProperties
219− = lens _dtaliProperties
220− (\ s a -> s{_dtaliProperties = a})
217+dtaliAddtional :: Lens' DiskTypeAggregatedListItems (HashMap Text DiskTypesScopedList)
218+dtaliAddtional
219+ = lens _dtaliAddtional
220+ (\ s a -> s{_dtaliAddtional = a})
221221
222222instance FromJSON DiskTypeAggregatedListItems where
223223 parseJSON
@@ -226,7 +226,7 @@ instance FromJSON DiskTypeAggregatedListItems where
226226 DiskTypeAggregatedListItems <$> (parseJSONObject o))
227227
228228instance ToJSON DiskTypeAggregatedListItems where
229− toJSON = toJSON . _dtaliProperties
229+ toJSON = toJSON . _dtaliAddtional
230230
231231-- | Contains a list of Firewall resources.
232232--
@@ -458,27 +458,27 @@ instance ToJSON InstanceGroupList where
458458--
459459-- /See:/ 'autoscalerAggregatedListItems' smart constructor.
460460newtype AutoscalerAggregatedListItems = AutoscalerAggregatedListItems
461− { _aaliProperties :: HashMap Text AutoscalersScopedList
461+ { _aaliAddtional :: HashMap Text AutoscalersScopedList
462462 } deriving (Eq,Show,Data,Typeable,Generic)
463463
464464-- | Creates a value of 'AutoscalerAggregatedListItems' with the minimum fields required to make a request.
465465--
466466-- Use one of the following lenses to modify other fields as desired:
467467--
468−-- * 'aaliProperties'
468+-- * 'aaliAddtional'
469469autoscalerAggregatedListItems
470− :: HashMap Text AutoscalersScopedList -- ^ 'properties'
470+ :: HashMap Text AutoscalersScopedList -- ^ 'addtional'
471471 -> AutoscalerAggregatedListItems
472−autoscalerAggregatedListItems pAaliProperties_ =
472+autoscalerAggregatedListItems pAaliAddtional_ =
473473 AutoscalerAggregatedListItems
474− { _aaliProperties = pAaliProperties_
474+ { _aaliAddtional = pAaliAddtional_
475475 }
476476
477477-- | Name of the scope containing this set of autoscalers.
478−aaliProperties :: Lens' AutoscalerAggregatedListItems (HashMap Text AutoscalersScopedList)
479−aaliProperties
480− = lens _aaliProperties
481− (\ s a -> s{_aaliProperties = a})
478+aaliAddtional :: Lens' AutoscalerAggregatedListItems (HashMap Text AutoscalersScopedList)
479+aaliAddtional
480+ = lens _aaliAddtional
481+ (\ s a -> s{_aaliAddtional = a})
482482
483483instance FromJSON AutoscalerAggregatedListItems where
484484 parseJSON
@@ -488,7 +488,7 @@ instance FromJSON AutoscalerAggregatedListItems where
488488 (parseJSONObject o))
489489
490490instance ToJSON AutoscalerAggregatedListItems where
491− toJSON = toJSON . _aaliProperties
491+ toJSON = toJSON . _aaliAddtional
492492
493493--
494494-- /See:/ 'instanceGroupManagersSetInstanceTemplateRequest' smart constructor.
@@ -1768,27 +1768,27 @@ instance ToJSON URLMap where
17681768--
17691769-- /See:/ 'instanceGroupAggregatedListItems' smart constructor.
17701770newtype InstanceGroupAggregatedListItems = InstanceGroupAggregatedListItems
1771− { _igaliProperties :: HashMap Text InstanceGroupsScopedList
1771+ { _igaliAddtional :: HashMap Text InstanceGroupsScopedList
17721772 } deriving (Eq,Show,Data,Typeable,Generic)
17731773
17741774-- | Creates a value of 'InstanceGroupAggregatedListItems' with the minimum fields required to make a request.
17751775--
17761776-- Use one of the following lenses to modify other fields as desired:
17771777--
1778−-- * 'igaliProperties'
1778+-- * 'igaliAddtional'
17791779instanceGroupAggregatedListItems
1780− :: HashMap Text InstanceGroupsScopedList -- ^ 'properties'
1780+ :: HashMap Text InstanceGroupsScopedList -- ^ 'addtional'
17811781 -> InstanceGroupAggregatedListItems
1782−instanceGroupAggregatedListItems pIgaliProperties_ =
1782+instanceGroupAggregatedListItems pIgaliAddtional_ =
17831783 InstanceGroupAggregatedListItems
1784− { _igaliProperties = pIgaliProperties_
1784+ { _igaliAddtional = pIgaliAddtional_
17851785 }
17861786
17871787-- | The name of the scope that contains this set of instance groups.
1788−igaliProperties :: Lens' InstanceGroupAggregatedListItems (HashMap Text InstanceGroupsScopedList)
1789−igaliProperties
1790− = lens _igaliProperties
1791− (\ s a -> s{_igaliProperties = a})
1788+igaliAddtional :: Lens' InstanceGroupAggregatedListItems (HashMap Text InstanceGroupsScopedList)
1789+igaliAddtional
1790+ = lens _igaliAddtional
1791+ (\ s a -> s{_igaliAddtional = a})
17921792
17931793instance FromJSON InstanceGroupAggregatedListItems
17941794 where
@@ -1800,7 +1800,7 @@ instance FromJSON InstanceGroupAggregatedListItems
18001800
18011801instance ToJSON InstanceGroupAggregatedListItems
18021802 where
1803− toJSON = toJSON . _igaliProperties
1803+ toJSON = toJSON . _igaliAddtional
18041804
18051805-- | Contains a list of TargetPool resources.
18061806--
@@ -4796,27 +4796,27 @@ instance ToJSON RouteWarningsItemDataItem where
47964796--
47974797-- /See:/ 'instanceAggregatedListItems' smart constructor.
47984798newtype InstanceAggregatedListItems = InstanceAggregatedListItems
4799− { _ialiProperties :: HashMap Text InstancesScopedList
4799+ { _ialiAddtional :: HashMap Text InstancesScopedList
48004800 } deriving (Eq,Show,Data,Typeable,Generic)
48014801
48024802-- | Creates a value of 'InstanceAggregatedListItems' with the minimum fields required to make a request.
48034803--
48044804-- Use one of the following lenses to modify other fields as desired:
48054805--
4806−-- * 'ialiProperties'
4806+-- * 'ialiAddtional'
48074807instanceAggregatedListItems
4808− :: HashMap Text InstancesScopedList -- ^ 'properties'
4808+ :: HashMap Text InstancesScopedList -- ^ 'addtional'
48094809 -> InstanceAggregatedListItems
4810−instanceAggregatedListItems pIaliProperties_ =
4810+instanceAggregatedListItems pIaliAddtional_ =
48114811 InstanceAggregatedListItems
4812− { _ialiProperties = pIaliProperties_
4812+ { _ialiAddtional = pIaliAddtional_
48134813 }
48144814
48154815-- | Name of the scope containing this set of instances.
4816−ialiProperties :: Lens' InstanceAggregatedListItems (HashMap Text InstancesScopedList)
4817−ialiProperties
4818− = lens _ialiProperties
4819− (\ s a -> s{_ialiProperties = a})
4816+ialiAddtional :: Lens' InstanceAggregatedListItems (HashMap Text InstancesScopedList)
4817+ialiAddtional
4818+ = lens _ialiAddtional
4819+ (\ s a -> s{_ialiAddtional = a})
48204820
48214821instance FromJSON InstanceAggregatedListItems where
48224822 parseJSON
@@ -4825,7 +4825,7 @@ instance FromJSON InstanceAggregatedListItems where
48254825 InstanceAggregatedListItems <$> (parseJSONObject o))
48264826
48274827instance ToJSON InstanceAggregatedListItems where
4828− toJSON = toJSON . _ialiProperties
4828+ toJSON = toJSON . _ialiAddtional
48294829
48304830-- | Informational warning which replaces the list of autoscalers when the
48314831-- list is empty.
@@ -6818,27 +6818,27 @@ instance ToJSON HealthCheckReference where
68186818--
68196819-- /See:/ 'targetInstanceAggregatedListItems' smart constructor.
68206820newtype TargetInstanceAggregatedListItems = TargetInstanceAggregatedListItems
6821− { _tialiProperties :: HashMap Text TargetInstancesScopedList
6821+ { _tialiAddtional :: HashMap Text TargetInstancesScopedList
68226822 } deriving (Eq,Show,Data,Typeable,Generic)
68236823
68246824-- | Creates a value of 'TargetInstanceAggregatedListItems' with the minimum fields required to make a request.
68256825--
68266826-- Use one of the following lenses to modify other fields as desired:
68276827--
6828−-- * 'tialiProperties'
6828+-- * 'tialiAddtional'
68296829targetInstanceAggregatedListItems
6830− :: HashMap Text TargetInstancesScopedList -- ^ 'properties'
6830+ :: HashMap Text TargetInstancesScopedList -- ^ 'addtional'
68316831 -> TargetInstanceAggregatedListItems
6832−targetInstanceAggregatedListItems pTialiProperties_ =
6832+targetInstanceAggregatedListItems pTialiAddtional_ =
68336833 TargetInstanceAggregatedListItems
6834− { _tialiProperties = pTialiProperties_
6834+ { _tialiAddtional = pTialiAddtional_
68356835 }
68366836
68376837-- | Name of the scope containing this set of target instances.
6838−tialiProperties :: Lens' TargetInstanceAggregatedListItems (HashMap Text TargetInstancesScopedList)
6839−tialiProperties
6840− = lens _tialiProperties
6841− (\ s a -> s{_tialiProperties = a})
6838+tialiAddtional :: Lens' TargetInstanceAggregatedListItems (HashMap Text TargetInstancesScopedList)
6839+tialiAddtional
6840+ = lens _tialiAddtional
6841+ (\ s a -> s{_tialiAddtional = a})
68426842
68436843instance FromJSON TargetInstanceAggregatedListItems
68446844 where
@@ -6850,7 +6850,7 @@ instance FromJSON TargetInstanceAggregatedListItems
68506850
68516851instance ToJSON TargetInstanceAggregatedListItems
68526852 where
6853− toJSON = toJSON . _tialiProperties
6853+ toJSON = toJSON . _tialiAddtional
68546854
68556855--
68566856-- /See:/ 'instanceGroupAggregatedList' smart constructor.
@@ -7666,27 +7666,27 @@ instance ToJSON TargetPoolsAddHealthCheckRequest
76667666--
76677667-- /See:/ 'diskAggregatedListItems' smart constructor.
76687668newtype DiskAggregatedListItems = DiskAggregatedListItems
7669− { _daliProperties :: HashMap Text DisksScopedList
7669+ { _daliAddtional :: HashMap Text DisksScopedList
76707670 } deriving (Eq,Show,Data,Typeable,Generic)
76717671
76727672-- | Creates a value of 'DiskAggregatedListItems' with the minimum fields required to make a request.
76737673--
76747674-- Use one of the following lenses to modify other fields as desired:
76757675--
7676−-- * 'daliProperties'
7676+-- * 'daliAddtional'
76777677diskAggregatedListItems
7678− :: HashMap Text DisksScopedList -- ^ 'properties'
7678+ :: HashMap Text DisksScopedList -- ^ 'addtional'
76797679 -> DiskAggregatedListItems
7680−diskAggregatedListItems pDaliProperties_ =
7680+diskAggregatedListItems pDaliAddtional_ =
76817681 DiskAggregatedListItems
7682− { _daliProperties = pDaliProperties_
7682+ { _daliAddtional = pDaliAddtional_
76837683 }
76847684
76857685-- | [Output Only] Name of the scope containing this set of disks.
7686−daliProperties :: Lens' DiskAggregatedListItems (HashMap Text DisksScopedList)
7687−daliProperties
7688− = lens _daliProperties
7689− (\ s a -> s{_daliProperties = a})
7686+daliAddtional :: Lens' DiskAggregatedListItems (HashMap Text DisksScopedList)
7687+daliAddtional
7688+ = lens _daliAddtional
7689+ (\ s a -> s{_daliAddtional = a})
76907690
76917691instance FromJSON DiskAggregatedListItems where
76927692 parseJSON
@@ -7695,7 +7695,7 @@ instance FromJSON DiskAggregatedListItems where
76957695 DiskAggregatedListItems <$> (parseJSONObject o))
76967696
76977697instance ToJSON DiskAggregatedListItems where
7698− toJSON = toJSON . _daliProperties
7698+ toJSON = toJSON . _daliAddtional
76997699
77007700-- | The location in Cloud Storage and naming method of the daily usage
77017701-- report. Contains bucket_name and report_name prefix.
@@ -7921,27 +7921,27 @@ instance ToJSON ManagedInstance where
79217921--
79227922-- /See:/ 'instanceGroupManagerAggregatedListItems' smart constructor.
79237923newtype InstanceGroupManagerAggregatedListItems = InstanceGroupManagerAggregatedListItems
7924− { _igmaliProperties :: HashMap Text InstanceGroupManagersScopedList
7924+ { _igmaliAddtional :: HashMap Text InstanceGroupManagersScopedList
79257925 } deriving (Eq,Show,Data,Typeable,Generic)
79267926
79277927-- | Creates a value of 'InstanceGroupManagerAggregatedListItems' with the minimum fields required to make a request.
79287928--
79297929-- Use one of the following lenses to modify other fields as desired:
79307930--
7931−-- * 'igmaliProperties'
7931+-- * 'igmaliAddtional'
79327932instanceGroupManagerAggregatedListItems
7933− :: HashMap Text InstanceGroupManagersScopedList -- ^ 'properties'
7933+ :: HashMap Text InstanceGroupManagersScopedList -- ^ 'addtional'
79347934 -> InstanceGroupManagerAggregatedListItems
7935−instanceGroupManagerAggregatedListItems pIgmaliProperties_ =
7935+instanceGroupManagerAggregatedListItems pIgmaliAddtional_ =
79367936 InstanceGroupManagerAggregatedListItems
7937− { _igmaliProperties = pIgmaliProperties_
7937+ { _igmaliAddtional = pIgmaliAddtional_
79387938 }
79397939
79407940-- | The name of the scope that contains this set of managed instance groups.
7941−igmaliProperties :: Lens' InstanceGroupManagerAggregatedListItems (HashMap Text InstanceGroupManagersScopedList)
7942−igmaliProperties
7943− = lens _igmaliProperties
7944− (\ s a -> s{_igmaliProperties = a})
7941+igmaliAddtional :: Lens' InstanceGroupManagerAggregatedListItems (HashMap Text InstanceGroupManagersScopedList)
7942+igmaliAddtional
7943+ = lens _igmaliAddtional
7944+ (\ s a -> s{_igmaliAddtional = a})
79457945
79467946instance FromJSON
79477947 InstanceGroupManagerAggregatedListItems where
@@ -7954,7 +7954,7 @@ instance FromJSON
79547954
79557955instance ToJSON
79567956 InstanceGroupManagerAggregatedListItems where
7957− toJSON = toJSON . _igmaliProperties
7957+ toJSON = toJSON . _igmaliAddtional
79587958
79597959--
79607960-- /See:/ 'instanceGroupManagersDeleteInstancesRequest' smart constructor.
@@ -8269,27 +8269,27 @@ instance ToJSON AddressList where
82698269--
82708270-- /See:/ 'forwardingRuleAggregatedListItems' smart constructor.
82718271newtype ForwardingRuleAggregatedListItems = ForwardingRuleAggregatedListItems
8272− { _fraliProperties :: HashMap Text ForwardingRulesScopedList
8272+ { _fraliAddtional :: HashMap Text ForwardingRulesScopedList
82738273 } deriving (Eq,Show,Data,Typeable,Generic)
82748274
82758275-- | Creates a value of 'ForwardingRuleAggregatedListItems' with the minimum fields required to make a request.
82768276--
82778277-- Use one of the following lenses to modify other fields as desired:
82788278--
8279−-- * 'fraliProperties'
8279+-- * 'fraliAddtional'
82808280forwardingRuleAggregatedListItems
8281− :: HashMap Text ForwardingRulesScopedList -- ^ 'properties'
8281+ :: HashMap Text ForwardingRulesScopedList -- ^ 'addtional'
82828282 -> ForwardingRuleAggregatedListItems
8283−forwardingRuleAggregatedListItems pFraliProperties_ =
8283+forwardingRuleAggregatedListItems pFraliAddtional_ =
82848284 ForwardingRuleAggregatedListItems
8285− { _fraliProperties = pFraliProperties_
8285+ { _fraliAddtional = pFraliAddtional_
82868286 }
82878287
82888288-- | Name of the scope containing this set of addresses.
8289−fraliProperties :: Lens' ForwardingRuleAggregatedListItems (HashMap Text ForwardingRulesScopedList)
8290−fraliProperties
8291− = lens _fraliProperties
8292− (\ s a -> s{_fraliProperties = a})
8289+fraliAddtional :: Lens' ForwardingRuleAggregatedListItems (HashMap Text ForwardingRulesScopedList)
8290+fraliAddtional
8291+ = lens _fraliAddtional
8292+ (\ s a -> s{_fraliAddtional = a})
82938293
82948294instance FromJSON ForwardingRuleAggregatedListItems
82958295 where
@@ -8301,33 +8301,33 @@ instance FromJSON ForwardingRuleAggregatedListItems
83018301
83028302instance ToJSON ForwardingRuleAggregatedListItems
83038303 where
8304− toJSON = toJSON . _fraliProperties
8304+ toJSON = toJSON . _fraliAddtional
83058305
83068306-- | [Output Only] A map of scoped operation lists.
83078307--
83088308-- /See:/ 'operationAggregatedListItems' smart constructor.
83098309newtype OperationAggregatedListItems = OperationAggregatedListItems
8310− { _oaliProperties :: HashMap Text OperationsScopedList
8310+ { _oaliAddtional :: HashMap Text OperationsScopedList
83118311 } deriving (Eq,Show,Data,Typeable,Generic)
83128312
83138313-- | Creates a value of 'OperationAggregatedListItems' with the minimum fields required to make a request.
83148314--
83158315-- Use one of the following lenses to modify other fields as desired:
83168316--
8317−-- * 'oaliProperties'
8317+-- * 'oaliAddtional'
83188318operationAggregatedListItems
8319− :: HashMap Text OperationsScopedList -- ^ 'properties'
8319+ :: HashMap Text OperationsScopedList -- ^ 'addtional'
83208320 -> OperationAggregatedListItems
8321−operationAggregatedListItems pOaliProperties_ =
8321+operationAggregatedListItems pOaliAddtional_ =
83228322 OperationAggregatedListItems
8323− { _oaliProperties = pOaliProperties_
8323+ { _oaliAddtional = pOaliAddtional_
83248324 }
83258325
83268326-- | [Output Only] Name of the scope containing this set of operations.
8327−oaliProperties :: Lens' OperationAggregatedListItems (HashMap Text OperationsScopedList)
8328−oaliProperties
8329− = lens _oaliProperties
8330− (\ s a -> s{_oaliProperties = a})
8327+oaliAddtional :: Lens' OperationAggregatedListItems (HashMap Text OperationsScopedList)
8328+oaliAddtional
8329+ = lens _oaliAddtional
8330+ (\ s a -> s{_oaliAddtional = a})
83318331
83328332instance FromJSON OperationAggregatedListItems where
83338333 parseJSON
@@ -8336,7 +8336,7 @@ instance FromJSON OperationAggregatedListItems where
83368336 OperationAggregatedListItems <$> (parseJSONObject o))
83378337
83388338instance ToJSON OperationAggregatedListItems where
8339− toJSON = toJSON . _oaliProperties
8339+ toJSON = toJSON . _oaliAddtional
83408340
83418341--
83428342-- /See:/ 'instanceGroupManagerActionsSummary' smart constructor.
@@ -8634,27 +8634,27 @@ instance ToJSON InstanceGroupsListInstancesRequest
86348634--
86358635-- /See:/ 'targetPoolAggregatedListItems' smart constructor.
86368636newtype TargetPoolAggregatedListItems = TargetPoolAggregatedListItems
8637− { _tpaliProperties :: HashMap Text TargetPoolsScopedList
8637+ { _tpaliAddtional :: HashMap Text TargetPoolsScopedList
86388638 } deriving (Eq,Show,Data,Typeable,Generic)
86398639
86408640-- | Creates a value of 'TargetPoolAggregatedListItems' with the minimum fields required to make a request.
86418641--
86428642-- Use one of the following lenses to modify other fields as desired:
86438643--
8644−-- * 'tpaliProperties'
8644+-- * 'tpaliAddtional'
86458645targetPoolAggregatedListItems
8646− :: HashMap Text TargetPoolsScopedList -- ^ 'properties'
8646+ :: HashMap Text TargetPoolsScopedList -- ^ 'addtional'
86478647 -> TargetPoolAggregatedListItems
8648−targetPoolAggregatedListItems pTpaliProperties_ =
8648+targetPoolAggregatedListItems pTpaliAddtional_ =
86498649 TargetPoolAggregatedListItems
8650− { _tpaliProperties = pTpaliProperties_
8650+ { _tpaliAddtional = pTpaliAddtional_
86518651 }
86528652
86538653-- | Name of the scope containing this set of target pools.
8654−tpaliProperties :: Lens' TargetPoolAggregatedListItems (HashMap Text TargetPoolsScopedList)
8655−tpaliProperties
8656− = lens _tpaliProperties
8657− (\ s a -> s{_tpaliProperties = a})
8654+tpaliAddtional :: Lens' TargetPoolAggregatedListItems (HashMap Text TargetPoolsScopedList)
8655+tpaliAddtional
8656+ = lens _tpaliAddtional
8657+ (\ s a -> s{_tpaliAddtional = a})
86588658
86598659instance FromJSON TargetPoolAggregatedListItems where
86608660 parseJSON
@@ -8664,7 +8664,7 @@ instance FromJSON TargetPoolAggregatedListItems where
86648664 (parseJSONObject o))
86658665
86668666instance ToJSON TargetPoolAggregatedListItems where
8667− toJSON = toJSON . _tpaliProperties
8667+ toJSON = toJSON . _tpaliAddtional
86688668
86698669--
86708670-- /See:/ 'targetInstancesScopedList' smart constructor.
@@ -8721,27 +8721,26 @@ instance ToJSON TargetInstancesScopedList where
87218721--
87228722-- /See:/ 'addressAggregatedListItems' smart constructor.
87238723newtype AddressAggregatedListItems = AddressAggregatedListItems
8724− { _aaliProperties :: HashMap Text AddressesScopedList
8724+ { _aAddtional :: HashMap Text AddressesScopedList
87258725 } deriving (Eq,Show,Data,Typeable,Generic)
87268726
87278727-- | Creates a value of 'AddressAggregatedListItems' with the minimum fields required to make a request.
87288728--
87298729-- Use one of the following lenses to modify other fields as desired:
87308730--
8731−-- * 'aaliProperties'
8731+-- * 'aAddtional'
87328732addressAggregatedListItems
8733− :: HashMap Text AddressesScopedList -- ^ 'properties'
8733+ :: HashMap Text AddressesScopedList -- ^ 'addtional'
87348734 -> AddressAggregatedListItems
8735−addressAggregatedListItems pAaliProperties_ =
8735+addressAggregatedListItems pAAddtional_ =
87368736 AddressAggregatedListItems
8737− { _aaliProperties = pAaliProperties_
8737+ { _aAddtional = pAAddtional_
87388738 }
87398739
87408740-- | [Output Only] Name of the scope containing this set of addresses.
8741−aaliProperties :: Lens' AddressAggregatedListItems (HashMap Text AddressesScopedList)
8742−aaliProperties
8743− = lens _aaliProperties
8744− (\ s a -> s{_aaliProperties = a})
8741+aAddtional :: Lens' AddressAggregatedListItems (HashMap Text AddressesScopedList)
8742+aAddtional
8743+ = lens _aAddtional (\ s a -> s{_aAddtional = a})
87458744
87468745instance FromJSON AddressAggregatedListItems where
87478746 parseJSON
@@ -8750,7 +8749,7 @@ instance FromJSON AddressAggregatedListItems where
87508749 AddressAggregatedListItems <$> (parseJSONObject o))
87518750
87528751instance ToJSON AddressAggregatedListItems where
8753− toJSON = toJSON . _aaliProperties
8752+ toJSON = toJSON . _aAddtional
87548753
87558754-- | Contains a list of persistent autoscaler resources.
87568755--
@@ -11432,28 +11431,28 @@ instance ToJSON DisksScopedListWarning where
1143211431--
1143311432-- /See:/ 'targetVPNGatewayAggregatedListItems' smart constructor.
1143411433newtype TargetVPNGatewayAggregatedListItems = TargetVPNGatewayAggregatedListItems
11435− { _tvgaliProperties :: HashMap Text TargetVPNGatewaysScopedList
11434+ { _tvgaliAddtional :: HashMap Text TargetVPNGatewaysScopedList
1143611435 } deriving (Eq,Show,Data,Typeable,Generic)
1143711436
1143811437-- | Creates a value of 'TargetVPNGatewayAggregatedListItems' with the minimum fields required to make a request.
1143911438--
1144011439-- Use one of the following lenses to modify other fields as desired:
1144111440--
11442−-- * 'tvgaliProperties'
11441+-- * 'tvgaliAddtional'
1144311442targetVPNGatewayAggregatedListItems
11444− :: HashMap Text TargetVPNGatewaysScopedList -- ^ 'properties'
11443+ :: HashMap Text TargetVPNGatewaysScopedList -- ^ 'addtional'
1144511444 -> TargetVPNGatewayAggregatedListItems
11446−targetVPNGatewayAggregatedListItems pTvgaliProperties_ =
11445+targetVPNGatewayAggregatedListItems pTvgaliAddtional_ =
1144711446 TargetVPNGatewayAggregatedListItems
11448− { _tvgaliProperties = pTvgaliProperties_
11447+ { _tvgaliAddtional = pTvgaliAddtional_
1144911448 }
1145011449
1145111450-- | [Output Only] Name of the scope containing this set of target vpn
1145211451-- gateways.
11453−tvgaliProperties :: Lens' TargetVPNGatewayAggregatedListItems (HashMap Text TargetVPNGatewaysScopedList)
11454−tvgaliProperties
11455− = lens _tvgaliProperties
11456− (\ s a -> s{_tvgaliProperties = a})
11452+tvgaliAddtional :: Lens' TargetVPNGatewayAggregatedListItems (HashMap Text TargetVPNGatewaysScopedList)
11453+tvgaliAddtional
11454+ = lens _tvgaliAddtional
11455+ (\ s a -> s{_tvgaliAddtional = a})
1145711456
1145811457instance FromJSON TargetVPNGatewayAggregatedListItems
1145911458 where
@@ -11465,7 +11464,7 @@ instance FromJSON TargetVPNGatewayAggregatedListItems
1146511464
1146611465instance ToJSON TargetVPNGatewayAggregatedListItems
1146711466 where
11468− toJSON = toJSON . _tvgaliProperties
11467+ toJSON = toJSON . _tvgaliAddtional
1146911468
1147011469-- | Informational warning which replaces the list of addresses when the list
1147111470-- is empty.
@@ -14298,27 +14297,27 @@ instance ToJSON InstanceGroupsScopedList where
1429814297--
1429914298-- /See:/ 'vpnTunnelAggregatedListItems' smart constructor.
1430014299newtype VPNTunnelAggregatedListItems = VPNTunnelAggregatedListItems
14301− { _vtaliProperties :: HashMap Text VPNTunnelsScopedList
14300+ { _vtaliAddtional :: HashMap Text VPNTunnelsScopedList
1430214301 } deriving (Eq,Show,Data,Typeable,Generic)
1430314302
1430414303-- | Creates a value of 'VPNTunnelAggregatedListItems' with the minimum fields required to make a request.
1430514304--
1430614305-- Use one of the following lenses to modify other fields as desired:
1430714306--
14308−-- * 'vtaliProperties'
14307+-- * 'vtaliAddtional'
1430914308vpnTunnelAggregatedListItems
14310− :: HashMap Text VPNTunnelsScopedList -- ^ 'properties'
14309+ :: HashMap Text VPNTunnelsScopedList -- ^ 'addtional'
1431114310 -> VPNTunnelAggregatedListItems
14312−vpnTunnelAggregatedListItems pVtaliProperties_ =
14311+vpnTunnelAggregatedListItems pVtaliAddtional_ =
1431314312 VPNTunnelAggregatedListItems
14314− { _vtaliProperties = pVtaliProperties_
14313+ { _vtaliAddtional = pVtaliAddtional_
1431514314 }
1431614315
1431714316-- | Name of the scope containing this set of vpn tunnels.
14318−vtaliProperties :: Lens' VPNTunnelAggregatedListItems (HashMap Text VPNTunnelsScopedList)
14319−vtaliProperties
14320− = lens _vtaliProperties
14321− (\ s a -> s{_vtaliProperties = a})
14317+vtaliAddtional :: Lens' VPNTunnelAggregatedListItems (HashMap Text VPNTunnelsScopedList)
14318+vtaliAddtional
14319+ = lens _vtaliAddtional
14320+ (\ s a -> s{_vtaliAddtional = a})
1432214321
1432314322instance FromJSON VPNTunnelAggregatedListItems where
1432414323 parseJSON
@@ -14327,7 +14326,7 @@ instance FromJSON VPNTunnelAggregatedListItems where
1432714326 VPNTunnelAggregatedListItems <$> (parseJSONObject o))
1432814327
1432914328instance ToJSON VPNTunnelAggregatedListItems where
14330− toJSON = toJSON . _vtaliProperties
14329+ toJSON = toJSON . _vtaliAddtional
1433114330
1433214331-- | A set of instance tags.
1433314332--
gogol-customsearch/gen/Network/Google/CustomSearch.hs+7−7
@@ -50,7 +50,12 @@ module Network.Google.CustomSearch
5050 -- ** SearchQueries
5151 , SearchQueries
5252 , searchQueries
53− , sqProperties
53+ , sqAddtional
54+
55+ -- ** ResultPagemapAdditionalItem
56+ , ResultPagemapAdditionalItem
57+ , resultPagemapAdditionalItem
58+ , rpaiAddtional
5459
5560 -- ** SearchURL
5661 , SearchURL
@@ -84,7 +89,7 @@ module Network.Google.CustomSearch
8489 -- ** ResultPagemap
8590 , ResultPagemap
8691 , resultPagemap
87− , rpProperties
92+ , rpAddtional
8893
8994 -- ** CSEListImgColorType
9095 , CSEListImgColorType (..)
@@ -167,11 +172,6 @@ module Network.Google.CustomSearch
167172 , qHq
168173 , qHighRange
169174
170− -- ** ResultPagemapPropertiesItem
171− , ResultPagemapPropertiesItem
172− , resultPagemapPropertiesItem
173− , rppiProperties
174−
175175 -- ** PromotionBodyLinesItem
176176 , PromotionBodyLinesItem
177177 , promotionBodyLinesItem
gogol-customsearch/gen/Network/Google/CustomSearch/Types.hs+7−7
@@ -40,7 +40,12 @@ module Network.Google.CustomSearch.Types
4040 -- * SearchQueries
4141 , SearchQueries
4242 , searchQueries
43− , sqProperties
43+ , sqAddtional
44+
45+ -- * ResultPagemapAdditionalItem
46+ , ResultPagemapAdditionalItem
47+ , resultPagemapAdditionalItem
48+ , rpaiAddtional
4449
4550 -- * SearchURL
4651 , SearchURL
@@ -74,7 +79,7 @@ module Network.Google.CustomSearch.Types
7479 -- * ResultPagemap
7580 , ResultPagemap
7681 , resultPagemap
77− , rpProperties
82+ , rpAddtional
7883
7984 -- * CSEListImgColorType
8085 , CSEListImgColorType (..)
@@ -157,11 +162,6 @@ module Network.Google.CustomSearch.Types
157162 , qHq
158163 , qHighRange
159164
160− -- * ResultPagemapPropertiesItem
161− , ResultPagemapPropertiesItem
162− , resultPagemapPropertiesItem
163− , rppiProperties
164−
165165 -- * PromotionBodyLinesItem
166166 , PromotionBodyLinesItem
167167 , promotionBodyLinesItem
gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+51−51
@@ -118,25 +118,25 @@ instance ToJSON Context where
118118--
119119-- /See:/ 'searchQueries' smart constructor.
120120newtype SearchQueries = SearchQueries
121− { _sqProperties :: HashMap Text [Query]
121+ { _sqAddtional :: HashMap Text [Query]
122122 } deriving (Eq,Show,Data,Typeable,Generic)
123123
124124-- | Creates a value of 'SearchQueries' with the minimum fields required to make a request.
125125--
126126-- Use one of the following lenses to modify other fields as desired:
127127--
128−-- * 'sqProperties'
128+-- * 'sqAddtional'
129129searchQueries
130− :: HashMap Text [Query] -- ^ 'properties'
130+ :: HashMap Text [Query] -- ^ 'addtional'
131131 -> SearchQueries
132−searchQueries pSqProperties_ =
132+searchQueries pSqAddtional_ =
133133 SearchQueries
134− { _sqProperties = pSqProperties_
134+ { _sqAddtional = pSqAddtional_
135135 }
136136
137−sqProperties :: Lens' SearchQueries (HashMap Text [Query])
138−sqProperties
139− = lens _sqProperties (\ s a -> s{_sqProperties = a})
137+sqAddtional :: Lens' SearchQueries (HashMap Text [Query])
138+sqAddtional
139+ = lens _sqAddtional (\ s a -> s{_sqAddtional = a})
140140
141141instance FromJSON SearchQueries where
142142 parseJSON
@@ -144,7 +144,40 @@ instance FromJSON SearchQueries where
144144 (\ o -> SearchQueries <$> (parseJSONObject o))
145145
146146instance ToJSON SearchQueries where
147− toJSON = toJSON . _sqProperties
147+ toJSON = toJSON . _sqAddtional
148+
149+--
150+-- /See:/ 'resultPagemapAdditionalItem' smart constructor.
151+newtype ResultPagemapAdditionalItem = ResultPagemapAdditionalItem
152+ { _rpaiAddtional :: HashMap Text JSONValue
153+ } deriving (Eq,Show,Data,Typeable,Generic)
154+
155+-- | Creates a value of 'ResultPagemapAdditionalItem' with the minimum fields required to make a request.
156+--
157+-- Use one of the following lenses to modify other fields as desired:
158+--
159+-- * 'rpaiAddtional'
160+resultPagemapAdditionalItem
161+ :: HashMap Text JSONValue -- ^ 'addtional'
162+ -> ResultPagemapAdditionalItem
163+resultPagemapAdditionalItem pRpaiAddtional_ =
164+ ResultPagemapAdditionalItem
165+ { _rpaiAddtional = pRpaiAddtional_
166+ }
167+
168+rpaiAddtional :: Lens' ResultPagemapAdditionalItem (HashMap Text JSONValue)
169+rpaiAddtional
170+ = lens _rpaiAddtional
171+ (\ s a -> s{_rpaiAddtional = a})
172+
173+instance FromJSON ResultPagemapAdditionalItem where
174+ parseJSON
175+ = withObject "ResultPagemapAdditionalItem"
176+ (\ o ->
177+ ResultPagemapAdditionalItem <$> (parseJSONObject o))
178+
179+instance ToJSON ResultPagemapAdditionalItem where
180+ toJSON = toJSON . _rpaiAddtional
148181
149182--
150183-- /See:/ 'searchURL' smart constructor.
@@ -337,25 +370,25 @@ instance ToJSON ResultImage where
337370--
338371-- /See:/ 'resultPagemap' smart constructor.
339372newtype ResultPagemap = ResultPagemap
340− { _rpProperties :: HashMap Text [ResultPagemapPropertiesItem]
373+ { _rpAddtional :: HashMap Text [ResultPagemapAdditionalItem]
341374 } deriving (Eq,Show,Data,Typeable,Generic)
342375
343376-- | Creates a value of 'ResultPagemap' with the minimum fields required to make a request.
344377--
345378-- Use one of the following lenses to modify other fields as desired:
346379--
347−-- * 'rpProperties'
380+-- * 'rpAddtional'
348381resultPagemap
349− :: HashMap Text [ResultPagemapPropertiesItem] -- ^ 'properties'
382+ :: HashMap Text [ResultPagemapAdditionalItem] -- ^ 'addtional'
350383 -> ResultPagemap
351−resultPagemap pRpProperties_ =
384+resultPagemap pRpAddtional_ =
352385 ResultPagemap
353− { _rpProperties = pRpProperties_
386+ { _rpAddtional = pRpAddtional_
354387 }
355388
356−rpProperties :: Lens' ResultPagemap (HashMap Text [ResultPagemapPropertiesItem])
357−rpProperties
358− = lens _rpProperties (\ s a -> s{_rpProperties = a})
389+rpAddtional :: Lens' ResultPagemap (HashMap Text [ResultPagemapAdditionalItem])
390+rpAddtional
391+ = lens _rpAddtional (\ s a -> s{_rpAddtional = a})
359392
360393instance FromJSON ResultPagemap where
361394 parseJSON
@@ -363,7 +396,7 @@ instance FromJSON ResultPagemap where
363396 (\ o -> ResultPagemap <$> (parseJSONObject o))
364397
365398instance ToJSON ResultPagemap where
366− toJSON = toJSON . _rpProperties
399+ toJSON = toJSON . _rpAddtional
367400
368401--
369402-- /See:/ 'result' smart constructor.
@@ -1044,39 +1077,6 @@ instance ToJSON Query where
10441077 ("hq" .=) <$> _qHq,
10451078 ("highRange" .=) <$> _qHighRange])
10461079
1047−--
1048−-- /See:/ 'resultPagemapPropertiesItem' smart constructor.
1049−newtype ResultPagemapPropertiesItem = ResultPagemapPropertiesItem
1050− { _rppiProperties :: HashMap Text JSONValue
1051− } deriving (Eq,Show,Data,Typeable,Generic)
1052−
1053−-- | Creates a value of 'ResultPagemapPropertiesItem' with the minimum fields required to make a request.
1054−--
1055−-- Use one of the following lenses to modify other fields as desired:
1056−--
1057−-- * 'rppiProperties'
1058−resultPagemapPropertiesItem
1059− :: HashMap Text JSONValue -- ^ 'properties'
1060− -> ResultPagemapPropertiesItem
1061−resultPagemapPropertiesItem pRppiProperties_ =
1062− ResultPagemapPropertiesItem
1063− { _rppiProperties = pRppiProperties_
1064− }
1065−
1066−rppiProperties :: Lens' ResultPagemapPropertiesItem (HashMap Text JSONValue)
1067−rppiProperties
1068− = lens _rppiProperties
1069− (\ s a -> s{_rppiProperties = a})
1070−
1071−instance FromJSON ResultPagemapPropertiesItem where
1072− parseJSON
1073− = withObject "ResultPagemapPropertiesItem"
1074− (\ o ->
1075− ResultPagemapPropertiesItem <$> (parseJSONObject o))
1076−
1077−instance ToJSON ResultPagemapPropertiesItem where
1078− toJSON = toJSON . _rppiProperties
1079−
10801080--
10811081-- /See:/ 'promotionBodyLinesItem' smart constructor.
10821082data PromotionBodyLinesItem = PromotionBodyLinesItem
gogol-dataflow/gen/Network/Google/Dataflow.hs+24−24
@@ -52,7 +52,7 @@ module Network.Google.Dataflow
5252 -- ** JobExecutionInfoStages
5353 , JobExecutionInfoStages
5454 , jobExecutionInfoStages
55− , jeisProperties
55+ , jeisAddtional
5656
5757 -- ** ComputationTopology
5858 , ComputationTopology
@@ -106,7 +106,7 @@ module Network.Google.Dataflow
106106 -- ** WorkerPoolMetadata
107107 , WorkerPoolMetadata
108108 , workerPoolMetadata
109− , wpmProperties
109+ , wpmAddtional
110110
111111 -- ** AutoscalingSettings
112112 , AutoscalingSettings
@@ -136,7 +136,7 @@ module Network.Google.Dataflow
136136 -- ** EnvironmentVersion
137137 , EnvironmentVersion
138138 , environmentVersion
139− , evProperties
139+ , evAddtional
140140
141141 -- ** Sink
142142 , Sink
@@ -160,7 +160,7 @@ module Network.Google.Dataflow
160160 -- ** EnvironmentUserAgent
161161 , EnvironmentUserAgent
162162 , environmentUserAgent
163− , euaProperties
163+ , euaAddtional
164164
165165 -- ** Disk
166166 , Disk
@@ -209,7 +209,7 @@ module Network.Google.Dataflow
209209 -- ** MetricStructuredNameContext
210210 , MetricStructuredNameContext
211211 , metricStructuredNameContext
212− , msncProperties
212+ , msncAddtional
213213
214214 -- ** StreamingStageLocation
215215 , StreamingStageLocation
@@ -251,12 +251,12 @@ module Network.Google.Dataflow
251251 -- ** JobTransformNameMApping
252252 , JobTransformNameMApping
253253 , jobTransformNameMApping
254− , jtnmaProperties
254+ , jtnmaAddtional
255255
256256 -- ** SourceSpec
257257 , SourceSpec
258258 , sourceSpec
259− , ssProperties
259+ , ssAddtional
260260
261261 -- ** SourceMetadata
262262 , SourceMetadata
@@ -268,7 +268,7 @@ module Network.Google.Dataflow
268268 -- ** EnvironmentInternalExperiments
269269 , EnvironmentInternalExperiments
270270 , environmentInternalExperiments
271− , eieProperties
271+ , eieAddtional
272272
273273 -- ** TaskRunnerSettings
274274 , TaskRunnerSettings
@@ -296,7 +296,7 @@ module Network.Google.Dataflow
296296 -- ** EnvironmentSdkPipelineOptions
297297 , EnvironmentSdkPipelineOptions
298298 , environmentSdkPipelineOptions
299− , espoProperties
299+ , espoAddtional
300300
301301 -- ** LeaseWorkItemRequest
302302 , LeaseWorkItemRequest
@@ -316,7 +316,7 @@ module Network.Google.Dataflow
316316 -- ** TopologyConfigUserStageToComputationNameMap
317317 , TopologyConfigUserStageToComputationNameMap
318318 , topologyConfigUserStageToComputationNameMap
319− , tcustcnmProperties
319+ , tcustcnmAddtional
320320
321321 -- ** ShellTask
322322 , ShellTask
@@ -327,12 +327,12 @@ module Network.Google.Dataflow
327327 -- ** StatusDetailsItem
328328 , StatusDetailsItem
329329 , statusDetailsItem
330− , sdiProperties
330+ , sdiAddtional
331331
332332 -- ** StepProperties
333333 , StepProperties
334334 , stepProperties
335− , spProperties
335+ , spAddtional
336336
337337 -- ** TopologyConfig
338338 , TopologyConfig
@@ -354,7 +354,7 @@ module Network.Google.Dataflow
354354 -- ** WorkItemServiceStateHarnessData
355355 , WorkItemServiceStateHarnessData
356356 , workItemServiceStateHarnessData
357− , wisshdProperties
357+ , wisshdAddtional
358358
359359 -- ** DataDiskAssignment
360360 , DataDiskAssignment
@@ -382,7 +382,7 @@ module Network.Google.Dataflow
382382 -- ** PartialGroupByKeyInstructionInputElementCodec
383383 , PartialGroupByKeyInstructionInputElementCodec
384384 , partialGroupByKeyInstructionInputElementCodec
385− , pgbkiiecProperties
385+ , pgbkiiecAddtional
386386
387387 -- ** MapTask
388388 , MapTask
@@ -399,17 +399,17 @@ module Network.Google.Dataflow
399399 -- ** SinkCodec
400400 , SinkCodec
401401 , sinkCodec
402− , scProperties
402+ , scAddtional
403403
404404 -- ** ParDoInstructionUserFn
405405 , ParDoInstructionUserFn
406406 , parDoInstructionUserFn
407− , pdiufProperties
407+ , pdiufAddtional
408408
409409 -- ** InstructionOutputCodec
410410 , InstructionOutputCodec
411411 , instructionOutputCodec
412− , iocProperties
412+ , iocAddtional
413413
414414 -- ** StreamLocation
415415 , StreamLocation
@@ -422,7 +422,7 @@ module Network.Google.Dataflow
422422 -- ** WorkerPoolPoolArgs
423423 , WorkerPoolPoolArgs
424424 , workerPoolPoolArgs
425− , wppaProperties
425+ , wppaAddtional
426426
427427 -- ** StreamingSideInputLocation
428428 , StreamingSideInputLocation
@@ -459,12 +459,12 @@ module Network.Google.Dataflow
459459 -- ** SeqMapTaskUserFn
460460 , SeqMapTaskUserFn
461461 , seqMapTaskUserFn
462− , smtufProperties
462+ , smtufAddtional
463463
464464 -- ** PartialGroupByKeyInstructionValueCombiningFn
465465 , PartialGroupByKeyInstructionValueCombiningFn
466466 , partialGroupByKeyInstructionValueCombiningFn
467− , pgbkivcfProperties
467+ , pgbkivcfAddtional
468468
469469 -- ** Job
470470 , Job
@@ -493,7 +493,7 @@ module Network.Google.Dataflow
493493 -- ** SinkSpec
494494 , SinkSpec
495495 , sinkSpec
496− , ssProperties
496+ , sAddtional
497497
498498 -- ** WorkerPool
499499 , WorkerPool
@@ -614,7 +614,7 @@ module Network.Google.Dataflow
614614 -- ** SourceBaseSpecsItem
615615 , SourceBaseSpecsItem
616616 , sourceBaseSpecsItem
617− , sbsiProperties
617+ , sbsiAddtional
618618
619619 -- ** ParallelInstruction
620620 , ParallelInstruction
@@ -631,7 +631,7 @@ module Network.Google.Dataflow
631631 -- ** SideInputInfoKind
632632 , SideInputInfoKind
633633 , sideInputInfoKind
634− , siikProperties
634+ , siikAddtional
635635
636636 -- ** SourceSplitShard
637637 , SourceSplitShard
@@ -654,7 +654,7 @@ module Network.Google.Dataflow
654654 -- ** SourceCodec
655655 , SourceCodec
656656 , sourceCodec
657− , scProperties
657+ , souAddtional
658658
659659 -- ** StateFamilyConfig
660660 , StateFamilyConfig
gogol-dataflow/gen/Network/Google/Dataflow/Types.hs+24−24
@@ -21,7 +21,7 @@ module Network.Google.Dataflow.Types
2121 -- * JobExecutionInfoStages
2222 , JobExecutionInfoStages
2323 , jobExecutionInfoStages
24− , jeisProperties
24+ , jeisAddtional
2525
2626 -- * ComputationTopology
2727 , ComputationTopology
@@ -75,7 +75,7 @@ module Network.Google.Dataflow.Types
7575 -- * WorkerPoolMetadata
7676 , WorkerPoolMetadata
7777 , workerPoolMetadata
78− , wpmProperties
78+ , wpmAddtional
7979
8080 -- * AutoscalingSettings
8181 , AutoscalingSettings
@@ -105,7 +105,7 @@ module Network.Google.Dataflow.Types
105105 -- * EnvironmentVersion
106106 , EnvironmentVersion
107107 , environmentVersion
108− , evProperties
108+ , evAddtional
109109
110110 -- * Sink
111111 , Sink
@@ -129,7 +129,7 @@ module Network.Google.Dataflow.Types
129129 -- * EnvironmentUserAgent
130130 , EnvironmentUserAgent
131131 , environmentUserAgent
132− , euaProperties
132+ , euaAddtional
133133
134134 -- * Disk
135135 , Disk
@@ -178,7 +178,7 @@ module Network.Google.Dataflow.Types
178178 -- * MetricStructuredNameContext
179179 , MetricStructuredNameContext
180180 , metricStructuredNameContext
181− , msncProperties
181+ , msncAddtional
182182
183183 -- * StreamingStageLocation
184184 , StreamingStageLocation
@@ -220,12 +220,12 @@ module Network.Google.Dataflow.Types
220220 -- * JobTransformNameMApping
221221 , JobTransformNameMApping
222222 , jobTransformNameMApping
223− , jtnmaProperties
223+ , jtnmaAddtional
224224
225225 -- * SourceSpec
226226 , SourceSpec
227227 , sourceSpec
228− , ssProperties
228+ , ssAddtional
229229
230230 -- * SourceMetadata
231231 , SourceMetadata
@@ -237,7 +237,7 @@ module Network.Google.Dataflow.Types
237237 -- * EnvironmentInternalExperiments
238238 , EnvironmentInternalExperiments
239239 , environmentInternalExperiments
240− , eieProperties
240+ , eieAddtional
241241
242242 -- * TaskRunnerSettings
243243 , TaskRunnerSettings
@@ -265,7 +265,7 @@ module Network.Google.Dataflow.Types
265265 -- * EnvironmentSdkPipelineOptions
266266 , EnvironmentSdkPipelineOptions
267267 , environmentSdkPipelineOptions
268− , espoProperties
268+ , espoAddtional
269269
270270 -- * LeaseWorkItemRequest
271271 , LeaseWorkItemRequest
@@ -285,7 +285,7 @@ module Network.Google.Dataflow.Types
285285 -- * TopologyConfigUserStageToComputationNameMap
286286 , TopologyConfigUserStageToComputationNameMap
287287 , topologyConfigUserStageToComputationNameMap
288− , tcustcnmProperties
288+ , tcustcnmAddtional
289289
290290 -- * ShellTask
291291 , ShellTask
@@ -296,12 +296,12 @@ module Network.Google.Dataflow.Types
296296 -- * StatusDetailsItem
297297 , StatusDetailsItem
298298 , statusDetailsItem
299− , sdiProperties
299+ , sdiAddtional
300300
301301 -- * StepProperties
302302 , StepProperties
303303 , stepProperties
304− , spProperties
304+ , spAddtional
305305
306306 -- * TopologyConfig
307307 , TopologyConfig
@@ -323,7 +323,7 @@ module Network.Google.Dataflow.Types
323323 -- * WorkItemServiceStateHarnessData
324324 , WorkItemServiceStateHarnessData
325325 , workItemServiceStateHarnessData
326− , wisshdProperties
326+ , wisshdAddtional
327327
328328 -- * DataDiskAssignment
329329 , DataDiskAssignment
@@ -351,7 +351,7 @@ module Network.Google.Dataflow.Types
351351 -- * PartialGroupByKeyInstructionInputElementCodec
352352 , PartialGroupByKeyInstructionInputElementCodec
353353 , partialGroupByKeyInstructionInputElementCodec
354− , pgbkiiecProperties
354+ , pgbkiiecAddtional
355355
356356 -- * MapTask
357357 , MapTask
@@ -368,17 +368,17 @@ module Network.Google.Dataflow.Types
368368 -- * SinkCodec
369369 , SinkCodec
370370 , sinkCodec
371− , scProperties
371+ , scAddtional
372372
373373 -- * ParDoInstructionUserFn
374374 , ParDoInstructionUserFn
375375 , parDoInstructionUserFn
376− , pdiufProperties
376+ , pdiufAddtional
377377
378378 -- * InstructionOutputCodec
379379 , InstructionOutputCodec
380380 , instructionOutputCodec
381− , iocProperties
381+ , iocAddtional
382382
383383 -- * StreamLocation
384384 , StreamLocation
@@ -391,7 +391,7 @@ module Network.Google.Dataflow.Types
391391 -- * WorkerPoolPoolArgs
392392 , WorkerPoolPoolArgs
393393 , workerPoolPoolArgs
394− , wppaProperties
394+ , wppaAddtional
395395
396396 -- * StreamingSideInputLocation
397397 , StreamingSideInputLocation
@@ -428,12 +428,12 @@ module Network.Google.Dataflow.Types
428428 -- * SeqMapTaskUserFn
429429 , SeqMapTaskUserFn
430430 , seqMapTaskUserFn
431− , smtufProperties
431+ , smtufAddtional
432432
433433 -- * PartialGroupByKeyInstructionValueCombiningFn
434434 , PartialGroupByKeyInstructionValueCombiningFn
435435 , partialGroupByKeyInstructionValueCombiningFn
436− , pgbkivcfProperties
436+ , pgbkivcfAddtional
437437
438438 -- * Job
439439 , Job
@@ -462,7 +462,7 @@ module Network.Google.Dataflow.Types
462462 -- * SinkSpec
463463 , SinkSpec
464464 , sinkSpec
465− , ssProperties
465+ , sAddtional
466466
467467 -- * WorkerPool
468468 , WorkerPool
@@ -583,7 +583,7 @@ module Network.Google.Dataflow.Types
583583 -- * SourceBaseSpecsItem
584584 , SourceBaseSpecsItem
585585 , sourceBaseSpecsItem
586− , sbsiProperties
586+ , sbsiAddtional
587587
588588 -- * ParallelInstruction
589589 , ParallelInstruction
@@ -600,7 +600,7 @@ module Network.Google.Dataflow.Types
600600 -- * SideInputInfoKind
601601 , SideInputInfoKind
602602 , sideInputInfoKind
603− , siikProperties
603+ , siikAddtional
604604
605605 -- * SourceSplitShard
606606 , SourceSplitShard
@@ -623,7 +623,7 @@ module Network.Google.Dataflow.Types
623623 -- * SourceCodec
624624 , SourceCodec
625625 , sourceCodec
626− , scProperties
626+ , souAddtional
627627
628628 -- * StateFamilyConfig
629629 , StateFamilyConfig
gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+229−234
@@ -24,26 +24,26 @@ import Network.Google.Prelude
2424--
2525-- /See:/ 'jobExecutionInfoStages' smart constructor.
2626newtype JobExecutionInfoStages = JobExecutionInfoStages
27− { _jeisProperties :: HashMap Text JobExecutionStageInfo
27+ { _jeisAddtional :: HashMap Text JobExecutionStageInfo
2828 } deriving (Eq,Show,Data,Typeable,Generic)
2929
3030-- | Creates a value of 'JobExecutionInfoStages' with the minimum fields required to make a request.
3131--
3232-- Use one of the following lenses to modify other fields as desired:
3333--
34−-- * 'jeisProperties'
34+-- * 'jeisAddtional'
3535jobExecutionInfoStages
36− :: HashMap Text JobExecutionStageInfo -- ^ 'properties'
36+ :: HashMap Text JobExecutionStageInfo -- ^ 'addtional'
3737 -> JobExecutionInfoStages
38−jobExecutionInfoStages pJeisProperties_ =
38+jobExecutionInfoStages pJeisAddtional_ =
3939 JobExecutionInfoStages
40− { _jeisProperties = pJeisProperties_
40+ { _jeisAddtional = pJeisAddtional_
4141 }
4242
43−jeisProperties :: Lens' JobExecutionInfoStages (HashMap Text JobExecutionStageInfo)
44−jeisProperties
45− = lens _jeisProperties
46− (\ s a -> s{_jeisProperties = a})
43+jeisAddtional :: Lens' JobExecutionInfoStages (HashMap Text JobExecutionStageInfo)
44+jeisAddtional
45+ = lens _jeisAddtional
46+ (\ s a -> s{_jeisAddtional = a})
4747
4848instance FromJSON JobExecutionInfoStages where
4949 parseJSON
@@ -52,7 +52,7 @@ instance FromJSON JobExecutionInfoStages where
5252 JobExecutionInfoStages <$> (parseJSONObject o))
5353
5454instance ToJSON JobExecutionInfoStages where
55− toJSON = toJSON . _jeisProperties
55+ toJSON = toJSON . _jeisAddtional
5656
5757-- | All configuration data for a particular Computation.
5858--
@@ -583,26 +583,25 @@ instance ToJSON SourceSplitOptions where
583583--
584584-- /See:/ 'workerPoolMetadata' smart constructor.
585585newtype WorkerPoolMetadata = WorkerPoolMetadata
586− { _wpmProperties :: HashMap Text Text
586+ { _wpmAddtional :: HashMap Text Text
587587 } deriving (Eq,Show,Data,Typeable,Generic)
588588
589589-- | Creates a value of 'WorkerPoolMetadata' with the minimum fields required to make a request.
590590--
591591-- Use one of the following lenses to modify other fields as desired:
592592--
593−-- * 'wpmProperties'
593+-- * 'wpmAddtional'
594594workerPoolMetadata
595− :: HashMap Text Text -- ^ 'properties'
595+ :: HashMap Text Text -- ^ 'addtional'
596596 -> WorkerPoolMetadata
597−workerPoolMetadata pWpmProperties_ =
597+workerPoolMetadata pWpmAddtional_ =
598598 WorkerPoolMetadata
599− { _wpmProperties = pWpmProperties_
599+ { _wpmAddtional = pWpmAddtional_
600600 }
601601
602−wpmProperties :: Lens' WorkerPoolMetadata (HashMap Text Text)
603−wpmProperties
604− = lens _wpmProperties
605− (\ s a -> s{_wpmProperties = a})
602+wpmAddtional :: Lens' WorkerPoolMetadata (HashMap Text Text)
603+wpmAddtional
604+ = lens _wpmAddtional (\ s a -> s{_wpmAddtional = a})
606605
607606instance FromJSON WorkerPoolMetadata where
608607 parseJSON
@@ -610,7 +609,7 @@ instance FromJSON WorkerPoolMetadata where
610609 (\ o -> WorkerPoolMetadata <$> (parseJSONObject o))
611610
612611instance ToJSON WorkerPoolMetadata where
613− toJSON = toJSON . _wpmProperties
612+ toJSON = toJSON . _wpmAddtional
614613
615614-- | Settings for WorkerPool autoscaling.
616615--
@@ -832,26 +831,26 @@ instance ToJSON ReportWorkItemStatusRequest where
832831--
833832-- /See:/ 'environmentVersion' smart constructor.
834833newtype EnvironmentVersion = EnvironmentVersion
835− { _evProperties :: HashMap Text JSONValue
834+ { _evAddtional :: HashMap Text JSONValue
836835 } deriving (Eq,Show,Data,Typeable,Generic)
837836
838837-- | Creates a value of 'EnvironmentVersion' with the minimum fields required to make a request.
839838--
840839-- Use one of the following lenses to modify other fields as desired:
841840--
842−-- * 'evProperties'
841+-- * 'evAddtional'
843842environmentVersion
844− :: HashMap Text JSONValue -- ^ 'properties'
843+ :: HashMap Text JSONValue -- ^ 'addtional'
845844 -> EnvironmentVersion
846−environmentVersion pEvProperties_ =
845+environmentVersion pEvAddtional_ =
847846 EnvironmentVersion
848− { _evProperties = pEvProperties_
847+ { _evAddtional = pEvAddtional_
849848 }
850849
851850-- | Properties of the object.
852−evProperties :: Lens' EnvironmentVersion (HashMap Text JSONValue)
853−evProperties
854− = lens _evProperties (\ s a -> s{_evProperties = a})
851+evAddtional :: Lens' EnvironmentVersion (HashMap Text JSONValue)
852+evAddtional
853+ = lens _evAddtional (\ s a -> s{_evAddtional = a})
855854
856855instance FromJSON EnvironmentVersion where
857856 parseJSON
@@ -859,7 +858,7 @@ instance FromJSON EnvironmentVersion where
859858 (\ o -> EnvironmentVersion <$> (parseJSONObject o))
860859
861860instance ToJSON EnvironmentVersion where
862− toJSON = toJSON . _evProperties
861+ toJSON = toJSON . _evAddtional
863862
864863-- | A sink that records can be encoded and written to.
865864--
@@ -1015,27 +1014,26 @@ instance ToJSON WriteInstruction where
10151014--
10161015-- /See:/ 'environmentUserAgent' smart constructor.
10171016newtype EnvironmentUserAgent = EnvironmentUserAgent
1018− { _euaProperties :: HashMap Text JSONValue
1017+ { _euaAddtional :: HashMap Text JSONValue
10191018 } deriving (Eq,Show,Data,Typeable,Generic)
10201019
10211020-- | Creates a value of 'EnvironmentUserAgent' with the minimum fields required to make a request.
10221021--
10231022-- Use one of the following lenses to modify other fields as desired:
10241023--
1025−-- * 'euaProperties'
1024+-- * 'euaAddtional'
10261025environmentUserAgent
1027− :: HashMap Text JSONValue -- ^ 'properties'
1026+ :: HashMap Text JSONValue -- ^ 'addtional'
10281027 -> EnvironmentUserAgent
1029−environmentUserAgent pEuaProperties_ =
1028+environmentUserAgent pEuaAddtional_ =
10301029 EnvironmentUserAgent
1031− { _euaProperties = pEuaProperties_
1030+ { _euaAddtional = pEuaAddtional_
10321031 }
10331032
10341033-- | Properties of the object.
1035−euaProperties :: Lens' EnvironmentUserAgent (HashMap Text JSONValue)
1036−euaProperties
1037− = lens _euaProperties
1038− (\ s a -> s{_euaProperties = a})
1034+euaAddtional :: Lens' EnvironmentUserAgent (HashMap Text JSONValue)
1035+euaAddtional
1036+ = lens _euaAddtional (\ s a -> s{_euaAddtional = a})
10391037
10401038instance FromJSON EnvironmentUserAgent where
10411039 parseJSON
@@ -1043,7 +1041,7 @@ instance FromJSON EnvironmentUserAgent where
10431041 (\ o -> EnvironmentUserAgent <$> (parseJSONObject o))
10441042
10451043instance ToJSON EnvironmentUserAgent where
1046− toJSON = toJSON . _euaProperties
1044+ toJSON = toJSON . _euaAddtional
10471045
10481046-- | Describes the data disk used by a workflow job.
10491047--
@@ -1495,26 +1493,26 @@ instance ToJSON ConcatPosition where
14951493--
14961494-- /See:/ 'metricStructuredNameContext' smart constructor.
14971495newtype MetricStructuredNameContext = MetricStructuredNameContext
1498− { _msncProperties :: HashMap Text Text
1496+ { _msncAddtional :: HashMap Text Text
14991497 } deriving (Eq,Show,Data,Typeable,Generic)
15001498
15011499-- | Creates a value of 'MetricStructuredNameContext' with the minimum fields required to make a request.
15021500--
15031501-- Use one of the following lenses to modify other fields as desired:
15041502--
1505−-- * 'msncProperties'
1503+-- * 'msncAddtional'
15061504metricStructuredNameContext
1507− :: HashMap Text Text -- ^ 'properties'
1505+ :: HashMap Text Text -- ^ 'addtional'
15081506 -> MetricStructuredNameContext
1509−metricStructuredNameContext pMsncProperties_ =
1507+metricStructuredNameContext pMsncAddtional_ =
15101508 MetricStructuredNameContext
1511− { _msncProperties = pMsncProperties_
1509+ { _msncAddtional = pMsncAddtional_
15121510 }
15131511
1514−msncProperties :: Lens' MetricStructuredNameContext (HashMap Text Text)
1515−msncProperties
1516− = lens _msncProperties
1517− (\ s a -> s{_msncProperties = a})
1512+msncAddtional :: Lens' MetricStructuredNameContext (HashMap Text Text)
1513+msncAddtional
1514+ = lens _msncAddtional
1515+ (\ s a -> s{_msncAddtional = a})
15181516
15191517instance FromJSON MetricStructuredNameContext where
15201518 parseJSON
@@ -1523,7 +1521,7 @@ instance FromJSON MetricStructuredNameContext where
15231521 MetricStructuredNameContext <$> (parseJSONObject o))
15241522
15251523instance ToJSON MetricStructuredNameContext where
1526− toJSON = toJSON . _msncProperties
1524+ toJSON = toJSON . _msncAddtional
15271525
15281526-- | Identifies the location of a streaming computation stage, for
15291527-- stage-to-stage communication.
@@ -1903,26 +1901,26 @@ instance ToJSON FlattenInstruction where
19031901--
19041902-- /See:/ 'jobTransformNameMApping' smart constructor.
19051903newtype JobTransformNameMApping = JobTransformNameMApping
1906− { _jtnmaProperties :: HashMap Text Text
1904+ { _jtnmaAddtional :: HashMap Text Text
19071905 } deriving (Eq,Show,Data,Typeable,Generic)
19081906
19091907-- | Creates a value of 'JobTransformNameMApping' with the minimum fields required to make a request.
19101908--
19111909-- Use one of the following lenses to modify other fields as desired:
19121910--
1913−-- * 'jtnmaProperties'
1911+-- * 'jtnmaAddtional'
19141912jobTransformNameMApping
1915− :: HashMap Text Text -- ^ 'properties'
1913+ :: HashMap Text Text -- ^ 'addtional'
19161914 -> JobTransformNameMApping
1917−jobTransformNameMApping pJtnmaProperties_ =
1915+jobTransformNameMApping pJtnmaAddtional_ =
19181916 JobTransformNameMApping
1919− { _jtnmaProperties = pJtnmaProperties_
1917+ { _jtnmaAddtional = pJtnmaAddtional_
19201918 }
19211919
1922−jtnmaProperties :: Lens' JobTransformNameMApping (HashMap Text Text)
1923−jtnmaProperties
1924− = lens _jtnmaProperties
1925− (\ s a -> s{_jtnmaProperties = a})
1920+jtnmaAddtional :: Lens' JobTransformNameMApping (HashMap Text Text)
1921+jtnmaAddtional
1922+ = lens _jtnmaAddtional
1923+ (\ s a -> s{_jtnmaAddtional = a})
19261924
19271925instance FromJSON JobTransformNameMApping where
19281926 parseJSON
@@ -1931,32 +1929,32 @@ instance FromJSON JobTransformNameMApping where
19311929 JobTransformNameMApping <$> (parseJSONObject o))
19321930
19331931instance ToJSON JobTransformNameMApping where
1934− toJSON = toJSON . _jtnmaProperties
1932+ toJSON = toJSON . _jtnmaAddtional
19351933
19361934-- | The source to read from, plus its parameters.
19371935--
19381936-- /See:/ 'sourceSpec' smart constructor.
19391937newtype SourceSpec = SourceSpec
1940− { _ssProperties :: HashMap Text JSONValue
1938+ { _ssAddtional :: HashMap Text JSONValue
19411939 } deriving (Eq,Show,Data,Typeable,Generic)
19421940
19431941-- | Creates a value of 'SourceSpec' with the minimum fields required to make a request.
19441942--
19451943-- Use one of the following lenses to modify other fields as desired:
19461944--
1947−-- * 'ssProperties'
1945+-- * 'ssAddtional'
19481946sourceSpec
1949− :: HashMap Text JSONValue -- ^ 'properties'
1947+ :: HashMap Text JSONValue -- ^ 'addtional'
19501948 -> SourceSpec
1951−sourceSpec pSsProperties_ =
1949+sourceSpec pSsAddtional_ =
19521950 SourceSpec
1953− { _ssProperties = pSsProperties_
1951+ { _ssAddtional = pSsAddtional_
19541952 }
19551953
19561954-- | Properties of the object.
1957−ssProperties :: Lens' SourceSpec (HashMap Text JSONValue)
1958−ssProperties
1959− = lens _ssProperties (\ s a -> s{_ssProperties = a})
1955+ssAddtional :: Lens' SourceSpec (HashMap Text JSONValue)
1956+ssAddtional
1957+ = lens _ssAddtional (\ s a -> s{_ssAddtional = a})
19601958
19611959instance FromJSON SourceSpec where
19621960 parseJSON
@@ -1964,7 +1962,7 @@ instance FromJSON SourceSpec where
19641962 (\ o -> SourceSpec <$> (parseJSONObject o))
19651963
19661964instance ToJSON SourceSpec where
1967− toJSON = toJSON . _ssProperties
1965+ toJSON = toJSON . _ssAddtional
19681966
19691967-- | Metadata about a Source useful for automatically optimizing and tuning
19701968-- the pipeline, etc.
@@ -2036,27 +2034,26 @@ instance ToJSON SourceMetadata where
20362034--
20372035-- /See:/ 'environmentInternalExperiments' smart constructor.
20382036newtype EnvironmentInternalExperiments = EnvironmentInternalExperiments
2039− { _eieProperties :: HashMap Text JSONValue
2037+ { _eieAddtional :: HashMap Text JSONValue
20402038 } deriving (Eq,Show,Data,Typeable,Generic)
20412039
20422040-- | Creates a value of 'EnvironmentInternalExperiments' with the minimum fields required to make a request.
20432041--
20442042-- Use one of the following lenses to modify other fields as desired:
20452043--
2046−-- * 'eieProperties'
2044+-- * 'eieAddtional'
20472045environmentInternalExperiments
2048− :: HashMap Text JSONValue -- ^ 'properties'
2046+ :: HashMap Text JSONValue -- ^ 'addtional'
20492047 -> EnvironmentInternalExperiments
2050−environmentInternalExperiments pEieProperties_ =
2048+environmentInternalExperiments pEieAddtional_ =
20512049 EnvironmentInternalExperiments
2052− { _eieProperties = pEieProperties_
2050+ { _eieAddtional = pEieAddtional_
20532051 }
20542052
20552053-- | Properties of the object. Contains field \'ype with type URL.
2056−eieProperties :: Lens' EnvironmentInternalExperiments (HashMap Text JSONValue)
2057−eieProperties
2058− = lens _eieProperties
2059− (\ s a -> s{_eieProperties = a})
2054+eieAddtional :: Lens' EnvironmentInternalExperiments (HashMap Text JSONValue)
2055+eieAddtional
2056+ = lens _eieAddtional (\ s a -> s{_eieAddtional = a})
20602057
20612058instance FromJSON EnvironmentInternalExperiments
20622059 where
@@ -2067,7 +2064,7 @@ instance FromJSON EnvironmentInternalExperiments
20672064 (parseJSONObject o))
20682065
20692066instance ToJSON EnvironmentInternalExperiments where
2070− toJSON = toJSON . _eieProperties
2067+ toJSON = toJSON . _eieAddtional
20712068
20722069-- | Taskrunner configuration settings.
20732070--
@@ -2344,27 +2341,27 @@ instance ToJSON TaskRunnerSettings where
23442341--
23452342-- /See:/ 'environmentSdkPipelineOptions' smart constructor.
23462343newtype EnvironmentSdkPipelineOptions = EnvironmentSdkPipelineOptions
2347− { _espoProperties :: HashMap Text JSONValue
2344+ { _espoAddtional :: HashMap Text JSONValue
23482345 } deriving (Eq,Show,Data,Typeable,Generic)
23492346
23502347-- | Creates a value of 'EnvironmentSdkPipelineOptions' with the minimum fields required to make a request.
23512348--
23522349-- Use one of the following lenses to modify other fields as desired:
23532350--
2354−-- * 'espoProperties'
2351+-- * 'espoAddtional'
23552352environmentSdkPipelineOptions
2356− :: HashMap Text JSONValue -- ^ 'properties'
2353+ :: HashMap Text JSONValue -- ^ 'addtional'
23572354 -> EnvironmentSdkPipelineOptions
2358−environmentSdkPipelineOptions pEspoProperties_ =
2355+environmentSdkPipelineOptions pEspoAddtional_ =
23592356 EnvironmentSdkPipelineOptions
2360− { _espoProperties = pEspoProperties_
2357+ { _espoAddtional = pEspoAddtional_
23612358 }
23622359
23632360-- | Properties of the object.
2364−espoProperties :: Lens' EnvironmentSdkPipelineOptions (HashMap Text JSONValue)
2365−espoProperties
2366− = lens _espoProperties
2367− (\ s a -> s{_espoProperties = a})
2361+espoAddtional :: Lens' EnvironmentSdkPipelineOptions (HashMap Text JSONValue)
2362+espoAddtional
2363+ = lens _espoAddtional
2364+ (\ s a -> s{_espoAddtional = a})
23682365
23692366instance FromJSON EnvironmentSdkPipelineOptions where
23702367 parseJSON
@@ -2374,7 +2371,7 @@ instance FromJSON EnvironmentSdkPipelineOptions where
23742371 (parseJSONObject o))
23752372
23762373instance ToJSON EnvironmentSdkPipelineOptions where
2377− toJSON = toJSON . _espoProperties
2374+ toJSON = toJSON . _espoAddtional
23782375
23792376-- | Request to lease WorkItems.
23802377--
@@ -2522,26 +2519,26 @@ instance ToJSON SourceOperationResponse where
25222519--
25232520-- /See:/ 'topologyConfigUserStageToComputationNameMap' smart constructor.
25242521newtype TopologyConfigUserStageToComputationNameMap = TopologyConfigUserStageToComputationNameMap
2525− { _tcustcnmProperties :: HashMap Text Text
2522+ { _tcustcnmAddtional :: HashMap Text Text
25262523 } deriving (Eq,Show,Data,Typeable,Generic)
25272524
25282525-- | Creates a value of 'TopologyConfigUserStageToComputationNameMap' with the minimum fields required to make a request.
25292526--
25302527-- Use one of the following lenses to modify other fields as desired:
25312528--
2532−-- * 'tcustcnmProperties'
2529+-- * 'tcustcnmAddtional'
25332530topologyConfigUserStageToComputationNameMap
2534− :: HashMap Text Text -- ^ 'properties'
2531+ :: HashMap Text Text -- ^ 'addtional'
25352532 -> TopologyConfigUserStageToComputationNameMap
2536−topologyConfigUserStageToComputationNameMap pTcustcnmProperties_ =
2533+topologyConfigUserStageToComputationNameMap pTcustcnmAddtional_ =
25372534 TopologyConfigUserStageToComputationNameMap
2538− { _tcustcnmProperties = pTcustcnmProperties_
2535+ { _tcustcnmAddtional = pTcustcnmAddtional_
25392536 }
25402537
2541−tcustcnmProperties :: Lens' TopologyConfigUserStageToComputationNameMap (HashMap Text Text)
2542−tcustcnmProperties
2543− = lens _tcustcnmProperties
2544− (\ s a -> s{_tcustcnmProperties = a})
2538+tcustcnmAddtional :: Lens' TopologyConfigUserStageToComputationNameMap (HashMap Text Text)
2539+tcustcnmAddtional
2540+ = lens _tcustcnmAddtional
2541+ (\ s a -> s{_tcustcnmAddtional = a})
25452542
25462543instance FromJSON
25472544 TopologyConfigUserStageToComputationNameMap where
@@ -2554,7 +2551,7 @@ instance FromJSON
25542551
25552552instance ToJSON
25562553 TopologyConfigUserStageToComputationNameMap where
2557− toJSON = toJSON . _tcustcnmProperties
2554+ toJSON = toJSON . _tcustcnmAddtional
25582555
25592556-- | A task which consists of a shell command for the worker to execute.
25602557--
@@ -2606,27 +2603,26 @@ instance ToJSON ShellTask where
26062603--
26072604-- /See:/ 'statusDetailsItem' smart constructor.
26082605newtype StatusDetailsItem = StatusDetailsItem
2609− { _sdiProperties :: HashMap Text JSONValue
2606+ { _sdiAddtional :: HashMap Text JSONValue
26102607 } deriving (Eq,Show,Data,Typeable,Generic)
26112608
26122609-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
26132610--
26142611-- Use one of the following lenses to modify other fields as desired:
26152612--
2616−-- * 'sdiProperties'
2613+-- * 'sdiAddtional'
26172614statusDetailsItem
2618− :: HashMap Text JSONValue -- ^ 'properties'
2615+ :: HashMap Text JSONValue -- ^ 'addtional'
26192616 -> StatusDetailsItem
2620−statusDetailsItem pSdiProperties_ =
2617+statusDetailsItem pSdiAddtional_ =
26212618 StatusDetailsItem
2622− { _sdiProperties = pSdiProperties_
2619+ { _sdiAddtional = pSdiAddtional_
26232620 }
26242621
26252622-- | Properties of the object. Contains field \'ype with type URL.
2626−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
2627−sdiProperties
2628− = lens _sdiProperties
2629− (\ s a -> s{_sdiProperties = a})
2623+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
2624+sdiAddtional
2625+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
26302626
26312627instance FromJSON StatusDetailsItem where
26322628 parseJSON
@@ -2634,33 +2630,33 @@ instance FromJSON StatusDetailsItem where
26342630 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
26352631
26362632instance ToJSON StatusDetailsItem where
2637− toJSON = toJSON . _sdiProperties
2633+ toJSON = toJSON . _sdiAddtional
26382634
26392635-- | Named properties associated with the step. Each kind of predefined step
26402636-- has its own required set of properties.
26412637--
26422638-- /See:/ 'stepProperties' smart constructor.
26432639newtype StepProperties = StepProperties
2644− { _spProperties :: HashMap Text JSONValue
2640+ { _spAddtional :: HashMap Text JSONValue
26452641 } deriving (Eq,Show,Data,Typeable,Generic)
26462642
26472643-- | Creates a value of 'StepProperties' with the minimum fields required to make a request.
26482644--
26492645-- Use one of the following lenses to modify other fields as desired:
26502646--
2651−-- * 'spProperties'
2647+-- * 'spAddtional'
26522648stepProperties
2653− :: HashMap Text JSONValue -- ^ 'properties'
2649+ :: HashMap Text JSONValue -- ^ 'addtional'
26542650 -> StepProperties
2655−stepProperties pSpProperties_ =
2651+stepProperties pSpAddtional_ =
26562652 StepProperties
2657− { _spProperties = pSpProperties_
2653+ { _spAddtional = pSpAddtional_
26582654 }
26592655
26602656-- | Properties of the object.
2661−spProperties :: Lens' StepProperties (HashMap Text JSONValue)
2662−spProperties
2663− = lens _spProperties (\ s a -> s{_spProperties = a})
2657+spAddtional :: Lens' StepProperties (HashMap Text JSONValue)
2658+spAddtional
2659+ = lens _spAddtional (\ s a -> s{_spAddtional = a})
26642660
26652661instance FromJSON StepProperties where
26662662 parseJSON
@@ -2668,7 +2664,7 @@ instance FromJSON StepProperties where
26682664 (\ o -> StepProperties <$> (parseJSONObject o))
26692665
26702666instance ToJSON StepProperties where
2671− toJSON = toJSON . _spProperties
2667+ toJSON = toJSON . _spAddtional
26722668
26732669-- | Global topology of the streaming Dataflow job, including all
26742670-- computations and their sharded locations.
@@ -2849,27 +2845,27 @@ instance ToJSON WorkerSettings where
28492845--
28502846-- /See:/ 'workItemServiceStateHarnessData' smart constructor.
28512847newtype WorkItemServiceStateHarnessData = WorkItemServiceStateHarnessData
2852− { _wisshdProperties :: HashMap Text JSONValue
2848+ { _wisshdAddtional :: HashMap Text JSONValue
28532849 } deriving (Eq,Show,Data,Typeable,Generic)
28542850
28552851-- | Creates a value of 'WorkItemServiceStateHarnessData' with the minimum fields required to make a request.
28562852--
28572853-- Use one of the following lenses to modify other fields as desired:
28582854--
2859−-- * 'wisshdProperties'
2855+-- * 'wisshdAddtional'
28602856workItemServiceStateHarnessData
2861− :: HashMap Text JSONValue -- ^ 'properties'
2857+ :: HashMap Text JSONValue -- ^ 'addtional'
28622858 -> WorkItemServiceStateHarnessData
2863−workItemServiceStateHarnessData pWisshdProperties_ =
2859+workItemServiceStateHarnessData pWisshdAddtional_ =
28642860 WorkItemServiceStateHarnessData
2865− { _wisshdProperties = pWisshdProperties_
2861+ { _wisshdAddtional = pWisshdAddtional_
28662862 }
28672863
28682864-- | Properties of the object.
2869−wisshdProperties :: Lens' WorkItemServiceStateHarnessData (HashMap Text JSONValue)
2870−wisshdProperties
2871− = lens _wisshdProperties
2872− (\ s a -> s{_wisshdProperties = a})
2865+wisshdAddtional :: Lens' WorkItemServiceStateHarnessData (HashMap Text JSONValue)
2866+wisshdAddtional
2867+ = lens _wisshdAddtional
2868+ (\ s a -> s{_wisshdAddtional = a})
28732869
28742870instance FromJSON WorkItemServiceStateHarnessData
28752871 where
@@ -2880,7 +2876,7 @@ instance FromJSON WorkItemServiceStateHarnessData
28802876 (parseJSONObject o))
28812877
28822878instance ToJSON WorkItemServiceStateHarnessData where
2883− toJSON = toJSON . _wisshdProperties
2879+ toJSON = toJSON . _wisshdAddtional
28842880
28852881-- | Data disk assignment for a given VM instance.
28862882--
@@ -3112,27 +3108,27 @@ instance ToJSON StreamingSetupTask where
31123108--
31133109-- /See:/ 'partialGroupByKeyInstructionInputElementCodec' smart constructor.
31143110newtype PartialGroupByKeyInstructionInputElementCodec = PartialGroupByKeyInstructionInputElementCodec
3115− { _pgbkiiecProperties :: HashMap Text JSONValue
3111+ { _pgbkiiecAddtional :: HashMap Text JSONValue
31163112 } deriving (Eq,Show,Data,Typeable,Generic)
31173113
31183114-- | Creates a value of 'PartialGroupByKeyInstructionInputElementCodec' with the minimum fields required to make a request.
31193115--
31203116-- Use one of the following lenses to modify other fields as desired:
31213117--
3122−-- * 'pgbkiiecProperties'
3118+-- * 'pgbkiiecAddtional'
31233119partialGroupByKeyInstructionInputElementCodec
3124− :: HashMap Text JSONValue -- ^ 'properties'
3120+ :: HashMap Text JSONValue -- ^ 'addtional'
31253121 -> PartialGroupByKeyInstructionInputElementCodec
3126−partialGroupByKeyInstructionInputElementCodec pPgbkiiecProperties_ =
3122+partialGroupByKeyInstructionInputElementCodec pPgbkiiecAddtional_ =
31273123 PartialGroupByKeyInstructionInputElementCodec
3128− { _pgbkiiecProperties = pPgbkiiecProperties_
3124+ { _pgbkiiecAddtional = pPgbkiiecAddtional_
31293125 }
31303126
31313127-- | Properties of the object.
3132−pgbkiiecProperties :: Lens' PartialGroupByKeyInstructionInputElementCodec (HashMap Text JSONValue)
3133−pgbkiiecProperties
3134− = lens _pgbkiiecProperties
3135− (\ s a -> s{_pgbkiiecProperties = a})
3128+pgbkiiecAddtional :: Lens' PartialGroupByKeyInstructionInputElementCodec (HashMap Text JSONValue)
3129+pgbkiiecAddtional
3130+ = lens _pgbkiiecAddtional
3131+ (\ s a -> s{_pgbkiiecAddtional = a})
31363132
31373133instance FromJSON
31383134 PartialGroupByKeyInstructionInputElementCodec where
@@ -3145,7 +3141,7 @@ instance FromJSON
31453141
31463142instance ToJSON
31473143 PartialGroupByKeyInstructionInputElementCodec where
3148− toJSON = toJSON . _pgbkiiecProperties
3144+ toJSON = toJSON . _pgbkiiecAddtional
31493145
31503146-- | MapTask consists of an ordered set of instructions, each of which
31513147-- describes one particular low-level operation for the worker to perform
@@ -3253,26 +3249,26 @@ instance ToJSON MountedDataDisk where
32533249--
32543250-- /See:/ 'sinkCodec' smart constructor.
32553251newtype SinkCodec = SinkCodec
3256− { _scProperties :: HashMap Text JSONValue
3252+ { _scAddtional :: HashMap Text JSONValue
32573253 } deriving (Eq,Show,Data,Typeable,Generic)
32583254
32593255-- | Creates a value of 'SinkCodec' with the minimum fields required to make a request.
32603256--
32613257-- Use one of the following lenses to modify other fields as desired:
32623258--
3263−-- * 'scProperties'
3259+-- * 'scAddtional'
32643260sinkCodec
3265− :: HashMap Text JSONValue -- ^ 'properties'
3261+ :: HashMap Text JSONValue -- ^ 'addtional'
32663262 -> SinkCodec
3267−sinkCodec pScProperties_ =
3263+sinkCodec pScAddtional_ =
32683264 SinkCodec
3269− { _scProperties = pScProperties_
3265+ { _scAddtional = pScAddtional_
32703266 }
32713267
32723268-- | Properties of the object.
3273−scProperties :: Lens' SinkCodec (HashMap Text JSONValue)
3274−scProperties
3275− = lens _scProperties (\ s a -> s{_scProperties = a})
3269+scAddtional :: Lens' SinkCodec (HashMap Text JSONValue)
3270+scAddtional
3271+ = lens _scAddtional (\ s a -> s{_scAddtional = a})
32763272
32773273instance FromJSON SinkCodec where
32783274 parseJSON
@@ -3280,33 +3276,33 @@ instance FromJSON SinkCodec where
32803276 (\ o -> SinkCodec <$> (parseJSONObject o))
32813277
32823278instance ToJSON SinkCodec where
3283− toJSON = toJSON . _scProperties
3279+ toJSON = toJSON . _scAddtional
32843280
32853281-- | The user function to invoke.
32863282--
32873283-- /See:/ 'parDoInstructionUserFn' smart constructor.
32883284newtype ParDoInstructionUserFn = ParDoInstructionUserFn
3289− { _pdiufProperties :: HashMap Text JSONValue
3285+ { _pdiufAddtional :: HashMap Text JSONValue
32903286 } deriving (Eq,Show,Data,Typeable,Generic)
32913287
32923288-- | Creates a value of 'ParDoInstructionUserFn' with the minimum fields required to make a request.
32933289--
32943290-- Use one of the following lenses to modify other fields as desired:
32953291--
3296−-- * 'pdiufProperties'
3292+-- * 'pdiufAddtional'
32973293parDoInstructionUserFn
3298− :: HashMap Text JSONValue -- ^ 'properties'
3294+ :: HashMap Text JSONValue -- ^ 'addtional'
32993295 -> ParDoInstructionUserFn
3300−parDoInstructionUserFn pPdiufProperties_ =
3296+parDoInstructionUserFn pPdiufAddtional_ =
33013297 ParDoInstructionUserFn
3302− { _pdiufProperties = pPdiufProperties_
3298+ { _pdiufAddtional = pPdiufAddtional_
33033299 }
33043300
33053301-- | Properties of the object.
3306−pdiufProperties :: Lens' ParDoInstructionUserFn (HashMap Text JSONValue)
3307−pdiufProperties
3308− = lens _pdiufProperties
3309− (\ s a -> s{_pdiufProperties = a})
3302+pdiufAddtional :: Lens' ParDoInstructionUserFn (HashMap Text JSONValue)
3303+pdiufAddtional
3304+ = lens _pdiufAddtional
3305+ (\ s a -> s{_pdiufAddtional = a})
33103306
33113307instance FromJSON ParDoInstructionUserFn where
33123308 parseJSON
@@ -3315,33 +3311,32 @@ instance FromJSON ParDoInstructionUserFn where
33153311 ParDoInstructionUserFn <$> (parseJSONObject o))
33163312
33173313instance ToJSON ParDoInstructionUserFn where
3318− toJSON = toJSON . _pdiufProperties
3314+ toJSON = toJSON . _pdiufAddtional
33193315
33203316-- | The codec to use to encode data being written via this output.
33213317--
33223318-- /See:/ 'instructionOutputCodec' smart constructor.
33233319newtype InstructionOutputCodec = InstructionOutputCodec
3324− { _iocProperties :: HashMap Text JSONValue
3320+ { _iocAddtional :: HashMap Text JSONValue
33253321 } deriving (Eq,Show,Data,Typeable,Generic)
33263322
33273323-- | Creates a value of 'InstructionOutputCodec' with the minimum fields required to make a request.
33283324--
33293325-- Use one of the following lenses to modify other fields as desired:
33303326--
3331−-- * 'iocProperties'
3327+-- * 'iocAddtional'
33323328instructionOutputCodec
3333− :: HashMap Text JSONValue -- ^ 'properties'
3329+ :: HashMap Text JSONValue -- ^ 'addtional'
33343330 -> InstructionOutputCodec
3335−instructionOutputCodec pIocProperties_ =
3331+instructionOutputCodec pIocAddtional_ =
33363332 InstructionOutputCodec
3337− { _iocProperties = pIocProperties_
3333+ { _iocAddtional = pIocAddtional_
33383334 }
33393335
33403336-- | Properties of the object.
3341−iocProperties :: Lens' InstructionOutputCodec (HashMap Text JSONValue)
3342−iocProperties
3343− = lens _iocProperties
3344− (\ s a -> s{_iocProperties = a})
3337+iocAddtional :: Lens' InstructionOutputCodec (HashMap Text JSONValue)
3338+iocAddtional
3339+ = lens _iocAddtional (\ s a -> s{_iocAddtional = a})
33453340
33463341instance FromJSON InstructionOutputCodec where
33473342 parseJSON
@@ -3350,7 +3345,7 @@ instance FromJSON InstructionOutputCodec where
33503345 InstructionOutputCodec <$> (parseJSONObject o))
33513346
33523347instance ToJSON InstructionOutputCodec where
3353− toJSON = toJSON . _iocProperties
3348+ toJSON = toJSON . _iocAddtional
33543349
33553350-- | Describes a stream of data, either as input to be processed or as output
33563351-- of a streaming Dataflow job.
@@ -3434,27 +3429,27 @@ instance ToJSON StreamLocation where
34343429--
34353430-- /See:/ 'workerPoolPoolArgs' smart constructor.
34363431newtype WorkerPoolPoolArgs = WorkerPoolPoolArgs
3437− { _wppaProperties :: HashMap Text JSONValue
3432+ { _wppaAddtional :: HashMap Text JSONValue
34383433 } deriving (Eq,Show,Data,Typeable,Generic)
34393434
34403435-- | Creates a value of 'WorkerPoolPoolArgs' with the minimum fields required to make a request.
34413436--
34423437-- Use one of the following lenses to modify other fields as desired:
34433438--
3444−-- * 'wppaProperties'
3439+-- * 'wppaAddtional'
34453440workerPoolPoolArgs
3446− :: HashMap Text JSONValue -- ^ 'properties'
3441+ :: HashMap Text JSONValue -- ^ 'addtional'
34473442 -> WorkerPoolPoolArgs
3448−workerPoolPoolArgs pWppaProperties_ =
3443+workerPoolPoolArgs pWppaAddtional_ =
34493444 WorkerPoolPoolArgs
3450− { _wppaProperties = pWppaProperties_
3445+ { _wppaAddtional = pWppaAddtional_
34513446 }
34523447
34533448-- | Properties of the object. Contains field \'ype with type URL.
3454−wppaProperties :: Lens' WorkerPoolPoolArgs (HashMap Text JSONValue)
3455−wppaProperties
3456− = lens _wppaProperties
3457− (\ s a -> s{_wppaProperties = a})
3449+wppaAddtional :: Lens' WorkerPoolPoolArgs (HashMap Text JSONValue)
3450+wppaAddtional
3451+ = lens _wppaAddtional
3452+ (\ s a -> s{_wppaAddtional = a})
34583453
34593454instance FromJSON WorkerPoolPoolArgs where
34603455 parseJSON
@@ -3462,7 +3457,7 @@ instance FromJSON WorkerPoolPoolArgs where
34623457 (\ o -> WorkerPoolPoolArgs <$> (parseJSONObject o))
34633458
34643459instance ToJSON WorkerPoolPoolArgs where
3465− toJSON = toJSON . _wppaProperties
3460+ toJSON = toJSON . _wppaAddtional
34663461
34673462-- | Identifies the location of a streaming side input.
34683463--
@@ -3729,27 +3724,27 @@ instance ToJSON SourceGetMetadataRequest where
37293724--
37303725-- /See:/ 'seqMapTaskUserFn' smart constructor.
37313726newtype SeqMapTaskUserFn = SeqMapTaskUserFn
3732− { _smtufProperties :: HashMap Text JSONValue
3727+ { _smtufAddtional :: HashMap Text JSONValue
37333728 } deriving (Eq,Show,Data,Typeable,Generic)
37343729
37353730-- | Creates a value of 'SeqMapTaskUserFn' with the minimum fields required to make a request.
37363731--
37373732-- Use one of the following lenses to modify other fields as desired:
37383733--
3739−-- * 'smtufProperties'
3734+-- * 'smtufAddtional'
37403735seqMapTaskUserFn
3741− :: HashMap Text JSONValue -- ^ 'properties'
3736+ :: HashMap Text JSONValue -- ^ 'addtional'
37423737 -> SeqMapTaskUserFn
3743−seqMapTaskUserFn pSmtufProperties_ =
3738+seqMapTaskUserFn pSmtufAddtional_ =
37443739 SeqMapTaskUserFn
3745− { _smtufProperties = pSmtufProperties_
3740+ { _smtufAddtional = pSmtufAddtional_
37463741 }
37473742
37483743-- | Properties of the object.
3749−smtufProperties :: Lens' SeqMapTaskUserFn (HashMap Text JSONValue)
3750−smtufProperties
3751− = lens _smtufProperties
3752− (\ s a -> s{_smtufProperties = a})
3744+smtufAddtional :: Lens' SeqMapTaskUserFn (HashMap Text JSONValue)
3745+smtufAddtional
3746+ = lens _smtufAddtional
3747+ (\ s a -> s{_smtufAddtional = a})
37533748
37543749instance FromJSON SeqMapTaskUserFn where
37553750 parseJSON
@@ -3757,33 +3752,33 @@ instance FromJSON SeqMapTaskUserFn where
37573752 (\ o -> SeqMapTaskUserFn <$> (parseJSONObject o))
37583753
37593754instance ToJSON SeqMapTaskUserFn where
3760− toJSON = toJSON . _smtufProperties
3755+ toJSON = toJSON . _smtufAddtional
37613756
37623757-- | The value combining function to invoke.
37633758--
37643759-- /See:/ 'partialGroupByKeyInstructionValueCombiningFn' smart constructor.
37653760newtype PartialGroupByKeyInstructionValueCombiningFn = PartialGroupByKeyInstructionValueCombiningFn
3766− { _pgbkivcfProperties :: HashMap Text JSONValue
3761+ { _pgbkivcfAddtional :: HashMap Text JSONValue
37673762 } deriving (Eq,Show,Data,Typeable,Generic)
37683763
37693764-- | Creates a value of 'PartialGroupByKeyInstructionValueCombiningFn' with the minimum fields required to make a request.
37703765--
37713766-- Use one of the following lenses to modify other fields as desired:
37723767--
3773−-- * 'pgbkivcfProperties'
3768+-- * 'pgbkivcfAddtional'
37743769partialGroupByKeyInstructionValueCombiningFn
3775− :: HashMap Text JSONValue -- ^ 'properties'
3770+ :: HashMap Text JSONValue -- ^ 'addtional'
37763771 -> PartialGroupByKeyInstructionValueCombiningFn
3777−partialGroupByKeyInstructionValueCombiningFn pPgbkivcfProperties_ =
3772+partialGroupByKeyInstructionValueCombiningFn pPgbkivcfAddtional_ =
37783773 PartialGroupByKeyInstructionValueCombiningFn
3779− { _pgbkivcfProperties = pPgbkivcfProperties_
3774+ { _pgbkivcfAddtional = pPgbkivcfAddtional_
37803775 }
37813776
37823777-- | Properties of the object.
3783−pgbkivcfProperties :: Lens' PartialGroupByKeyInstructionValueCombiningFn (HashMap Text JSONValue)
3784−pgbkivcfProperties
3785− = lens _pgbkivcfProperties
3786− (\ s a -> s{_pgbkivcfProperties = a})
3778+pgbkivcfAddtional :: Lens' PartialGroupByKeyInstructionValueCombiningFn (HashMap Text JSONValue)
3779+pgbkivcfAddtional
3780+ = lens _pgbkivcfAddtional
3781+ (\ s a -> s{_pgbkivcfAddtional = a})
37873782
37883783instance FromJSON
37893784 PartialGroupByKeyInstructionValueCombiningFn where
@@ -3796,7 +3791,7 @@ instance FromJSON
37963791
37973792instance ToJSON
37983793 PartialGroupByKeyInstructionValueCombiningFn where
3799− toJSON = toJSON . _pgbkivcfProperties
3794+ toJSON = toJSON . _pgbkivcfAddtional
38003795
38013796-- | Defines a job to be run by the Dataflow service.
38023797--
@@ -4055,26 +4050,26 @@ instance ToJSON ReadInstruction where
40554050--
40564051-- /See:/ 'sinkSpec' smart constructor.
40574052newtype SinkSpec = SinkSpec
4058− { _ssProperties :: HashMap Text JSONValue
4053+ { _sAddtional :: HashMap Text JSONValue
40594054 } deriving (Eq,Show,Data,Typeable,Generic)
40604055
40614056-- | Creates a value of 'SinkSpec' with the minimum fields required to make a request.
40624057--
40634058-- Use one of the following lenses to modify other fields as desired:
40644059--
4065−-- * 'ssProperties'
4060+-- * 'sAddtional'
40664061sinkSpec
4067− :: HashMap Text JSONValue -- ^ 'properties'
4062+ :: HashMap Text JSONValue -- ^ 'addtional'
40684063 -> SinkSpec
4069−sinkSpec pSsProperties_ =
4064+sinkSpec pSAddtional_ =
40704065 SinkSpec
4071− { _ssProperties = pSsProperties_
4066+ { _sAddtional = pSAddtional_
40724067 }
40734068
40744069-- | Properties of the object.
4075−ssProperties :: Lens' SinkSpec (HashMap Text JSONValue)
4076−ssProperties
4077− = lens _ssProperties (\ s a -> s{_ssProperties = a})
4070+sAddtional :: Lens' SinkSpec (HashMap Text JSONValue)
4071+sAddtional
4072+ = lens _sAddtional (\ s a -> s{_sAddtional = a})
40784073
40794074instance FromJSON SinkSpec where
40804075 parseJSON
@@ -4082,7 +4077,7 @@ instance FromJSON SinkSpec where
40824077 (\ o -> SinkSpec <$> (parseJSONObject o))
40834078
40844079instance ToJSON SinkSpec where
4085− toJSON = toJSON . _ssProperties
4080+ toJSON = toJSON . _sAddtional
40864081
40874082-- | Describes one particular pool of Dataflow workers to be instantiated by
40884083-- the Dataflow service in order to perform the computations required by a
@@ -5196,27 +5191,27 @@ instance ToJSON CustomSourceLocation where
51965191--
51975192-- /See:/ 'sourceBaseSpecsItem' smart constructor.
51985193newtype SourceBaseSpecsItem = SourceBaseSpecsItem
5199− { _sbsiProperties :: HashMap Text JSONValue
5194+ { _sbsiAddtional :: HashMap Text JSONValue
52005195 } deriving (Eq,Show,Data,Typeable,Generic)
52015196
52025197-- | Creates a value of 'SourceBaseSpecsItem' with the minimum fields required to make a request.
52035198--
52045199-- Use one of the following lenses to modify other fields as desired:
52055200--
5206−-- * 'sbsiProperties'
5201+-- * 'sbsiAddtional'
52075202sourceBaseSpecsItem
5208− :: HashMap Text JSONValue -- ^ 'properties'
5203+ :: HashMap Text JSONValue -- ^ 'addtional'
52095204 -> SourceBaseSpecsItem
5210−sourceBaseSpecsItem pSbsiProperties_ =
5205+sourceBaseSpecsItem pSbsiAddtional_ =
52115206 SourceBaseSpecsItem
5212− { _sbsiProperties = pSbsiProperties_
5207+ { _sbsiAddtional = pSbsiAddtional_
52135208 }
52145209
52155210-- | Properties of the object.
5216−sbsiProperties :: Lens' SourceBaseSpecsItem (HashMap Text JSONValue)
5217−sbsiProperties
5218− = lens _sbsiProperties
5219− (\ s a -> s{_sbsiProperties = a})
5211+sbsiAddtional :: Lens' SourceBaseSpecsItem (HashMap Text JSONValue)
5212+sbsiAddtional
5213+ = lens _sbsiAddtional
5214+ (\ s a -> s{_sbsiAddtional = a})
52205215
52215216instance FromJSON SourceBaseSpecsItem where
52225217 parseJSON
@@ -5224,7 +5219,7 @@ instance FromJSON SourceBaseSpecsItem where
52245219 (\ o -> SourceBaseSpecsItem <$> (parseJSONObject o))
52255220
52265221instance ToJSON SourceBaseSpecsItem where
5227− toJSON = toJSON . _sbsiProperties
5222+ toJSON = toJSON . _sbsiAddtional
52285223
52295224-- | Describes a particular operation comprising a MapTask.
52305225--
@@ -5341,27 +5336,27 @@ instance ToJSON ParallelInstruction where
53415336--
53425337-- /See:/ 'sideInputInfoKind' smart constructor.
53435338newtype SideInputInfoKind = SideInputInfoKind
5344− { _siikProperties :: HashMap Text JSONValue
5339+ { _siikAddtional :: HashMap Text JSONValue
53455340 } deriving (Eq,Show,Data,Typeable,Generic)
53465341
53475342-- | Creates a value of 'SideInputInfoKind' with the minimum fields required to make a request.
53485343--
53495344-- Use one of the following lenses to modify other fields as desired:
53505345--
5351−-- * 'siikProperties'
5346+-- * 'siikAddtional'
53525347sideInputInfoKind
5353− :: HashMap Text JSONValue -- ^ 'properties'
5348+ :: HashMap Text JSONValue -- ^ 'addtional'
53545349 -> SideInputInfoKind
5355−sideInputInfoKind pSiikProperties_ =
5350+sideInputInfoKind pSiikAddtional_ =
53565351 SideInputInfoKind
5357− { _siikProperties = pSiikProperties_
5352+ { _siikAddtional = pSiikAddtional_
53585353 }
53595354
53605355-- | Properties of the object.
5361−siikProperties :: Lens' SideInputInfoKind (HashMap Text JSONValue)
5362−siikProperties
5363− = lens _siikProperties
5364− (\ s a -> s{_siikProperties = a})
5356+siikAddtional :: Lens' SideInputInfoKind (HashMap Text JSONValue)
5357+siikAddtional
5358+ = lens _siikAddtional
5359+ (\ s a -> s{_siikAddtional = a})
53655360
53665361instance FromJSON SideInputInfoKind where
53675362 parseJSON
@@ -5369,7 +5364,7 @@ instance FromJSON SideInputInfoKind where
53695364 (\ o -> SideInputInfoKind <$> (parseJSONObject o))
53705365
53715366instance ToJSON SideInputInfoKind where
5372− toJSON = toJSON . _siikProperties
5367+ toJSON = toJSON . _siikAddtional
53735368
53745369-- | DEPRECATED in favor of DerivedSource.
53755370--
@@ -5518,26 +5513,26 @@ instance ToJSON JobExecutionInfo where
55185513--
55195514-- /See:/ 'sourceCodec' smart constructor.
55205515newtype SourceCodec = SourceCodec
5521− { _scProperties :: HashMap Text JSONValue
5516+ { _souAddtional :: HashMap Text JSONValue
55225517 } deriving (Eq,Show,Data,Typeable,Generic)
55235518
55245519-- | Creates a value of 'SourceCodec' with the minimum fields required to make a request.
55255520--
55265521-- Use one of the following lenses to modify other fields as desired:
55275522--
5528−-- * 'scProperties'
5523+-- * 'souAddtional'
55295524sourceCodec
5530− :: HashMap Text JSONValue -- ^ 'properties'
5525+ :: HashMap Text JSONValue -- ^ 'addtional'
55315526 -> SourceCodec
5532−sourceCodec pScProperties_ =
5527+sourceCodec pSouAddtional_ =
55335528 SourceCodec
5534− { _scProperties = pScProperties_
5529+ { _souAddtional = pSouAddtional_
55355530 }
55365531
55375532-- | Properties of the object.
5538−scProperties :: Lens' SourceCodec (HashMap Text JSONValue)
5539−scProperties
5540− = lens _scProperties (\ s a -> s{_scProperties = a})
5533+souAddtional :: Lens' SourceCodec (HashMap Text JSONValue)
5534+souAddtional
5535+ = lens _souAddtional (\ s a -> s{_souAddtional = a})
55415536
55425537instance FromJSON SourceCodec where
55435538 parseJSON
@@ -5545,7 +5540,7 @@ instance FromJSON SourceCodec where
55455540 (\ o -> SourceCodec <$> (parseJSONObject o))
55465541
55475542instance ToJSON SourceCodec where
5548− toJSON = toJSON . _scProperties
5543+ toJSON = toJSON . _souAddtional
55495544
55505545-- | State family configuration.
55515546--
gogol-datastore/gen/Network/Google/Datastore.hs+1−1
@@ -85,7 +85,7 @@ module Network.Google.Datastore
8585 -- ** EntityProperties
8686 , EntityProperties
8787 , entityProperties
88− , epProperties
88+ , epAddtional
8989
9090 -- ** BeginTransactionRequest
9191 , BeginTransactionRequest
gogol-datastore/gen/Network/Google/Datastore/Types.hs+1−1
@@ -60,7 +60,7 @@ module Network.Google.Datastore.Types
6060 -- * EntityProperties
6161 , EntityProperties
6262 , entityProperties
63− , epProperties
63+ , epAddtional
6464
6565 -- * BeginTransactionRequest
6666 , BeginTransactionRequest
gogol-datastore/gen/Network/Google/Datastore/Types/Product.hs+9−9
@@ -371,29 +371,29 @@ instance ToJSON QueryResultBatch where
371371--
372372-- /See:/ 'entityProperties' smart constructor.
373373newtype EntityProperties = EntityProperties
374− { _epProperties :: HashMap Text Property
374+ { _epAddtional :: HashMap Text Property
375375 } deriving (Eq,Show,Data,Typeable,Generic)
376376
377377-- | Creates a value of 'EntityProperties' with the minimum fields required to make a request.
378378--
379379-- Use one of the following lenses to modify other fields as desired:
380380--
381−-- * 'epProperties'
381+-- * 'epAddtional'
382382entityProperties
383− :: HashMap Text Property -- ^ 'properties'
383+ :: HashMap Text Property -- ^ 'addtional'
384384 -> EntityProperties
385−entityProperties pEpProperties_ =
385+entityProperties pEpAddtional_ =
386386 EntityProperties
387− { _epProperties = pEpProperties_
387+ { _epAddtional = pEpAddtional_
388388 }
389389
390390-- | The name of the property. A property name matching regex \"__.*__\" is
391391-- reserved. A reserved property name is forbidden in certain documented
392392-- contexts. The name must not contain more than 500 characters. Cannot be
393393-- \"\".
394−epProperties :: Lens' EntityProperties (HashMap Text Property)
395−epProperties
396− = lens _epProperties (\ s a -> s{_epProperties = a})
394+epAddtional :: Lens' EntityProperties (HashMap Text Property)
395+epAddtional
396+ = lens _epAddtional (\ s a -> s{_epAddtional = a})
397397
398398instance FromJSON EntityProperties where
399399 parseJSON
@@ -401,7 +401,7 @@ instance FromJSON EntityProperties where
401401 (\ o -> EntityProperties <$> (parseJSONObject o))
402402
403403instance ToJSON EntityProperties where
404− toJSON = toJSON . _epProperties
404+ toJSON = toJSON . _epAddtional
405405
406406--
407407-- /See:/ 'beginTransactionRequest' smart constructor.
gogol-debugger/gen/Network/Google/Debugger.hs+1−1
@@ -194,7 +194,7 @@ module Network.Google.Debugger
194194 -- ** DebuggeeLabels
195195 , DebuggeeLabels
196196 , debuggeeLabels
197− , dlProperties
197+ , dlAddtional
198198
199199 -- ** Debuggee
200200 , Debuggee
gogol-debugger/gen/Network/Google/Debugger/Types.hs+1−1
@@ -162,7 +162,7 @@ module Network.Google.Debugger.Types
162162 -- * DebuggeeLabels
163163 , DebuggeeLabels
164164 , debuggeeLabels
165− , dlProperties
165+ , dlAddtional
166166
167167 -- * Debuggee
168168 , Debuggee
gogol-debugger/gen/Network/Google/Debugger/Types/Product.hs+9−9
@@ -1301,25 +1301,25 @@ instance ToJSON CloudRepoSourceContext where
13011301--
13021302-- /See:/ 'debuggeeLabels' smart constructor.
13031303newtype DebuggeeLabels = DebuggeeLabels
1304− { _dlProperties :: HashMap Text Text
1304+ { _dlAddtional :: HashMap Text Text
13051305 } deriving (Eq,Show,Data,Typeable,Generic)
13061306
13071307-- | Creates a value of 'DebuggeeLabels' with the minimum fields required to make a request.
13081308--
13091309-- Use one of the following lenses to modify other fields as desired:
13101310--
1311−-- * 'dlProperties'
1311+-- * 'dlAddtional'
13121312debuggeeLabels
1313− :: HashMap Text Text -- ^ 'properties'
1313+ :: HashMap Text Text -- ^ 'addtional'
13141314 -> DebuggeeLabels
1315−debuggeeLabels pDlProperties_ =
1315+debuggeeLabels pDlAddtional_ =
13161316 DebuggeeLabels
1317− { _dlProperties = pDlProperties_
1317+ { _dlAddtional = pDlAddtional_
13181318 }
13191319
1320−dlProperties :: Lens' DebuggeeLabels (HashMap Text Text)
1321−dlProperties
1322− = lens _dlProperties (\ s a -> s{_dlProperties = a})
1320+dlAddtional :: Lens' DebuggeeLabels (HashMap Text Text)
1321+dlAddtional
1322+ = lens _dlAddtional (\ s a -> s{_dlAddtional = a})
13231323
13241324instance FromJSON DebuggeeLabels where
13251325 parseJSON
@@ -1327,7 +1327,7 @@ instance FromJSON DebuggeeLabels where
13271327 (\ o -> DebuggeeLabels <$> (parseJSONObject o))
13281328
13291329instance ToJSON DebuggeeLabels where
1330− toJSON = toJSON . _dlProperties
1330+ toJSON = toJSON . _dlAddtional
13311331
13321332-- | Represents the application to debug. The application may include one or
13331333-- more replicated processes executing the same code. Each of these
gogol-discovery/gen/Network/Google/Discovery.hs+14−14
@@ -40,7 +40,7 @@ module Network.Google.Discovery
4040 -- ** RestDescriptionParameters
4141 , RestDescriptionParameters
4242 , restDescriptionParameters
43− , rdpProperties
43+ , rdpAddtional
4444
4545 -- ** RestMethod
4646 , RestMethod
@@ -70,12 +70,12 @@ module Network.Google.Discovery
7070 -- ** RestDescriptionAuthOAuth2Scopes
7171 , RestDescriptionAuthOAuth2Scopes
7272 , restDescriptionAuthOAuth2Scopes
73− , rdaoasProperties
73+ , rdaoasAddtional
7474
7575 -- ** RestDescriptionMethods
7676 , RestDescriptionMethods
7777 , restDescriptionMethods
78− , rdmProperties
78+ , rdmAddtional
7979
8080 -- ** DirectoryListItemsItem
8181 , DirectoryListItemsItem
@@ -102,13 +102,18 @@ module Network.Google.Discovery
102102 -- ** RestResourceResources
103103 , RestResourceResources
104104 , restResourceResources
105− , rrrProperties
105+ , rrrAddtional
106106
107107 -- ** RestDescriptionAuthOAuth2
108108 , RestDescriptionAuthOAuth2
109109 , restDescriptionAuthOAuth2
110110 , rdaoaScopes
111111
112+ -- ** RestDescriptionAuthOAuth2ScopesAdditional
113+ , RestDescriptionAuthOAuth2ScopesAdditional
114+ , restDescriptionAuthOAuth2ScopesAdditional
115+ , rdaoasaDescription
116+
112117 -- ** RestMethodMediaUploadProtocolsSimple
113118 , RestMethodMediaUploadProtocolsSimple
114119 , restMethodMediaUploadProtocolsSimple
@@ -130,7 +135,7 @@ module Network.Google.Discovery
130135 -- ** RestResourceMethods
131136 , RestResourceMethods
132137 , restResourceMethods
133− , rrmProperties
138+ , rrmAddtional
134139
135140 -- ** RestDescriptionAuth
136141 , RestDescriptionAuth
@@ -197,7 +202,7 @@ module Network.Google.Discovery
197202 -- ** RestDescriptionSchemas
198203 , RestDescriptionSchemas
199204 , restDescriptionSchemas
200− , rdsProperties
205+ , rdsAddtional
201206
202207 -- ** JSONSchemaVariantMapItem
203208 , JSONSchemaVariantMapItem
@@ -208,7 +213,7 @@ module Network.Google.Discovery
208213 -- ** RestDescriptionResources
209214 , RestDescriptionResources
210215 , restDescriptionResources
211− , rdrProperties
216+ , rdrAddtional
212217
213218 -- ** RestMethodMediaUploadProtocols
214219 , RestMethodMediaUploadProtocols
@@ -224,7 +229,7 @@ module Network.Google.Discovery
224229 -- ** RestMethodParameters
225230 , RestMethodParameters
226231 , restMethodParameters
227− , rmpProperties
232+ , rmpAddtional
228233
229234 -- ** RestMethodMediaUpload
230235 , RestMethodMediaUpload
@@ -236,12 +241,7 @@ module Network.Google.Discovery
236241 -- ** JSONSchemaProperties
237242 , JSONSchemaProperties
238243 , jsonSchemaProperties
239− , jspProperties
240−
241− -- ** RestDescriptionAuthOAuth2ScopesProperties
242− , RestDescriptionAuthOAuth2ScopesProperties
243− , restDescriptionAuthOAuth2ScopesProperties
244− , rdaoaspDescription
244+ , jspAddtional
245245
246246 -- ** RestMethodMediaUploadProtocolsResumable
247247 , RestMethodMediaUploadProtocolsResumable
gogol-discovery/gen/Network/Google/Discovery/Types.hs+14−14
@@ -26,7 +26,7 @@ module Network.Google.Discovery.Types
2626 -- * RestDescriptionParameters
2727 , RestDescriptionParameters
2828 , restDescriptionParameters
29− , rdpProperties
29+ , rdpAddtional
3030
3131 -- * RestMethod
3232 , RestMethod
@@ -56,12 +56,12 @@ module Network.Google.Discovery.Types
5656 -- * RestDescriptionAuthOAuth2Scopes
5757 , RestDescriptionAuthOAuth2Scopes
5858 , restDescriptionAuthOAuth2Scopes
59− , rdaoasProperties
59+ , rdaoasAddtional
6060
6161 -- * RestDescriptionMethods
6262 , RestDescriptionMethods
6363 , restDescriptionMethods
64− , rdmProperties
64+ , rdmAddtional
6565
6666 -- * DirectoryListItemsItem
6767 , DirectoryListItemsItem
@@ -88,13 +88,18 @@ module Network.Google.Discovery.Types
8888 -- * RestResourceResources
8989 , RestResourceResources
9090 , restResourceResources
91− , rrrProperties
91+ , rrrAddtional
9292
9393 -- * RestDescriptionAuthOAuth2
9494 , RestDescriptionAuthOAuth2
9595 , restDescriptionAuthOAuth2
9696 , rdaoaScopes
9797
98+ -- * RestDescriptionAuthOAuth2ScopesAdditional
99+ , RestDescriptionAuthOAuth2ScopesAdditional
100+ , restDescriptionAuthOAuth2ScopesAdditional
101+ , rdaoasaDescription
102+
98103 -- * RestMethodMediaUploadProtocolsSimple
99104 , RestMethodMediaUploadProtocolsSimple
100105 , restMethodMediaUploadProtocolsSimple
@@ -116,7 +121,7 @@ module Network.Google.Discovery.Types
116121 -- * RestResourceMethods
117122 , RestResourceMethods
118123 , restResourceMethods
119− , rrmProperties
124+ , rrmAddtional
120125
121126 -- * RestDescriptionAuth
122127 , RestDescriptionAuth
@@ -183,7 +188,7 @@ module Network.Google.Discovery.Types
183188 -- * RestDescriptionSchemas
184189 , RestDescriptionSchemas
185190 , restDescriptionSchemas
186− , rdsProperties
191+ , rdsAddtional
187192
188193 -- * JSONSchemaVariantMapItem
189194 , JSONSchemaVariantMapItem
@@ -194,7 +199,7 @@ module Network.Google.Discovery.Types
194199 -- * RestDescriptionResources
195200 , RestDescriptionResources
196201 , restDescriptionResources
197− , rdrProperties
202+ , rdrAddtional
198203
199204 -- * RestMethodMediaUploadProtocols
200205 , RestMethodMediaUploadProtocols
@@ -210,7 +215,7 @@ module Network.Google.Discovery.Types
210215 -- * RestMethodParameters
211216 , RestMethodParameters
212217 , restMethodParameters
213− , rmpProperties
218+ , rmpAddtional
214219
215220 -- * RestMethodMediaUpload
216221 , RestMethodMediaUpload
@@ -222,12 +227,7 @@ module Network.Google.Discovery.Types
222227 -- * JSONSchemaProperties
223228 , JSONSchemaProperties
224229 , jsonSchemaProperties
225− , jspProperties
226−
227− -- * RestDescriptionAuthOAuth2ScopesProperties
228− , RestDescriptionAuthOAuth2ScopesProperties
229− , restDescriptionAuthOAuth2ScopesProperties
230− , rdaoaspDescription
230+ , jspAddtional
231231
232232 -- * RestMethodMediaUploadProtocolsResumable
233233 , RestMethodMediaUploadProtocolsResumable
gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+123−131
@@ -56,27 +56,26 @@ instance ToJSON RestMethodResponse where
5656--
5757-- /See:/ 'restDescriptionParameters' smart constructor.
5858newtype RestDescriptionParameters = RestDescriptionParameters
59− { _rdpProperties :: HashMap Text JSONSchema
59+ { _rdpAddtional :: HashMap Text JSONSchema
6060 } deriving (Eq,Show,Data,Typeable,Generic)
6161
6262-- | Creates a value of 'RestDescriptionParameters' with the minimum fields required to make a request.
6363--
6464-- Use one of the following lenses to modify other fields as desired:
6565--
66−-- * 'rdpProperties'
66+-- * 'rdpAddtional'
6767restDescriptionParameters
68− :: HashMap Text JSONSchema -- ^ 'properties'
68+ :: HashMap Text JSONSchema -- ^ 'addtional'
6969 -> RestDescriptionParameters
70−restDescriptionParameters pRdpProperties_ =
70+restDescriptionParameters pRdpAddtional_ =
7171 RestDescriptionParameters
72− { _rdpProperties = pRdpProperties_
72+ { _rdpAddtional = pRdpAddtional_
7373 }
7474
7575-- | Description of a single parameter.
76−rdpProperties :: Lens' RestDescriptionParameters (HashMap Text JSONSchema)
77−rdpProperties
78− = lens _rdpProperties
79− (\ s a -> s{_rdpProperties = a})
76+rdpAddtional :: Lens' RestDescriptionParameters (HashMap Text JSONSchema)
77+rdpAddtional
78+ = lens _rdpAddtional (\ s a -> s{_rdpAddtional = a})
8079
8180instance FromJSON RestDescriptionParameters where
8281 parseJSON
@@ -85,7 +84,7 @@ instance FromJSON RestDescriptionParameters where
8584 RestDescriptionParameters <$> (parseJSONObject o))
8685
8786instance ToJSON RestDescriptionParameters where
88− toJSON = toJSON . _rdpProperties
87+ toJSON = toJSON . _rdpAddtional
8988
9089--
9190-- /See:/ 'restMethod' smart constructor.
@@ -348,27 +347,27 @@ instance ToJSON RestResource where
348347--
349348-- /See:/ 'restDescriptionAuthOAuth2Scopes' smart constructor.
350349newtype RestDescriptionAuthOAuth2Scopes = RestDescriptionAuthOAuth2Scopes
351− { _rdaoasProperties :: HashMap Text RestDescriptionAuthOAuth2ScopesProperties
350+ { _rdaoasAddtional :: HashMap Text RestDescriptionAuthOAuth2ScopesAdditional
352351 } deriving (Eq,Show,Data,Typeable,Generic)
353352
354353-- | Creates a value of 'RestDescriptionAuthOAuth2Scopes' with the minimum fields required to make a request.
355354--
356355-- Use one of the following lenses to modify other fields as desired:
357356--
358−-- * 'rdaoasProperties'
357+-- * 'rdaoasAddtional'
359358restDescriptionAuthOAuth2Scopes
360− :: HashMap Text RestDescriptionAuthOAuth2ScopesProperties -- ^ 'properties'
359+ :: HashMap Text RestDescriptionAuthOAuth2ScopesAdditional -- ^ 'addtional'
361360 -> RestDescriptionAuthOAuth2Scopes
362−restDescriptionAuthOAuth2Scopes pRdaoasProperties_ =
361+restDescriptionAuthOAuth2Scopes pRdaoasAddtional_ =
363362 RestDescriptionAuthOAuth2Scopes
364− { _rdaoasProperties = pRdaoasProperties_
363+ { _rdaoasAddtional = pRdaoasAddtional_
365364 }
366365
367366-- | The scope value.
368−rdaoasProperties :: Lens' RestDescriptionAuthOAuth2Scopes (HashMap Text RestDescriptionAuthOAuth2ScopesProperties)
369−rdaoasProperties
370− = lens _rdaoasProperties
371− (\ s a -> s{_rdaoasProperties = a})
367+rdaoasAddtional :: Lens' RestDescriptionAuthOAuth2Scopes (HashMap Text RestDescriptionAuthOAuth2ScopesAdditional)
368+rdaoasAddtional
369+ = lens _rdaoasAddtional
370+ (\ s a -> s{_rdaoasAddtional = a})
372371
373372instance FromJSON RestDescriptionAuthOAuth2Scopes
374373 where
@@ -379,33 +378,32 @@ instance FromJSON RestDescriptionAuthOAuth2Scopes
379378 (parseJSONObject o))
380379
381380instance ToJSON RestDescriptionAuthOAuth2Scopes where
382− toJSON = toJSON . _rdaoasProperties
381+ toJSON = toJSON . _rdaoasAddtional
383382
384383-- | API-level methods for this API.
385384--
386385-- /See:/ 'restDescriptionMethods' smart constructor.
387386newtype RestDescriptionMethods = RestDescriptionMethods
388− { _rdmProperties :: HashMap Text RestMethod
387+ { _rdmAddtional :: HashMap Text RestMethod
389388 } deriving (Eq,Show,Data,Typeable,Generic)
390389
391390-- | Creates a value of 'RestDescriptionMethods' with the minimum fields required to make a request.
392391--
393392-- Use one of the following lenses to modify other fields as desired:
394393--
395−-- * 'rdmProperties'
394+-- * 'rdmAddtional'
396395restDescriptionMethods
397− :: HashMap Text RestMethod -- ^ 'properties'
396+ :: HashMap Text RestMethod -- ^ 'addtional'
398397 -> RestDescriptionMethods
399−restDescriptionMethods pRdmProperties_ =
398+restDescriptionMethods pRdmAddtional_ =
400399 RestDescriptionMethods
401− { _rdmProperties = pRdmProperties_
400+ { _rdmAddtional = pRdmAddtional_
402401 }
403402
404403-- | An individual method description.
405−rdmProperties :: Lens' RestDescriptionMethods (HashMap Text RestMethod)
406−rdmProperties
407− = lens _rdmProperties
408− (\ s a -> s{_rdmProperties = a})
404+rdmAddtional :: Lens' RestDescriptionMethods (HashMap Text RestMethod)
405+rdmAddtional
406+ = lens _rdmAddtional (\ s a -> s{_rdmAddtional = a})
409407
410408instance FromJSON RestDescriptionMethods where
411409 parseJSON
@@ -414,7 +412,7 @@ instance FromJSON RestDescriptionMethods where
414412 RestDescriptionMethods <$> (parseJSONObject o))
415413
416414instance ToJSON RestDescriptionMethods where
417− toJSON = toJSON . _rdmProperties
415+ toJSON = toJSON . _rdmAddtional
418416
419417--
420418-- /See:/ 'directoryListItemsItem' smart constructor.
@@ -623,27 +621,26 @@ instance ToJSON DirectoryListItemsItemIcons where
623621--
624622-- /See:/ 'restResourceResources' smart constructor.
625623newtype RestResourceResources = RestResourceResources
626− { _rrrProperties :: HashMap Text RestResource
624+ { _rrrAddtional :: HashMap Text RestResource
627625 } deriving (Eq,Show,Data,Typeable,Generic)
628626
629627-- | Creates a value of 'RestResourceResources' with the minimum fields required to make a request.
630628--
631629-- Use one of the following lenses to modify other fields as desired:
632630--
633−-- * 'rrrProperties'
631+-- * 'rrrAddtional'
634632restResourceResources
635− :: HashMap Text RestResource -- ^ 'properties'
633+ :: HashMap Text RestResource -- ^ 'addtional'
636634 -> RestResourceResources
637−restResourceResources pRrrProperties_ =
635+restResourceResources pRrrAddtional_ =
638636 RestResourceResources
639− { _rrrProperties = pRrrProperties_
637+ { _rrrAddtional = pRrrAddtional_
640638 }
641639
642640-- | Description for any sub-resources on this resource.
643−rrrProperties :: Lens' RestResourceResources (HashMap Text RestResource)
644−rrrProperties
645− = lens _rrrProperties
646− (\ s a -> s{_rrrProperties = a})
641+rrrAddtional :: Lens' RestResourceResources (HashMap Text RestResource)
642+rrrAddtional
643+ = lens _rrrAddtional (\ s a -> s{_rrrAddtional = a})
647644
648645instance FromJSON RestResourceResources where
649646 parseJSON
@@ -652,7 +649,7 @@ instance FromJSON RestResourceResources where
652649 RestResourceResources <$> (parseJSONObject o))
653650
654651instance ToJSON RestResourceResources where
655− toJSON = toJSON . _rrrProperties
652+ toJSON = toJSON . _rrrAddtional
656653
657654-- | OAuth 2.0 authentication information.
658655--
@@ -688,6 +685,47 @@ instance ToJSON RestDescriptionAuthOAuth2 where
688685 toJSON RestDescriptionAuthOAuth2{..}
689686 = object (catMaybes [("scopes" .=) <$> _rdaoaScopes])
690687
688+-- | The scope value.
689+--
690+-- /See:/ 'restDescriptionAuthOAuth2ScopesAdditional' smart constructor.
691+newtype RestDescriptionAuthOAuth2ScopesAdditional = RestDescriptionAuthOAuth2ScopesAdditional
692+ { _rdaoasaDescription :: Maybe Text
693+ } deriving (Eq,Show,Data,Typeable,Generic)
694+
695+-- | Creates a value of 'RestDescriptionAuthOAuth2ScopesAdditional' with the minimum fields required to make a request.
696+--
697+-- Use one of the following lenses to modify other fields as desired:
698+--
699+-- * 'rdaoasaDescription'
700+restDescriptionAuthOAuth2ScopesAdditional
701+ :: RestDescriptionAuthOAuth2ScopesAdditional
702+restDescriptionAuthOAuth2ScopesAdditional =
703+ RestDescriptionAuthOAuth2ScopesAdditional
704+ { _rdaoasaDescription = Nothing
705+ }
706+
707+-- | Description of scope.
708+rdaoasaDescription :: Lens' RestDescriptionAuthOAuth2ScopesAdditional (Maybe Text)
709+rdaoasaDescription
710+ = lens _rdaoasaDescription
711+ (\ s a -> s{_rdaoasaDescription = a})
712+
713+instance FromJSON
714+ RestDescriptionAuthOAuth2ScopesAdditional where
715+ parseJSON
716+ = withObject
717+ "RestDescriptionAuthOAuth2ScopesAdditional"
718+ (\ o ->
719+ RestDescriptionAuthOAuth2ScopesAdditional <$>
720+ (o .:? "description"))
721+
722+instance ToJSON
723+ RestDescriptionAuthOAuth2ScopesAdditional where
724+ toJSON RestDescriptionAuthOAuth2ScopesAdditional{..}
725+ = object
726+ (catMaybes
727+ [("description" .=) <$> _rdaoasaDescription])
728+
691729-- | Supports uploading as a single HTTP request.
692730--
693731-- /See:/ 'restMethodMediaUploadProtocolsSimple' smart constructor.
@@ -838,27 +876,26 @@ instance ToJSON JSONSchemaVariant where
838876--
839877-- /See:/ 'restResourceMethods' smart constructor.
840878newtype RestResourceMethods = RestResourceMethods
841− { _rrmProperties :: HashMap Text RestMethod
879+ { _rrmAddtional :: HashMap Text RestMethod
842880 } deriving (Eq,Show,Data,Typeable,Generic)
843881
844882-- | Creates a value of 'RestResourceMethods' with the minimum fields required to make a request.
845883--
846884-- Use one of the following lenses to modify other fields as desired:
847885--
848−-- * 'rrmProperties'
886+-- * 'rrmAddtional'
849887restResourceMethods
850− :: HashMap Text RestMethod -- ^ 'properties'
888+ :: HashMap Text RestMethod -- ^ 'addtional'
851889 -> RestResourceMethods
852−restResourceMethods pRrmProperties_ =
890+restResourceMethods pRrmAddtional_ =
853891 RestResourceMethods
854− { _rrmProperties = pRrmProperties_
892+ { _rrmAddtional = pRrmAddtional_
855893 }
856894
857895-- | Description for any methods on this resource.
858−rrmProperties :: Lens' RestResourceMethods (HashMap Text RestMethod)
859−rrmProperties
860− = lens _rrmProperties
861− (\ s a -> s{_rrmProperties = a})
896+rrmAddtional :: Lens' RestResourceMethods (HashMap Text RestMethod)
897+rrmAddtional
898+ = lens _rrmAddtional (\ s a -> s{_rrmAddtional = a})
862899
863900instance FromJSON RestResourceMethods where
864901 parseJSON
@@ -866,7 +903,7 @@ instance FromJSON RestResourceMethods where
866903 (\ o -> RestResourceMethods <$> (parseJSONObject o))
867904
868905instance ToJSON RestResourceMethods where
869− toJSON = toJSON . _rrmProperties
906+ toJSON = toJSON . _rrmAddtional
870907
871908-- | Authentication information.
872909--
@@ -1515,27 +1552,26 @@ instance ToJSON JSONSchema where
15151552--
15161553-- /See:/ 'restDescriptionSchemas' smart constructor.
15171554newtype RestDescriptionSchemas = RestDescriptionSchemas
1518− { _rdsProperties :: HashMap Text JSONSchema
1555+ { _rdsAddtional :: HashMap Text JSONSchema
15191556 } deriving (Eq,Show,Data,Typeable,Generic)
15201557
15211558-- | Creates a value of 'RestDescriptionSchemas' with the minimum fields required to make a request.
15221559--
15231560-- Use one of the following lenses to modify other fields as desired:
15241561--
1525−-- * 'rdsProperties'
1562+-- * 'rdsAddtional'
15261563restDescriptionSchemas
1527− :: HashMap Text JSONSchema -- ^ 'properties'
1564+ :: HashMap Text JSONSchema -- ^ 'addtional'
15281565 -> RestDescriptionSchemas
1529−restDescriptionSchemas pRdsProperties_ =
1566+restDescriptionSchemas pRdsAddtional_ =
15301567 RestDescriptionSchemas
1531− { _rdsProperties = pRdsProperties_
1568+ { _rdsAddtional = pRdsAddtional_
15321569 }
15331570
15341571-- | An individual schema description.
1535−rdsProperties :: Lens' RestDescriptionSchemas (HashMap Text JSONSchema)
1536−rdsProperties
1537− = lens _rdsProperties
1538− (\ s a -> s{_rdsProperties = a})
1572+rdsAddtional :: Lens' RestDescriptionSchemas (HashMap Text JSONSchema)
1573+rdsAddtional
1574+ = lens _rdsAddtional (\ s a -> s{_rdsAddtional = a})
15391575
15401576instance FromJSON RestDescriptionSchemas where
15411577 parseJSON
@@ -1544,7 +1580,7 @@ instance FromJSON RestDescriptionSchemas where
15441580 RestDescriptionSchemas <$> (parseJSONObject o))
15451581
15461582instance ToJSON RestDescriptionSchemas where
1547− toJSON = toJSON . _rdsProperties
1583+ toJSON = toJSON . _rdsAddtional
15481584
15491585--
15501586-- /See:/ 'jsonSchemaVariantMapItem' smart constructor.
@@ -1594,28 +1630,27 @@ instance ToJSON JSONSchemaVariantMapItem where
15941630--
15951631-- /See:/ 'restDescriptionResources' smart constructor.
15961632newtype RestDescriptionResources = RestDescriptionResources
1597− { _rdrProperties :: HashMap Text RestResource
1633+ { _rdrAddtional :: HashMap Text RestResource
15981634 } deriving (Eq,Show,Data,Typeable,Generic)
15991635
16001636-- | Creates a value of 'RestDescriptionResources' with the minimum fields required to make a request.
16011637--
16021638-- Use one of the following lenses to modify other fields as desired:
16031639--
1604−-- * 'rdrProperties'
1640+-- * 'rdrAddtional'
16051641restDescriptionResources
1606− :: HashMap Text RestResource -- ^ 'properties'
1642+ :: HashMap Text RestResource -- ^ 'addtional'
16071643 -> RestDescriptionResources
1608−restDescriptionResources pRdrProperties_ =
1644+restDescriptionResources pRdrAddtional_ =
16091645 RestDescriptionResources
1610− { _rdrProperties = pRdrProperties_
1646+ { _rdrAddtional = pRdrAddtional_
16111647 }
16121648
16131649-- | An individual resource description. Contains methods and sub-resources
16141650-- related to this resource.
1615−rdrProperties :: Lens' RestDescriptionResources (HashMap Text RestResource)
1616−rdrProperties
1617− = lens _rdrProperties
1618− (\ s a -> s{_rdrProperties = a})
1651+rdrAddtional :: Lens' RestDescriptionResources (HashMap Text RestResource)
1652+rdrAddtional
1653+ = lens _rdrAddtional (\ s a -> s{_rdrAddtional = a})
16191654
16201655instance FromJSON RestDescriptionResources where
16211656 parseJSON
@@ -1624,7 +1659,7 @@ instance FromJSON RestDescriptionResources where
16241659 RestDescriptionResources <$> (parseJSONObject o))
16251660
16261661instance ToJSON RestDescriptionResources where
1627− toJSON = toJSON . _rdrProperties
1662+ toJSON = toJSON . _rdrAddtional
16281663
16291664-- | Supported upload protocols.
16301665--
@@ -1717,27 +1752,26 @@ instance ToJSON JSONSchemaAnnotations where
17171752--
17181753-- /See:/ 'restMethodParameters' smart constructor.
17191754newtype RestMethodParameters = RestMethodParameters
1720− { _rmpProperties :: HashMap Text JSONSchema
1755+ { _rmpAddtional :: HashMap Text JSONSchema
17211756 } deriving (Eq,Show,Data,Typeable,Generic)
17221757
17231758-- | Creates a value of 'RestMethodParameters' with the minimum fields required to make a request.
17241759--
17251760-- Use one of the following lenses to modify other fields as desired:
17261761--
1727−-- * 'rmpProperties'
1762+-- * 'rmpAddtional'
17281763restMethodParameters
1729− :: HashMap Text JSONSchema -- ^ 'properties'
1764+ :: HashMap Text JSONSchema -- ^ 'addtional'
17301765 -> RestMethodParameters
1731−restMethodParameters pRmpProperties_ =
1766+restMethodParameters pRmpAddtional_ =
17321767 RestMethodParameters
1733− { _rmpProperties = pRmpProperties_
1768+ { _rmpAddtional = pRmpAddtional_
17341769 }
17351770
17361771-- | Details for a single parameter in this method.
1737−rmpProperties :: Lens' RestMethodParameters (HashMap Text JSONSchema)
1738−rmpProperties
1739− = lens _rmpProperties
1740− (\ s a -> s{_rmpProperties = a})
1772+rmpAddtional :: Lens' RestMethodParameters (HashMap Text JSONSchema)
1773+rmpAddtional
1774+ = lens _rmpAddtional (\ s a -> s{_rmpAddtional = a})
17411775
17421776instance FromJSON RestMethodParameters where
17431777 parseJSON
@@ -1745,7 +1779,7 @@ instance FromJSON RestMethodParameters where
17451779 (\ o -> RestMethodParameters <$> (parseJSONObject o))
17461780
17471781instance ToJSON RestMethodParameters where
1748− toJSON = toJSON . _rmpProperties
1782+ toJSON = toJSON . _rmpAddtional
17491783
17501784-- | Media upload parameters.
17511785--
@@ -1813,28 +1847,27 @@ instance ToJSON RestMethodMediaUpload where
18131847--
18141848-- /See:/ 'jsonSchemaProperties' smart constructor.
18151849newtype JSONSchemaProperties = JSONSchemaProperties
1816− { _jspProperties :: HashMap Text JSONSchema
1850+ { _jspAddtional :: HashMap Text JSONSchema
18171851 } deriving (Eq,Show,Data,Typeable,Generic)
18181852
18191853-- | Creates a value of 'JSONSchemaProperties' with the minimum fields required to make a request.
18201854--
18211855-- Use one of the following lenses to modify other fields as desired:
18221856--
1823−-- * 'jspProperties'
1857+-- * 'jspAddtional'
18241858jsonSchemaProperties
1825− :: HashMap Text JSONSchema -- ^ 'properties'
1859+ :: HashMap Text JSONSchema -- ^ 'addtional'
18261860 -> JSONSchemaProperties
1827−jsonSchemaProperties pJspProperties_ =
1861+jsonSchemaProperties pJspAddtional_ =
18281862 JSONSchemaProperties
1829− { _jspProperties = pJspProperties_
1863+ { _jspAddtional = pJspAddtional_
18301864 }
18311865
18321866-- | A single property of this object. The value is itself a JSON Schema
18331867-- object describing this property.
1834−jspProperties :: Lens' JSONSchemaProperties (HashMap Text JSONSchema)
1835−jspProperties
1836− = lens _jspProperties
1837− (\ s a -> s{_jspProperties = a})
1868+jspAddtional :: Lens' JSONSchemaProperties (HashMap Text JSONSchema)
1869+jspAddtional
1870+ = lens _jspAddtional (\ s a -> s{_jspAddtional = a})
18381871
18391872instance FromJSON JSONSchemaProperties where
18401873 parseJSON
@@ -1842,48 +1875,7 @@ instance FromJSON JSONSchemaProperties where
18421875 (\ o -> JSONSchemaProperties <$> (parseJSONObject o))
18431876
18441877instance ToJSON JSONSchemaProperties where
1845− toJSON = toJSON . _jspProperties
1846−
1847−-- | The scope value.
1848−--
1849−-- /See:/ 'restDescriptionAuthOAuth2ScopesProperties' smart constructor.
1850−newtype RestDescriptionAuthOAuth2ScopesProperties = RestDescriptionAuthOAuth2ScopesProperties
1851− { _rdaoaspDescription :: Maybe Text
1852− } deriving (Eq,Show,Data,Typeable,Generic)
1853−
1854−-- | Creates a value of 'RestDescriptionAuthOAuth2ScopesProperties' with the minimum fields required to make a request.
1855−--
1856−-- Use one of the following lenses to modify other fields as desired:
1857−--
1858−-- * 'rdaoaspDescription'
1859−restDescriptionAuthOAuth2ScopesProperties
1860− :: RestDescriptionAuthOAuth2ScopesProperties
1861−restDescriptionAuthOAuth2ScopesProperties =
1862− RestDescriptionAuthOAuth2ScopesProperties
1863− { _rdaoaspDescription = Nothing
1864− }
1865−
1866−-- | Description of scope.
1867−rdaoaspDescription :: Lens' RestDescriptionAuthOAuth2ScopesProperties (Maybe Text)
1868−rdaoaspDescription
1869− = lens _rdaoaspDescription
1870− (\ s a -> s{_rdaoaspDescription = a})
1871−
1872−instance FromJSON
1873− RestDescriptionAuthOAuth2ScopesProperties where
1874− parseJSON
1875− = withObject
1876− "RestDescriptionAuthOAuth2ScopesProperties"
1877− (\ o ->
1878− RestDescriptionAuthOAuth2ScopesProperties <$>
1879− (o .:? "description"))
1880−
1881−instance ToJSON
1882− RestDescriptionAuthOAuth2ScopesProperties where
1883− toJSON RestDescriptionAuthOAuth2ScopesProperties{..}
1884− = object
1885− (catMaybes
1886− [("description" .=) <$> _rdaoaspDescription])
1878+ toJSON = toJSON . _jspAddtional
18871879
18881880-- | Supports the Resumable Media Upload protocol.
18891881--
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch.hs+1−1
@@ -59,7 +59,7 @@ module Network.Google.DoubleClickSearch
5959 -- ** ReportRow
6060 , ReportRow
6161 , reportRow
62− , rrProperties
62+ , rrAddtional
6363
6464 -- ** ReportRequest
6565 , ReportRequest
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types.hs+1−1
@@ -21,7 +21,7 @@ module Network.Google.DoubleClickSearch.Types
2121 -- * ReportRow
2222 , ReportRow
2323 , reportRow
24− , rrProperties
24+ , rrAddtional
2525
2626 -- * ReportRequest
2727 , ReportRequest
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+9−9
@@ -24,27 +24,27 @@ import Network.Google.Prelude
2424--
2525-- /See:/ 'reportRow' smart constructor.
2626newtype ReportRow = ReportRow
27− { _rrProperties :: HashMap Text JSONValue
27+ { _rrAddtional :: HashMap Text JSONValue
2828 } deriving (Eq,Show,Data,Typeable,Generic)
2929
3030-- | Creates a value of 'ReportRow' with the minimum fields required to make a request.
3131--
3232-- Use one of the following lenses to modify other fields as desired:
3333--
34−-- * 'rrProperties'
34+-- * 'rrAddtional'
3535reportRow
36− :: HashMap Text JSONValue -- ^ 'properties'
36+ :: HashMap Text JSONValue -- ^ 'addtional'
3737 -> ReportRow
38−reportRow pRrProperties_ =
38+reportRow pRrAddtional_ =
3939 ReportRow
40− { _rrProperties = pRrProperties_
40+ { _rrAddtional = pRrAddtional_
4141 }
4242
4343-- | Indicates the columns that are represented in this row. That is, each
4444-- key corresponds to a column with a non-empty cell in this row.
45−rrProperties :: Lens' ReportRow (HashMap Text JSONValue)
46−rrProperties
47− = lens _rrProperties (\ s a -> s{_rrProperties = a})
45+rrAddtional :: Lens' ReportRow (HashMap Text JSONValue)
46+rrAddtional
47+ = lens _rrAddtional (\ s a -> s{_rrAddtional = a})
4848
4949instance FromJSON ReportRow where
5050 parseJSON
@@ -52,7 +52,7 @@ instance FromJSON ReportRow where
5252 (\ o -> ReportRow <$> (parseJSONObject o))
5353
5454instance ToJSON ReportRow where
55− toJSON = toJSON . _rrProperties
55+ toJSON = toJSON . _rrAddtional
5656
5757-- | A request object used to create a DoubleClick Search report.
5858--
gogol-drive/gen/Network/Google/Drive.hs+4−4
@@ -300,7 +300,7 @@ module Network.Google.Drive
300300 -- ** FileOpenWithLinks
301301 , FileOpenWithLinks
302302 , fileOpenWithLinks
303− , fowlProperties
303+ , fowlAddtional
304304
305305 -- ** AboutAdditionalRoleInfoItemRoleSetsItem
306306 , AboutAdditionalRoleInfoItemRoleSetsItem
@@ -443,7 +443,7 @@ module Network.Google.Drive
443443 -- ** RevisionExportLinks
444444 , RevisionExportLinks
445445 , revisionExportLinks
446− , relProperties
446+ , relAddtional
447447
448448 -- ** FileIndexableText
449449 , FileIndexableText
@@ -459,7 +459,7 @@ module Network.Google.Drive
459459 -- ** ChannelParams
460460 , ChannelParams
461461 , channelParams
462− , cpProperties
462+ , cpAddtional
463463
464464 -- ** FilesPatchModifiedDateBehavior
465465 , FilesPatchModifiedDateBehavior (..)
@@ -694,7 +694,7 @@ module Network.Google.Drive
694694 -- ** FileExportLinks
695695 , FileExportLinks
696696 , fileExportLinks
697− , felProperties
697+ , felAddtional
698698
699699 -- ** CommentList
700700 , CommentList
gogol-drive/gen/Network/Google/Drive/Types.hs+4−4
@@ -113,7 +113,7 @@ module Network.Google.Drive.Types
113113 -- * FileOpenWithLinks
114114 , FileOpenWithLinks
115115 , fileOpenWithLinks
116− , fowlProperties
116+ , fowlAddtional
117117
118118 -- * AboutAdditionalRoleInfoItemRoleSetsItem
119119 , AboutAdditionalRoleInfoItemRoleSetsItem
@@ -256,7 +256,7 @@ module Network.Google.Drive.Types
256256 -- * RevisionExportLinks
257257 , RevisionExportLinks
258258 , revisionExportLinks
259− , relProperties
259+ , relAddtional
260260
261261 -- * FileIndexableText
262262 , FileIndexableText
@@ -272,7 +272,7 @@ module Network.Google.Drive.Types
272272 -- * ChannelParams
273273 , ChannelParams
274274 , channelParams
275− , cpProperties
275+ , cpAddtional
276276
277277 -- * FilesPatchModifiedDateBehavior
278278 , FilesPatchModifiedDateBehavior (..)
@@ -507,7 +507,7 @@ module Network.Google.Drive.Types
507507 -- * FileExportLinks
508508 , FileExportLinks
509509 , fileExportLinks
510− , felProperties
510+ , felAddtional
511511
512512 -- * CommentList
513513 , CommentList
gogol-drive/gen/Network/Google/Drive/Types/Product.hs+37−39
@@ -710,26 +710,26 @@ instance ToJSON AppList where
710710--
711711-- /See:/ 'fileOpenWithLinks' smart constructor.
712712newtype FileOpenWithLinks = FileOpenWithLinks
713− { _fowlProperties :: HashMap Text Text
713+ { _fowlAddtional :: HashMap Text Text
714714 } deriving (Eq,Show,Data,Typeable,Generic)
715715
716716-- | Creates a value of 'FileOpenWithLinks' with the minimum fields required to make a request.
717717--
718718-- Use one of the following lenses to modify other fields as desired:
719719--
720−-- * 'fowlProperties'
720+-- * 'fowlAddtional'
721721fileOpenWithLinks
722− :: HashMap Text Text -- ^ 'properties'
722+ :: HashMap Text Text -- ^ 'addtional'
723723 -> FileOpenWithLinks
724−fileOpenWithLinks pFowlProperties_ =
724+fileOpenWithLinks pFowlAddtional_ =
725725 FileOpenWithLinks
726− { _fowlProperties = pFowlProperties_
726+ { _fowlAddtional = pFowlAddtional_
727727 }
728728
729−fowlProperties :: Lens' FileOpenWithLinks (HashMap Text Text)
730−fowlProperties
731− = lens _fowlProperties
732− (\ s a -> s{_fowlProperties = a})
729+fowlAddtional :: Lens' FileOpenWithLinks (HashMap Text Text)
730+fowlAddtional
731+ = lens _fowlAddtional
732+ (\ s a -> s{_fowlAddtional = a})
733733
734734instance FromJSON FileOpenWithLinks where
735735 parseJSON
@@ -737,7 +737,7 @@ instance FromJSON FileOpenWithLinks where
737737 (\ o -> FileOpenWithLinks <$> (parseJSONObject o))
738738
739739instance ToJSON FileOpenWithLinks where
740− toJSON = toJSON . _fowlProperties
740+ toJSON = toJSON . _fowlAddtional
741741
742742--
743743-- /See:/ 'aboutAdditionalRoleInfoItemRoleSetsItem' smart constructor.
@@ -2037,27 +2037,26 @@ instance ToJSON ChangeList where
20372037--
20382038-- /See:/ 'revisionExportLinks' smart constructor.
20392039newtype RevisionExportLinks = RevisionExportLinks
2040− { _relProperties :: HashMap Text Text
2040+ { _relAddtional :: HashMap Text Text
20412041 } deriving (Eq,Show,Data,Typeable,Generic)
20422042
20432043-- | Creates a value of 'RevisionExportLinks' with the minimum fields required to make a request.
20442044--
20452045-- Use one of the following lenses to modify other fields as desired:
20462046--
2047−-- * 'relProperties'
2047+-- * 'relAddtional'
20482048revisionExportLinks
2049− :: HashMap Text Text -- ^ 'properties'
2049+ :: HashMap Text Text -- ^ 'addtional'
20502050 -> RevisionExportLinks
2051−revisionExportLinks pRelProperties_ =
2051+revisionExportLinks pRelAddtional_ =
20522052 RevisionExportLinks
2053− { _relProperties = pRelProperties_
2053+ { _relAddtional = pRelAddtional_
20542054 }
20552055
20562056-- | A mapping from export format to URL
2057−relProperties :: Lens' RevisionExportLinks (HashMap Text Text)
2058−relProperties
2059− = lens _relProperties
2060− (\ s a -> s{_relProperties = a})
2057+relAddtional :: Lens' RevisionExportLinks (HashMap Text Text)
2058+relAddtional
2059+ = lens _relAddtional (\ s a -> s{_relAddtional = a})
20612060
20622061instance FromJSON RevisionExportLinks where
20632062 parseJSON
@@ -2065,7 +2064,7 @@ instance FromJSON RevisionExportLinks where
20652064 (\ o -> RevisionExportLinks <$> (parseJSONObject o))
20662065
20672066instance ToJSON RevisionExportLinks where
2068− toJSON = toJSON . _relProperties
2067+ toJSON = toJSON . _relAddtional
20692068
20702069-- | Indexable text attributes for the file (can only be written)
20712070--
@@ -2151,26 +2150,26 @@ instance ToJSON AboutFeaturesItem where
21512150--
21522151-- /See:/ 'channelParams' smart constructor.
21532152newtype ChannelParams = ChannelParams
2154− { _cpProperties :: HashMap Text Text
2153+ { _cpAddtional :: HashMap Text Text
21552154 } deriving (Eq,Show,Data,Typeable,Generic)
21562155
21572156-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
21582157--
21592158-- Use one of the following lenses to modify other fields as desired:
21602159--
2161−-- * 'cpProperties'
2160+-- * 'cpAddtional'
21622161channelParams
2163− :: HashMap Text Text -- ^ 'properties'
2162+ :: HashMap Text Text -- ^ 'addtional'
21642163 -> ChannelParams
2165−channelParams pCpProperties_ =
2164+channelParams pCpAddtional_ =
21662165 ChannelParams
2167− { _cpProperties = pCpProperties_
2166+ { _cpAddtional = pCpAddtional_
21682167 }
21692168
21702169-- | Declares a new parameter by name.
2171−cpProperties :: Lens' ChannelParams (HashMap Text Text)
2172−cpProperties
2173− = lens _cpProperties (\ s a -> s{_cpProperties = a})
2170+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
2171+cpAddtional
2172+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
21742173
21752174instance FromJSON ChannelParams where
21762175 parseJSON
@@ -2178,7 +2177,7 @@ instance FromJSON ChannelParams where
21782177 (\ o -> ChannelParams <$> (parseJSONObject o))
21792178
21802179instance ToJSON ChannelParams where
2181− toJSON = toJSON . _cpProperties
2180+ toJSON = toJSON . _cpAddtional
21822181
21832182-- | An item with user information and settings.
21842183--
@@ -4542,27 +4541,26 @@ instance ToJSON GeneratedIds where
45424541--
45434542-- /See:/ 'fileExportLinks' smart constructor.
45444543newtype FileExportLinks = FileExportLinks
4545− { _felProperties :: HashMap Text Text
4544+ { _felAddtional :: HashMap Text Text
45464545 } deriving (Eq,Show,Data,Typeable,Generic)
45474546
45484547-- | Creates a value of 'FileExportLinks' with the minimum fields required to make a request.
45494548--
45504549-- Use one of the following lenses to modify other fields as desired:
45514550--
4552−-- * 'felProperties'
4551+-- * 'felAddtional'
45534552fileExportLinks
4554− :: HashMap Text Text -- ^ 'properties'
4553+ :: HashMap Text Text -- ^ 'addtional'
45554554 -> FileExportLinks
4556−fileExportLinks pFelProperties_ =
4555+fileExportLinks pFelAddtional_ =
45574556 FileExportLinks
4558− { _felProperties = pFelProperties_
4557+ { _felAddtional = pFelAddtional_
45594558 }
45604559
45614560-- | A mapping from export format to URL
4562−felProperties :: Lens' FileExportLinks (HashMap Text Text)
4563−felProperties
4564− = lens _felProperties
4565− (\ s a -> s{_felProperties = a})
4561+felAddtional :: Lens' FileExportLinks (HashMap Text Text)
4562+felAddtional
4563+ = lens _felAddtional (\ s a -> s{_felAddtional = a})
45664564
45674565instance FromJSON FileExportLinks where
45684566 parseJSON
@@ -4570,7 +4568,7 @@ instance FromJSON FileExportLinks where
45704568 (\ o -> FileExportLinks <$> (parseJSONObject o))
45714569
45724570instance ToJSON FileExportLinks where
4573− toJSON = toJSON . _felProperties
4571+ toJSON = toJSON . _felAddtional
45744572
45754573-- | A JSON representation of a list of comments on a file in Google Drive.
45764574--
gogol-fonts/gen/Network/Google/Fonts.hs+1−1
@@ -52,7 +52,7 @@ module Network.Google.Fonts
5252 -- ** WebfontFiles
5353 , WebfontFiles
5454 , webfontFiles
55− , wfProperties
55+ , wfAddtional
5656 ) where
5757
5858import Network.Google.Fonts.Types
gogol-fonts/gen/Network/Google/Fonts/Types.hs+1−1
@@ -42,7 +42,7 @@ module Network.Google.Fonts.Types
4242 -- * WebfontFiles
4343 , WebfontFiles
4444 , webfontFiles
45− , wfProperties
45+ , wfAddtional
4646 ) where
4747
4848import Network.Google.Fonts.Types.Product
gogol-fonts/gen/Network/Google/Fonts/Types/Product.hs+9−9
@@ -189,26 +189,26 @@ instance ToJSON WebfontList where
189189--
190190-- /See:/ 'webfontFiles' smart constructor.
191191newtype WebfontFiles = WebfontFiles
192− { _wfProperties :: HashMap Text Text
192+ { _wfAddtional :: HashMap Text Text
193193 } deriving (Eq,Show,Data,Typeable,Generic)
194194
195195-- | Creates a value of 'WebfontFiles' with the minimum fields required to make a request.
196196--
197197-- Use one of the following lenses to modify other fields as desired:
198198--
199−-- * 'wfProperties'
199+-- * 'wfAddtional'
200200webfontFiles
201− :: HashMap Text Text -- ^ 'properties'
201+ :: HashMap Text Text -- ^ 'addtional'
202202 -> WebfontFiles
203−webfontFiles pWfProperties_ =
203+webfontFiles pWfAddtional_ =
204204 WebfontFiles
205− { _wfProperties = pWfProperties_
205+ { _wfAddtional = pWfAddtional_
206206 }
207207
208208-- | The font file URL (value) for an specific variant (key).
209−wfProperties :: Lens' WebfontFiles (HashMap Text Text)
210−wfProperties
211− = lens _wfProperties (\ s a -> s{_wfProperties = a})
209+wfAddtional :: Lens' WebfontFiles (HashMap Text Text)
210+wfAddtional
211+ = lens _wfAddtional (\ s a -> s{_wfAddtional = a})
212212
213213instance FromJSON WebfontFiles where
214214 parseJSON
@@ -216,4 +216,4 @@ instance FromJSON WebfontFiles where
216216 (\ o -> WebfontFiles <$> (parseJSONObject o))
217217
218218instance ToJSON WebfontFiles where
219− toJSON = toJSON . _wfProperties
219+ toJSON = toJSON . _wfAddtional
gogol-genomics/gen/Network/Google/Genomics.hs+11−11
@@ -158,7 +158,7 @@ module Network.Google.Genomics
158158 -- ** ReadInfo
159159 , ReadInfo
160160 , readInfo
161− , riProperties
161+ , riAddtional
162162
163163 -- ** Status
164164 , Status
@@ -170,7 +170,7 @@ module Network.Google.Genomics
170170 -- ** OperationSchema
171171 , OperationSchema
172172 , operationSchema
173− , osProperties
173+ , osAddtional
174174
175175 -- ** Variant
176176 , Variant
@@ -340,17 +340,17 @@ module Network.Google.Genomics
340340 -- ** VariantCallInfo
341341 , VariantCallInfo
342342 , variantCallInfo
343− , vciProperties
343+ , vciAddtional
344344
345345 -- ** ReadGroupInfo
346346 , ReadGroupInfo
347347 , readGroupInfo
348− , rgiProperties
348+ , rgiAddtional
349349
350350 -- ** StatusDetailsItem
351351 , StatusDetailsItem
352352 , statusDetailsItem
353− , sdiProperties
353+ , sdiAddtional
354354
355355 -- ** SearchCallSetsResponse
356356 , SearchCallSetsResponse
@@ -377,12 +377,12 @@ module Network.Google.Genomics
377377 -- ** OperationMetadataRequest
378378 , OperationMetadataRequest
379379 , operationMetadataRequest
380− , omrProperties
380+ , omrAddtional
381381
382382 -- ** VariantInfo
383383 , VariantInfo
384384 , variantInfo
385− , viProperties
385+ , viAddtional
386386
387387 -- ** Experiment
388388 , Experiment
@@ -585,17 +585,17 @@ module Network.Google.Genomics
585585 -- ** CallSetInfo
586586 , CallSetInfo
587587 , callSetInfo
588− , csiProperties
588+ , csiAddtional
589589
590590 -- ** VariantSetMetadataInfo
591591 , VariantSetMetadataInfo
592592 , variantSetMetadataInfo
593− , vsmiProperties
593+ , vsmiAddtional
594594
595595 -- ** OperationResponse
596596 , OperationResponse
597597 , operationResponse
598− , orProperties
598+ , orAddtional
599599
600600 -- ** OperationEvent
601601 , OperationEvent
@@ -634,7 +634,7 @@ module Network.Google.Genomics
634634 -- ** ReadGroupSetInfo
635635 , ReadGroupSetInfo
636636 , readGroupSetInfo
637− , rgsiProperties
637+ , rgsiAddtional
638638
639639 -- ** ReferenceSet
640640 , ReferenceSet
gogol-genomics/gen/Network/Google/Genomics/Types.hs+11−11
@@ -21,7 +21,7 @@ module Network.Google.Genomics.Types
2121 -- * ReadInfo
2222 , ReadInfo
2323 , readInfo
24− , riProperties
24+ , riAddtional
2525
2626 -- * Status
2727 , Status
@@ -33,7 +33,7 @@ module Network.Google.Genomics.Types
3333 -- * OperationSchema
3434 , OperationSchema
3535 , operationSchema
36− , osProperties
36+ , osAddtional
3737
3838 -- * Variant
3939 , Variant
@@ -203,17 +203,17 @@ module Network.Google.Genomics.Types
203203 -- * VariantCallInfo
204204 , VariantCallInfo
205205 , variantCallInfo
206− , vciProperties
206+ , vciAddtional
207207
208208 -- * ReadGroupInfo
209209 , ReadGroupInfo
210210 , readGroupInfo
211− , rgiProperties
211+ , rgiAddtional
212212
213213 -- * StatusDetailsItem
214214 , StatusDetailsItem
215215 , statusDetailsItem
216− , sdiProperties
216+ , sdiAddtional
217217
218218 -- * SearchCallSetsResponse
219219 , SearchCallSetsResponse
@@ -240,12 +240,12 @@ module Network.Google.Genomics.Types
240240 -- * OperationMetadataRequest
241241 , OperationMetadataRequest
242242 , operationMetadataRequest
243− , omrProperties
243+ , omrAddtional
244244
245245 -- * VariantInfo
246246 , VariantInfo
247247 , variantInfo
248− , viProperties
248+ , viAddtional
249249
250250 -- * Experiment
251251 , Experiment
@@ -448,17 +448,17 @@ module Network.Google.Genomics.Types
448448 -- * CallSetInfo
449449 , CallSetInfo
450450 , callSetInfo
451− , csiProperties
451+ , csiAddtional
452452
453453 -- * VariantSetMetadataInfo
454454 , VariantSetMetadataInfo
455455 , variantSetMetadataInfo
456− , vsmiProperties
456+ , vsmiAddtional
457457
458458 -- * OperationResponse
459459 , OperationResponse
460460 , operationResponse
461− , orProperties
461+ , orAddtional
462462
463463 -- * OperationEvent
464464 , OperationEvent
@@ -497,7 +497,7 @@ module Network.Google.Genomics.Types
497497 -- * ReadGroupSetInfo
498498 , ReadGroupSetInfo
499499 , readGroupSetInfo
500− , rgsiProperties
500+ , rgsiAddtional
501501
502502 -- * ReferenceSet
503503 , ReferenceSet
gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+101−106
@@ -25,25 +25,25 @@ import Network.Google.Prelude
2525--
2626-- /See:/ 'readInfo' smart constructor.
2727newtype ReadInfo = ReadInfo
28− { _riProperties :: HashMap Text [JSONValue]
28+ { _riAddtional :: HashMap Text [JSONValue]
2929 } deriving (Eq,Show,Data,Typeable,Generic)
3030
3131-- | Creates a value of 'ReadInfo' with the minimum fields required to make a request.
3232--
3333-- Use one of the following lenses to modify other fields as desired:
3434--
35−-- * 'riProperties'
35+-- * 'riAddtional'
3636readInfo
37− :: HashMap Text [JSONValue] -- ^ 'properties'
37+ :: HashMap Text [JSONValue] -- ^ 'addtional'
3838 -> ReadInfo
39−readInfo pRiProperties_ =
39+readInfo pRiAddtional_ =
4040 ReadInfo
41− { _riProperties = pRiProperties_
41+ { _riAddtional = pRiAddtional_
4242 }
4343
44−riProperties :: Lens' ReadInfo (HashMap Text [JSONValue])
45−riProperties
46− = lens _riProperties (\ s a -> s{_riProperties = a})
44+riAddtional :: Lens' ReadInfo (HashMap Text [JSONValue])
45+riAddtional
46+ = lens _riAddtional (\ s a -> s{_riAddtional = a})
4747
4848instance FromJSON ReadInfo where
4949 parseJSON
@@ -51,7 +51,7 @@ instance FromJSON ReadInfo where
5151 (\ o -> ReadInfo <$> (parseJSONObject o))
5252
5353instance ToJSON ReadInfo where
54− toJSON = toJSON . _riProperties
54+ toJSON = toJSON . _riAddtional
5555
5656-- | The \`Status\` type defines a logical error model that is suitable for
5757-- different programming environments, including REST APIs and RPC APIs. It
@@ -153,26 +153,26 @@ instance ToJSON Status where
153153--
154154-- /See:/ 'operationSchema' smart constructor.
155155newtype OperationSchema = OperationSchema
156− { _osProperties :: HashMap Text JSONValue
156+ { _osAddtional :: HashMap Text JSONValue
157157 } deriving (Eq,Show,Data,Typeable,Generic)
158158
159159-- | Creates a value of 'OperationSchema' with the minimum fields required to make a request.
160160--
161161-- Use one of the following lenses to modify other fields as desired:
162162--
163−-- * 'osProperties'
163+-- * 'osAddtional'
164164operationSchema
165− :: HashMap Text JSONValue -- ^ 'properties'
165+ :: HashMap Text JSONValue -- ^ 'addtional'
166166 -> OperationSchema
167−operationSchema pOsProperties_ =
167+operationSchema pOsAddtional_ =
168168 OperationSchema
169− { _osProperties = pOsProperties_
169+ { _osAddtional = pOsAddtional_
170170 }
171171
172172-- | Properties of the object. Contains field \'ype with type URL.
173−osProperties :: Lens' OperationSchema (HashMap Text JSONValue)
174−osProperties
175− = lens _osProperties (\ s a -> s{_osProperties = a})
173+osAddtional :: Lens' OperationSchema (HashMap Text JSONValue)
174+osAddtional
175+ = lens _osAddtional (\ s a -> s{_osAddtional = a})
176176
177177instance FromJSON OperationSchema where
178178 parseJSON
@@ -180,7 +180,7 @@ instance FromJSON OperationSchema where
180180 (\ o -> OperationSchema <$> (parseJSONObject o))
181181
182182instance ToJSON OperationSchema where
183− toJSON = toJSON . _osProperties
183+ toJSON = toJSON . _osAddtional
184184
185185-- | A variant represents a change in DNA sequence relative to a reference
186186-- sequence. For example, a variant could represent a SNP or an insertion.
@@ -1844,26 +1844,25 @@ instance ToJSON Reference where
18441844--
18451845-- /See:/ 'variantCallInfo' smart constructor.
18461846newtype VariantCallInfo = VariantCallInfo
1847− { _vciProperties :: HashMap Text [JSONValue]
1847+ { _vciAddtional :: HashMap Text [JSONValue]
18481848 } deriving (Eq,Show,Data,Typeable,Generic)
18491849
18501850-- | Creates a value of 'VariantCallInfo' with the minimum fields required to make a request.
18511851--
18521852-- Use one of the following lenses to modify other fields as desired:
18531853--
1854−-- * 'vciProperties'
1854+-- * 'vciAddtional'
18551855variantCallInfo
1856− :: HashMap Text [JSONValue] -- ^ 'properties'
1856+ :: HashMap Text [JSONValue] -- ^ 'addtional'
18571857 -> VariantCallInfo
1858−variantCallInfo pVciProperties_ =
1858+variantCallInfo pVciAddtional_ =
18591859 VariantCallInfo
1860− { _vciProperties = pVciProperties_
1860+ { _vciAddtional = pVciAddtional_
18611861 }
18621862
1863−vciProperties :: Lens' VariantCallInfo (HashMap Text [JSONValue])
1864−vciProperties
1865− = lens _vciProperties
1866− (\ s a -> s{_vciProperties = a})
1863+vciAddtional :: Lens' VariantCallInfo (HashMap Text [JSONValue])
1864+vciAddtional
1865+ = lens _vciAddtional (\ s a -> s{_vciAddtional = a})
18671866
18681867instance FromJSON VariantCallInfo where
18691868 parseJSON
@@ -1871,33 +1870,32 @@ instance FromJSON VariantCallInfo where
18711870 (\ o -> VariantCallInfo <$> (parseJSONObject o))
18721871
18731872instance ToJSON VariantCallInfo where
1874− toJSON = toJSON . _vciProperties
1873+ toJSON = toJSON . _vciAddtional
18751874
18761875-- | A map of additional read group information. This must be of the form map
18771876-- (string key mapping to a list of string values).
18781877--
18791878-- /See:/ 'readGroupInfo' smart constructor.
18801879newtype ReadGroupInfo = ReadGroupInfo
1881− { _rgiProperties :: HashMap Text [JSONValue]
1880+ { _rgiAddtional :: HashMap Text [JSONValue]
18821881 } deriving (Eq,Show,Data,Typeable,Generic)
18831882
18841883-- | Creates a value of 'ReadGroupInfo' with the minimum fields required to make a request.
18851884--
18861885-- Use one of the following lenses to modify other fields as desired:
18871886--
1888−-- * 'rgiProperties'
1887+-- * 'rgiAddtional'
18891888readGroupInfo
1890− :: HashMap Text [JSONValue] -- ^ 'properties'
1889+ :: HashMap Text [JSONValue] -- ^ 'addtional'
18911890 -> ReadGroupInfo
1892−readGroupInfo pRgiProperties_ =
1891+readGroupInfo pRgiAddtional_ =
18931892 ReadGroupInfo
1894− { _rgiProperties = pRgiProperties_
1893+ { _rgiAddtional = pRgiAddtional_
18951894 }
18961895
1897−rgiProperties :: Lens' ReadGroupInfo (HashMap Text [JSONValue])
1898−rgiProperties
1899− = lens _rgiProperties
1900− (\ s a -> s{_rgiProperties = a})
1896+rgiAddtional :: Lens' ReadGroupInfo (HashMap Text [JSONValue])
1897+rgiAddtional
1898+ = lens _rgiAddtional (\ s a -> s{_rgiAddtional = a})
19011899
19021900instance FromJSON ReadGroupInfo where
19031901 parseJSON
@@ -1905,32 +1903,31 @@ instance FromJSON ReadGroupInfo where
19051903 (\ o -> ReadGroupInfo <$> (parseJSONObject o))
19061904
19071905instance ToJSON ReadGroupInfo where
1908− toJSON = toJSON . _rgiProperties
1906+ toJSON = toJSON . _rgiAddtional
19091907
19101908--
19111909-- /See:/ 'statusDetailsItem' smart constructor.
19121910newtype StatusDetailsItem = StatusDetailsItem
1913− { _sdiProperties :: HashMap Text JSONValue
1911+ { _sdiAddtional :: HashMap Text JSONValue
19141912 } deriving (Eq,Show,Data,Typeable,Generic)
19151913
19161914-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
19171915--
19181916-- Use one of the following lenses to modify other fields as desired:
19191917--
1920−-- * 'sdiProperties'
1918+-- * 'sdiAddtional'
19211919statusDetailsItem
1922− :: HashMap Text JSONValue -- ^ 'properties'
1920+ :: HashMap Text JSONValue -- ^ 'addtional'
19231921 -> StatusDetailsItem
1924−statusDetailsItem pSdiProperties_ =
1922+statusDetailsItem pSdiAddtional_ =
19251923 StatusDetailsItem
1926− { _sdiProperties = pSdiProperties_
1924+ { _sdiAddtional = pSdiAddtional_
19271925 }
19281926
19291927-- | Properties of the object. Contains field \'ype with type URL.
1930−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1931−sdiProperties
1932− = lens _sdiProperties
1933− (\ s a -> s{_sdiProperties = a})
1928+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1929+sdiAddtional
1930+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
19341931
19351932instance FromJSON StatusDetailsItem where
19361933 parseJSON
@@ -1938,7 +1935,7 @@ instance FromJSON StatusDetailsItem where
19381935 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
19391936
19401937instance ToJSON StatusDetailsItem where
1941− toJSON = toJSON . _sdiProperties
1938+ toJSON = toJSON . _sdiAddtional
19421939
19431940-- | The call set search response.
19441941--
@@ -2155,27 +2152,26 @@ instance ToJSON SearchReadsRequest where
21552152--
21562153-- /See:/ 'operationMetadataRequest' smart constructor.
21572154newtype OperationMetadataRequest = OperationMetadataRequest
2158− { _omrProperties :: HashMap Text JSONValue
2155+ { _omrAddtional :: HashMap Text JSONValue
21592156 } deriving (Eq,Show,Data,Typeable,Generic)
21602157
21612158-- | Creates a value of 'OperationMetadataRequest' with the minimum fields required to make a request.
21622159--
21632160-- Use one of the following lenses to modify other fields as desired:
21642161--
2165−-- * 'omrProperties'
2162+-- * 'omrAddtional'
21662163operationMetadataRequest
2167− :: HashMap Text JSONValue -- ^ 'properties'
2164+ :: HashMap Text JSONValue -- ^ 'addtional'
21682165 -> OperationMetadataRequest
2169−operationMetadataRequest pOmrProperties_ =
2166+operationMetadataRequest pOmrAddtional_ =
21702167 OperationMetadataRequest
2171− { _omrProperties = pOmrProperties_
2168+ { _omrAddtional = pOmrAddtional_
21722169 }
21732170
21742171-- | Properties of the object. Contains field \'ype with type URL.
2175−omrProperties :: Lens' OperationMetadataRequest (HashMap Text JSONValue)
2176−omrProperties
2177− = lens _omrProperties
2178− (\ s a -> s{_omrProperties = a})
2172+omrAddtional :: Lens' OperationMetadataRequest (HashMap Text JSONValue)
2173+omrAddtional
2174+ = lens _omrAddtional (\ s a -> s{_omrAddtional = a})
21792175
21802176instance FromJSON OperationMetadataRequest where
21812177 parseJSON
@@ -2184,32 +2180,32 @@ instance FromJSON OperationMetadataRequest where
21842180 OperationMetadataRequest <$> (parseJSONObject o))
21852181
21862182instance ToJSON OperationMetadataRequest where
2187− toJSON = toJSON . _omrProperties
2183+ toJSON = toJSON . _omrAddtional
21882184
21892185-- | A map of additional variant information. This must be of the form map
21902186-- (string key mapping to a list of string values).
21912187--
21922188-- /See:/ 'variantInfo' smart constructor.
21932189newtype VariantInfo = VariantInfo
2194− { _viProperties :: HashMap Text [JSONValue]
2190+ { _viAddtional :: HashMap Text [JSONValue]
21952191 } deriving (Eq,Show,Data,Typeable,Generic)
21962192
21972193-- | Creates a value of 'VariantInfo' with the minimum fields required to make a request.
21982194--
21992195-- Use one of the following lenses to modify other fields as desired:
22002196--
2201−-- * 'viProperties'
2197+-- * 'viAddtional'
22022198variantInfo
2203− :: HashMap Text [JSONValue] -- ^ 'properties'
2199+ :: HashMap Text [JSONValue] -- ^ 'addtional'
22042200 -> VariantInfo
2205−variantInfo pViProperties_ =
2201+variantInfo pViAddtional_ =
22062202 VariantInfo
2207− { _viProperties = pViProperties_
2203+ { _viAddtional = pViAddtional_
22082204 }
22092205
2210−viProperties :: Lens' VariantInfo (HashMap Text [JSONValue])
2211−viProperties
2212− = lens _viProperties (\ s a -> s{_viProperties = a})
2206+viAddtional :: Lens' VariantInfo (HashMap Text [JSONValue])
2207+viAddtional
2208+ = lens _viAddtional (\ s a -> s{_viAddtional = a})
22132209
22142210instance FromJSON VariantInfo where
22152211 parseJSON
@@ -2217,7 +2213,7 @@ instance FromJSON VariantInfo where
22172213 (\ o -> VariantInfo <$> (parseJSONObject o))
22182214
22192215instance ToJSON VariantInfo where
2220− toJSON = toJSON . _viProperties
2216+ toJSON = toJSON . _viAddtional
22212217
22222218--
22232219-- /See:/ 'experiment' smart constructor.
@@ -4112,26 +4108,25 @@ instance ToJSON SearchVariantsRequest where
41124108--
41134109-- /See:/ 'callSetInfo' smart constructor.
41144110newtype CallSetInfo = CallSetInfo
4115− { _csiProperties :: HashMap Text [JSONValue]
4111+ { _csiAddtional :: HashMap Text [JSONValue]
41164112 } deriving (Eq,Show,Data,Typeable,Generic)
41174113
41184114-- | Creates a value of 'CallSetInfo' with the minimum fields required to make a request.
41194115--
41204116-- Use one of the following lenses to modify other fields as desired:
41214117--
4122−-- * 'csiProperties'
4118+-- * 'csiAddtional'
41234119callSetInfo
4124− :: HashMap Text [JSONValue] -- ^ 'properties'
4120+ :: HashMap Text [JSONValue] -- ^ 'addtional'
41254121 -> CallSetInfo
4126−callSetInfo pCsiProperties_ =
4122+callSetInfo pCsiAddtional_ =
41274123 CallSetInfo
4128− { _csiProperties = pCsiProperties_
4124+ { _csiAddtional = pCsiAddtional_
41294125 }
41304126
4131−csiProperties :: Lens' CallSetInfo (HashMap Text [JSONValue])
4132−csiProperties
4133− = lens _csiProperties
4134− (\ s a -> s{_csiProperties = a})
4127+csiAddtional :: Lens' CallSetInfo (HashMap Text [JSONValue])
4128+csiAddtional
4129+ = lens _csiAddtional (\ s a -> s{_csiAddtional = a})
41354130
41364131instance FromJSON CallSetInfo where
41374132 parseJSON
@@ -4139,33 +4134,33 @@ instance FromJSON CallSetInfo where
41394134 (\ o -> CallSetInfo <$> (parseJSONObject o))
41404135
41414136instance ToJSON CallSetInfo where
4142− toJSON = toJSON . _csiProperties
4137+ toJSON = toJSON . _csiAddtional
41434138
41444139-- | Remaining structured metadata key-value pairs. This must be of the form
41454140-- map (string key mapping to a list of string values).
41464141--
41474142-- /See:/ 'variantSetMetadataInfo' smart constructor.
41484143newtype VariantSetMetadataInfo = VariantSetMetadataInfo
4149− { _vsmiProperties :: HashMap Text [JSONValue]
4144+ { _vsmiAddtional :: HashMap Text [JSONValue]
41504145 } deriving (Eq,Show,Data,Typeable,Generic)
41514146
41524147-- | Creates a value of 'VariantSetMetadataInfo' with the minimum fields required to make a request.
41534148--
41544149-- Use one of the following lenses to modify other fields as desired:
41554150--
4156−-- * 'vsmiProperties'
4151+-- * 'vsmiAddtional'
41574152variantSetMetadataInfo
4158− :: HashMap Text [JSONValue] -- ^ 'properties'
4153+ :: HashMap Text [JSONValue] -- ^ 'addtional'
41594154 -> VariantSetMetadataInfo
4160−variantSetMetadataInfo pVsmiProperties_ =
4155+variantSetMetadataInfo pVsmiAddtional_ =
41614156 VariantSetMetadataInfo
4162− { _vsmiProperties = pVsmiProperties_
4157+ { _vsmiAddtional = pVsmiAddtional_
41634158 }
41644159
4165−vsmiProperties :: Lens' VariantSetMetadataInfo (HashMap Text [JSONValue])
4166−vsmiProperties
4167− = lens _vsmiProperties
4168− (\ s a -> s{_vsmiProperties = a})
4160+vsmiAddtional :: Lens' VariantSetMetadataInfo (HashMap Text [JSONValue])
4161+vsmiAddtional
4162+ = lens _vsmiAddtional
4163+ (\ s a -> s{_vsmiAddtional = a})
41694164
41704165instance FromJSON VariantSetMetadataInfo where
41714166 parseJSON
@@ -4174,7 +4169,7 @@ instance FromJSON VariantSetMetadataInfo where
41744169 VariantSetMetadataInfo <$> (parseJSONObject o))
41754170
41764171instance ToJSON VariantSetMetadataInfo where
4177− toJSON = toJSON . _vsmiProperties
4172+ toJSON = toJSON . _vsmiAddtional
41784173
41794174-- | If importing ReadGroupSets, an ImportReadGroupSetsResponse is returned.
41804175-- If importing Variants, an ImportVariantsResponse is returned. For
@@ -4182,26 +4177,26 @@ instance ToJSON VariantSetMetadataInfo where
41824177--
41834178-- /See:/ 'operationResponse' smart constructor.
41844179newtype OperationResponse = OperationResponse
4185− { _orProperties :: HashMap Text JSONValue
4180+ { _orAddtional :: HashMap Text JSONValue
41864181 } deriving (Eq,Show,Data,Typeable,Generic)
41874182
41884183-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
41894184--
41904185-- Use one of the following lenses to modify other fields as desired:
41914186--
4192−-- * 'orProperties'
4187+-- * 'orAddtional'
41934188operationResponse
4194− :: HashMap Text JSONValue -- ^ 'properties'
4189+ :: HashMap Text JSONValue -- ^ 'addtional'
41954190 -> OperationResponse
4196−operationResponse pOrProperties_ =
4191+operationResponse pOrAddtional_ =
41974192 OperationResponse
4198− { _orProperties = pOrProperties_
4193+ { _orAddtional = pOrAddtional_
41994194 }
42004195
42014196-- | Properties of the object. Contains field \'ype with type URL.
4202−orProperties :: Lens' OperationResponse (HashMap Text JSONValue)
4203−orProperties
4204− = lens _orProperties (\ s a -> s{_orProperties = a})
4197+orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
4198+orAddtional
4199+ = lens _orAddtional (\ s a -> s{_orAddtional = a})
42054200
42064201instance FromJSON OperationResponse where
42074202 parseJSON
@@ -4209,7 +4204,7 @@ instance FromJSON OperationResponse where
42094204 (\ o -> OperationResponse <$> (parseJSONObject o))
42104205
42114206instance ToJSON OperationResponse where
4212− toJSON = toJSON . _orProperties
4207+ toJSON = toJSON . _orAddtional
42134208
42144209-- | An event that occurred during an Operation.
42154210--
@@ -4502,26 +4497,26 @@ instance ToJSON SearchReadGroupSetsResponse where
45024497--
45034498-- /See:/ 'readGroupSetInfo' smart constructor.
45044499newtype ReadGroupSetInfo = ReadGroupSetInfo
4505− { _rgsiProperties :: HashMap Text [JSONValue]
4500+ { _rgsiAddtional :: HashMap Text [JSONValue]
45064501 } deriving (Eq,Show,Data,Typeable,Generic)
45074502
45084503-- | Creates a value of 'ReadGroupSetInfo' with the minimum fields required to make a request.
45094504--
45104505-- Use one of the following lenses to modify other fields as desired:
45114506--
4512−-- * 'rgsiProperties'
4507+-- * 'rgsiAddtional'
45134508readGroupSetInfo
4514− :: HashMap Text [JSONValue] -- ^ 'properties'
4509+ :: HashMap Text [JSONValue] -- ^ 'addtional'
45154510 -> ReadGroupSetInfo
4516−readGroupSetInfo pRgsiProperties_ =
4511+readGroupSetInfo pRgsiAddtional_ =
45174512 ReadGroupSetInfo
4518− { _rgsiProperties = pRgsiProperties_
4513+ { _rgsiAddtional = pRgsiAddtional_
45194514 }
45204515
4521−rgsiProperties :: Lens' ReadGroupSetInfo (HashMap Text [JSONValue])
4522−rgsiProperties
4523− = lens _rgsiProperties
4524− (\ s a -> s{_rgsiProperties = a})
4516+rgsiAddtional :: Lens' ReadGroupSetInfo (HashMap Text [JSONValue])
4517+rgsiAddtional
4518+ = lens _rgsiAddtional
4519+ (\ s a -> s{_rgsiAddtional = a})
45254520
45264521instance FromJSON ReadGroupSetInfo where
45274522 parseJSON
@@ -4529,7 +4524,7 @@ instance FromJSON ReadGroupSetInfo where
45294524 (\ o -> ReadGroupSetInfo <$> (parseJSONObject o))
45304525
45314526instance ToJSON ReadGroupSetInfo where
4532− toJSON = toJSON . _rgsiProperties
4527+ toJSON = toJSON . _rgsiAddtional
45334528
45344529-- | A reference set is a set of references which typically comprise a
45354530-- reference assembly for a species, such as \`GRCh38\` which is
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit.hs+1−1
@@ -169,7 +169,7 @@ module Network.Google.IdentityToolkit
169169 -- ** IdentitytoolkitRelyingPartyGetPublicKeysResponse
170170 , IdentitytoolkitRelyingPartyGetPublicKeysResponse
171171 , identitytoolkitRelyingPartyGetPublicKeysResponse
172− , irpgpkrProperties
172+ , irpgpkrAddtional
173173
174174 -- ** RelyingParty
175175 , RelyingParty
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+1−1
@@ -126,7 +126,7 @@ module Network.Google.IdentityToolkit.Types
126126 -- * IdentitytoolkitRelyingPartyGetPublicKeysResponse
127127 , IdentitytoolkitRelyingPartyGetPublicKeysResponse
128128 , identitytoolkitRelyingPartyGetPublicKeysResponse
129− , irpgpkrProperties
129+ , irpgpkrAddtional
130130
131131 -- * RelyingParty
132132 , RelyingParty
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+10−10
@@ -1025,26 +1025,26 @@ instance ToJSON CreateAuthURIResponse where
10251025--
10261026-- /See:/ 'identitytoolkitRelyingPartyGetPublicKeysResponse' smart constructor.
10271027newtype IdentitytoolkitRelyingPartyGetPublicKeysResponse = IdentitytoolkitRelyingPartyGetPublicKeysResponse
1028− { _irpgpkrProperties :: HashMap Text Text
1028+ { _irpgpkrAddtional :: HashMap Text Text
10291029 } deriving (Eq,Show,Data,Typeable,Generic)
10301030
10311031-- | Creates a value of 'IdentitytoolkitRelyingPartyGetPublicKeysResponse' with the minimum fields required to make a request.
10321032--
10331033-- Use one of the following lenses to modify other fields as desired:
10341034--
1035−-- * 'irpgpkrProperties'
1035+-- * 'irpgpkrAddtional'
10361036identitytoolkitRelyingPartyGetPublicKeysResponse
1037− :: HashMap Text Text -- ^ 'properties'
1037+ :: HashMap Text Text -- ^ 'addtional'
10381038 -> IdentitytoolkitRelyingPartyGetPublicKeysResponse
1039−identitytoolkitRelyingPartyGetPublicKeysResponse pIrpgpkrProperties_ =
1039+identitytoolkitRelyingPartyGetPublicKeysResponse pIrpgpkrAddtional_ =
10401040 IdentitytoolkitRelyingPartyGetPublicKeysResponse
1041− { _irpgpkrProperties = pIrpgpkrProperties_
1041+ { _irpgpkrAddtional = pIrpgpkrAddtional_
10421042 }
10431043
1044−irpgpkrProperties :: Lens' IdentitytoolkitRelyingPartyGetPublicKeysResponse (HashMap Text Text)
1045−irpgpkrProperties
1046− = lens _irpgpkrProperties
1047− (\ s a -> s{_irpgpkrProperties = a})
1044+irpgpkrAddtional :: Lens' IdentitytoolkitRelyingPartyGetPublicKeysResponse (HashMap Text Text)
1045+irpgpkrAddtional
1046+ = lens _irpgpkrAddtional
1047+ (\ s a -> s{_irpgpkrAddtional = a})
10481048
10491049instance FromJSON
10501050 IdentitytoolkitRelyingPartyGetPublicKeysResponse
@@ -1059,7 +1059,7 @@ instance FromJSON
10591059instance ToJSON
10601060 IdentitytoolkitRelyingPartyGetPublicKeysResponse
10611061 where
1062− toJSON = toJSON . _irpgpkrProperties
1062+ toJSON = toJSON . _irpgpkrAddtional
10631063
10641064-- | Request of getting a code for user confirmation (reset password, change
10651065-- email etc.)
gogol-logging/gen/Network/Google/Logging.hs+5−5
@@ -116,7 +116,7 @@ module Network.Google.Logging
116116 -- ** WriteLogEntriesRequestCommonLabels
117117 , WriteLogEntriesRequestCommonLabels
118118 , writeLogEntriesRequestCommonLabels
119− , wlerclProperties
119+ , wlerclAddtional
120120
121121 -- ** Empty
122122 , Empty
@@ -177,7 +177,7 @@ module Network.Google.Logging
177177 -- ** LogEntryProtoPayload
178178 , LogEntryProtoPayload
179179 , logEntryProtoPayload
180− , leppProperties
180+ , leppAddtional
181181
182182 -- ** ListLogServiceIndexesResponse
183183 , ListLogServiceIndexesResponse
@@ -206,7 +206,7 @@ module Network.Google.Logging
206206 -- ** StatusDetailsItem
207207 , StatusDetailsItem
208208 , statusDetailsItem
209− , sdiProperties
209+ , sdiAddtional
210210
211211 -- ** ListLogsResponse
212212 , ListLogsResponse
@@ -264,7 +264,7 @@ module Network.Google.Logging
264264 -- ** LogEntryMetadataLabels
265265 , LogEntryMetadataLabels
266266 , logEntryMetadataLabels
267− , lemlProperties
267+ , lemlAddtional
268268
269269 -- ** SourceLocation
270270 , SourceLocation
@@ -282,7 +282,7 @@ module Network.Google.Logging
282282 -- ** LogEntryStructPayload
283283 , LogEntryStructPayload
284284 , logEntryStructPayload
285− , lespProperties
285+ , lespAddtional
286286 ) where
287287
288288import Network.Google.Logging.Types
gogol-logging/gen/Network/Google/Logging/Types.hs+5−5
@@ -48,7 +48,7 @@ module Network.Google.Logging.Types
4848 -- * WriteLogEntriesRequestCommonLabels
4949 , WriteLogEntriesRequestCommonLabels
5050 , writeLogEntriesRequestCommonLabels
51− , wlerclProperties
51+ , wlerclAddtional
5252
5353 -- * Empty
5454 , Empty
@@ -109,7 +109,7 @@ module Network.Google.Logging.Types
109109 -- * LogEntryProtoPayload
110110 , LogEntryProtoPayload
111111 , logEntryProtoPayload
112− , leppProperties
112+ , leppAddtional
113113
114114 -- * ListLogServiceIndexesResponse
115115 , ListLogServiceIndexesResponse
@@ -138,7 +138,7 @@ module Network.Google.Logging.Types
138138 -- * StatusDetailsItem
139139 , StatusDetailsItem
140140 , statusDetailsItem
141− , sdiProperties
141+ , sdiAddtional
142142
143143 -- * ListLogsResponse
144144 , ListLogsResponse
@@ -196,7 +196,7 @@ module Network.Google.Logging.Types
196196 -- * LogEntryMetadataLabels
197197 , LogEntryMetadataLabels
198198 , logEntryMetadataLabels
199− , lemlProperties
199+ , lemlAddtional
200200
201201 -- * SourceLocation
202202 , SourceLocation
@@ -214,7 +214,7 @@ module Network.Google.Logging.Types
214214 -- * LogEntryStructPayload
215215 , LogEntryStructPayload
216216 , logEntryStructPayload
217− , lespProperties
217+ , lespAddtional
218218 ) where
219219
220220import Network.Google.Logging.Types.Product
gogol-logging/gen/Network/Google/Logging/Types/Product.hs+49−50
@@ -304,26 +304,26 @@ instance ToJSON WriteLogEntriesRequest where
304304--
305305-- /See:/ 'writeLogEntriesRequestCommonLabels' smart constructor.
306306newtype WriteLogEntriesRequestCommonLabels = WriteLogEntriesRequestCommonLabels
307− { _wlerclProperties :: HashMap Text Text
307+ { _wlerclAddtional :: HashMap Text Text
308308 } deriving (Eq,Show,Data,Typeable,Generic)
309309
310310-- | Creates a value of 'WriteLogEntriesRequestCommonLabels' with the minimum fields required to make a request.
311311--
312312-- Use one of the following lenses to modify other fields as desired:
313313--
314−-- * 'wlerclProperties'
314+-- * 'wlerclAddtional'
315315writeLogEntriesRequestCommonLabels
316− :: HashMap Text Text -- ^ 'properties'
316+ :: HashMap Text Text -- ^ 'addtional'
317317 -> WriteLogEntriesRequestCommonLabels
318−writeLogEntriesRequestCommonLabels pWlerclProperties_ =
318+writeLogEntriesRequestCommonLabels pWlerclAddtional_ =
319319 WriteLogEntriesRequestCommonLabels
320− { _wlerclProperties = pWlerclProperties_
320+ { _wlerclAddtional = pWlerclAddtional_
321321 }
322322
323−wlerclProperties :: Lens' WriteLogEntriesRequestCommonLabels (HashMap Text Text)
324−wlerclProperties
325− = lens _wlerclProperties
326− (\ s a -> s{_wlerclProperties = a})
323+wlerclAddtional :: Lens' WriteLogEntriesRequestCommonLabels (HashMap Text Text)
324+wlerclAddtional
325+ = lens _wlerclAddtional
326+ (\ s a -> s{_wlerclAddtional = a})
327327
328328instance FromJSON WriteLogEntriesRequestCommonLabels
329329 where
@@ -335,7 +335,7 @@ instance FromJSON WriteLogEntriesRequestCommonLabels
335335
336336instance ToJSON WriteLogEntriesRequestCommonLabels
337337 where
338− toJSON = toJSON . _wlerclProperties
338+ toJSON = toJSON . _wlerclAddtional
339339
340340-- | A generic empty message that you can re-use to avoid defining duplicated
341341-- empty messages in your APIs. A typical example is to use it as the
@@ -927,27 +927,27 @@ instance ToJSON LogEntryMetadata where
927927--
928928-- /See:/ 'logEntryProtoPayload' smart constructor.
929929newtype LogEntryProtoPayload = LogEntryProtoPayload
930− { _leppProperties :: HashMap Text JSONValue
930+ { _leppAddtional :: HashMap Text JSONValue
931931 } deriving (Eq,Show,Data,Typeable,Generic)
932932
933933-- | Creates a value of 'LogEntryProtoPayload' with the minimum fields required to make a request.
934934--
935935-- Use one of the following lenses to modify other fields as desired:
936936--
937−-- * 'leppProperties'
937+-- * 'leppAddtional'
938938logEntryProtoPayload
939− :: HashMap Text JSONValue -- ^ 'properties'
939+ :: HashMap Text JSONValue -- ^ 'addtional'
940940 -> LogEntryProtoPayload
941−logEntryProtoPayload pLeppProperties_ =
941+logEntryProtoPayload pLeppAddtional_ =
942942 LogEntryProtoPayload
943− { _leppProperties = pLeppProperties_
943+ { _leppAddtional = pLeppAddtional_
944944 }
945945
946946-- | Properties of the object. Contains field \'ype with type URL.
947−leppProperties :: Lens' LogEntryProtoPayload (HashMap Text JSONValue)
948−leppProperties
949− = lens _leppProperties
950− (\ s a -> s{_leppProperties = a})
947+leppAddtional :: Lens' LogEntryProtoPayload (HashMap Text JSONValue)
948+leppAddtional
949+ = lens _leppAddtional
950+ (\ s a -> s{_leppAddtional = a})
951951
952952instance FromJSON LogEntryProtoPayload where
953953 parseJSON
@@ -955,7 +955,7 @@ instance FromJSON LogEntryProtoPayload where
955955 (\ o -> LogEntryProtoPayload <$> (parseJSONObject o))
956956
957957instance ToJSON LogEntryProtoPayload where
958− toJSON = toJSON . _leppProperties
958+ toJSON = toJSON . _leppAddtional
959959
960960-- | Result returned from ListLogServiceIndexesRequest.
961961--
@@ -1173,27 +1173,26 @@ instance ToJSON ListLogServicesResponse where
11731173--
11741174-- /See:/ 'statusDetailsItem' smart constructor.
11751175newtype StatusDetailsItem = StatusDetailsItem
1176− { _sdiProperties :: HashMap Text JSONValue
1176+ { _sdiAddtional :: HashMap Text JSONValue
11771177 } deriving (Eq,Show,Data,Typeable,Generic)
11781178
11791179-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
11801180--
11811181-- Use one of the following lenses to modify other fields as desired:
11821182--
1183−-- * 'sdiProperties'
1183+-- * 'sdiAddtional'
11841184statusDetailsItem
1185− :: HashMap Text JSONValue -- ^ 'properties'
1185+ :: HashMap Text JSONValue -- ^ 'addtional'
11861186 -> StatusDetailsItem
1187−statusDetailsItem pSdiProperties_ =
1187+statusDetailsItem pSdiAddtional_ =
11881188 StatusDetailsItem
1189− { _sdiProperties = pSdiProperties_
1189+ { _sdiAddtional = pSdiAddtional_
11901190 }
11911191
11921192-- | Properties of the object. Contains field \'ype with type URL.
1193−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1194−sdiProperties
1195− = lens _sdiProperties
1196− (\ s a -> s{_sdiProperties = a})
1193+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1194+sdiAddtional
1195+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
11971196
11981197instance FromJSON StatusDetailsItem where
11991198 parseJSON
@@ -1201,7 +1200,7 @@ instance FromJSON StatusDetailsItem where
12011200 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
12021201
12031202instance ToJSON StatusDetailsItem where
1204− toJSON = toJSON . _sdiProperties
1203+ toJSON = toJSON . _sdiAddtional
12051204
12061205-- | Result returned from ListLogs.
12071206--
@@ -1710,26 +1709,26 @@ instance ToJSON LogEntry where
17101709--
17111710-- /See:/ 'logEntryMetadataLabels' smart constructor.
17121711newtype LogEntryMetadataLabels = LogEntryMetadataLabels
1713− { _lemlProperties :: HashMap Text Text
1712+ { _lemlAddtional :: HashMap Text Text
17141713 } deriving (Eq,Show,Data,Typeable,Generic)
17151714
17161715-- | Creates a value of 'LogEntryMetadataLabels' with the minimum fields required to make a request.
17171716--
17181717-- Use one of the following lenses to modify other fields as desired:
17191718--
1720−-- * 'lemlProperties'
1719+-- * 'lemlAddtional'
17211720logEntryMetadataLabels
1722− :: HashMap Text Text -- ^ 'properties'
1721+ :: HashMap Text Text -- ^ 'addtional'
17231722 -> LogEntryMetadataLabels
1724−logEntryMetadataLabels pLemlProperties_ =
1723+logEntryMetadataLabels pLemlAddtional_ =
17251724 LogEntryMetadataLabels
1726− { _lemlProperties = pLemlProperties_
1725+ { _lemlAddtional = pLemlAddtional_
17271726 }
17281727
1729−lemlProperties :: Lens' LogEntryMetadataLabels (HashMap Text Text)
1730−lemlProperties
1731− = lens _lemlProperties
1732− (\ s a -> s{_lemlProperties = a})
1728+lemlAddtional :: Lens' LogEntryMetadataLabels (HashMap Text Text)
1729+lemlAddtional
1730+ = lens _lemlAddtional
1731+ (\ s a -> s{_lemlAddtional = a})
17331732
17341733instance FromJSON LogEntryMetadataLabels where
17351734 parseJSON
@@ -1738,7 +1737,7 @@ instance FromJSON LogEntryMetadataLabels where
17381737 LogEntryMetadataLabels <$> (parseJSONObject o))
17391738
17401739instance ToJSON LogEntryMetadataLabels where
1741− toJSON = toJSON . _lemlProperties
1740+ toJSON = toJSON . _lemlAddtional
17421741
17431742-- | Specifies a location in a source file.
17441743--
@@ -1857,27 +1856,27 @@ instance ToJSON SourceReference where
18571856--
18581857-- /See:/ 'logEntryStructPayload' smart constructor.
18591858newtype LogEntryStructPayload = LogEntryStructPayload
1860− { _lespProperties :: HashMap Text JSONValue
1859+ { _lespAddtional :: HashMap Text JSONValue
18611860 } deriving (Eq,Show,Data,Typeable,Generic)
18621861
18631862-- | Creates a value of 'LogEntryStructPayload' with the minimum fields required to make a request.
18641863--
18651864-- Use one of the following lenses to modify other fields as desired:
18661865--
1867−-- * 'lespProperties'
1866+-- * 'lespAddtional'
18681867logEntryStructPayload
1869− :: HashMap Text JSONValue -- ^ 'properties'
1868+ :: HashMap Text JSONValue -- ^ 'addtional'
18701869 -> LogEntryStructPayload
1871−logEntryStructPayload pLespProperties_ =
1870+logEntryStructPayload pLespAddtional_ =
18721871 LogEntryStructPayload
1873− { _lespProperties = pLespProperties_
1872+ { _lespAddtional = pLespAddtional_
18741873 }
18751874
18761875-- | Properties of the object.
1877−lespProperties :: Lens' LogEntryStructPayload (HashMap Text JSONValue)
1878−lespProperties
1879− = lens _lespProperties
1880− (\ s a -> s{_lespProperties = a})
1876+lespAddtional :: Lens' LogEntryStructPayload (HashMap Text JSONValue)
1877+lespAddtional
1878+ = lens _lespAddtional
1879+ (\ s a -> s{_lespAddtional = a})
18811880
18821881instance FromJSON LogEntryStructPayload where
18831882 parseJSON
@@ -1886,4 +1885,4 @@ instance FromJSON LogEntryStructPayload where
18861885 LogEntryStructPayload <$> (parseJSONObject o))
18871886
18881887instance ToJSON LogEntryStructPayload where
1889− toJSON = toJSON . _lespProperties
1888+ toJSON = toJSON . _lespAddtional
gogol-maps-engine/gen/Network/Google/MapsEngine.hs+1−1
@@ -266,7 +266,7 @@ module Network.Google.MapsEngine
266266 -- ** GeoJSONProperties
267267 , GeoJSONProperties
268268 , geoJSONProperties
269− , gjpProperties
269+ , gjpAddtional
270270
271271 -- ** Feature
272272 , Feature
gogol-maps-engine/gen/Network/Google/MapsEngine/Types.hs+1−1
@@ -27,7 +27,7 @@ module Network.Google.MapsEngine.Types
2727 -- * GeoJSONProperties
2828 , GeoJSONProperties
2929 , geoJSONProperties
30− , gjpProperties
30+ , gjpAddtional
3131
3232 -- * Feature
3333 , Feature
gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+9−10
@@ -68,29 +68,28 @@ instance ToJSON ValueRange where
6868--
6969-- /See:/ 'geoJSONProperties' smart constructor.
7070newtype GeoJSONProperties = GeoJSONProperties
71− { _gjpProperties :: HashMap Text JSONValue
71+ { _gjpAddtional :: HashMap Text JSONValue
7272 } deriving (Eq,Show,Data,Typeable,Generic)
7373
7474-- | Creates a value of 'GeoJSONProperties' with the minimum fields required to make a request.
7575--
7676-- Use one of the following lenses to modify other fields as desired:
7777--
78−-- * 'gjpProperties'
78+-- * 'gjpAddtional'
7979geoJSONProperties
80− :: HashMap Text JSONValue -- ^ 'properties'
80+ :: HashMap Text JSONValue -- ^ 'addtional'
8181 -> GeoJSONProperties
82−geoJSONProperties pGjpProperties_ =
82+geoJSONProperties pGjpAddtional_ =
8383 GeoJSONProperties
84− { _gjpProperties = pGjpProperties_
84+ { _gjpAddtional = pGjpAddtional_
8585 }
8686
8787-- | An arbitrary key-value pair. The key must be the name of a column in the
8888-- table\'s schema, and the type of the value must correspond to the type
8989-- specified in the schema.
90−gjpProperties :: Lens' GeoJSONProperties (HashMap Text JSONValue)
91−gjpProperties
92− = lens _gjpProperties
93− (\ s a -> s{_gjpProperties = a})
90+gjpAddtional :: Lens' GeoJSONProperties (HashMap Text JSONValue)
91+gjpAddtional
92+ = lens _gjpAddtional (\ s a -> s{_gjpAddtional = a})
9493
9594instance FromJSON GeoJSONProperties where
9695 parseJSON
@@ -98,7 +97,7 @@ instance FromJSON GeoJSONProperties where
9897 (\ o -> GeoJSONProperties <$> (parseJSONObject o))
9998
10099instance ToJSON GeoJSONProperties where
101− toJSON = toJSON . _gjpProperties
100+ toJSON = toJSON . _gjpAddtional
102101
103102-- | A feature within a table.
104103--
gogol-monitoring/gen/Network/Google/Monitoring.hs+2−2
@@ -76,7 +76,7 @@ module Network.Google.Monitoring
7676 -- ** WriteTimeseriesRequestCommonLabels
7777 , WriteTimeseriesRequestCommonLabels
7878 , writeTimeseriesRequestCommonLabels
79− , wtrclProperties
79+ , wtrclAddtional
8080
8181 -- ** MetricDescriptorLabelDescriptor
8282 , MetricDescriptorLabelDescriptor
@@ -108,7 +108,7 @@ module Network.Google.Monitoring
108108 -- ** TimeseriesDescriptorLabels
109109 , TimeseriesDescriptorLabels
110110 , timeseriesDescriptorLabels
111− , tdlProperties
111+ , tdlAddtional
112112
113113 -- ** PointDistributionBucket
114114 , PointDistributionBucket
gogol-monitoring/gen/Network/Google/Monitoring/Types.hs+2−2
@@ -51,7 +51,7 @@ module Network.Google.Monitoring.Types
5151 -- * WriteTimeseriesRequestCommonLabels
5252 , WriteTimeseriesRequestCommonLabels
5353 , writeTimeseriesRequestCommonLabels
54− , wtrclProperties
54+ , wtrclAddtional
5555
5656 -- * MetricDescriptorLabelDescriptor
5757 , MetricDescriptorLabelDescriptor
@@ -83,7 +83,7 @@ module Network.Google.Monitoring.Types
8383 -- * TimeseriesDescriptorLabels
8484 , TimeseriesDescriptorLabels
8585 , timeseriesDescriptorLabels
86− , tdlProperties
86+ , tdlAddtional
8787
8888 -- * PointDistributionBucket
8989 , PointDistributionBucket
gogol-monitoring/gen/Network/Google/Monitoring/Types/Product.hs+19−20
@@ -307,27 +307,27 @@ instance ToJSON WriteTimeseriesRequest where
307307--
308308-- /See:/ 'writeTimeseriesRequestCommonLabels' smart constructor.
309309newtype WriteTimeseriesRequestCommonLabels = WriteTimeseriesRequestCommonLabels
310− { _wtrclProperties :: HashMap Text Text
310+ { _wtrclAddtional :: HashMap Text Text
311311 } deriving (Eq,Show,Data,Typeable,Generic)
312312
313313-- | Creates a value of 'WriteTimeseriesRequestCommonLabels' with the minimum fields required to make a request.
314314--
315315-- Use one of the following lenses to modify other fields as desired:
316316--
317−-- * 'wtrclProperties'
317+-- * 'wtrclAddtional'
318318writeTimeseriesRequestCommonLabels
319− :: HashMap Text Text -- ^ 'properties'
319+ :: HashMap Text Text -- ^ 'addtional'
320320 -> WriteTimeseriesRequestCommonLabels
321−writeTimeseriesRequestCommonLabels pWtrclProperties_ =
321+writeTimeseriesRequestCommonLabels pWtrclAddtional_ =
322322 WriteTimeseriesRequestCommonLabels
323− { _wtrclProperties = pWtrclProperties_
323+ { _wtrclAddtional = pWtrclAddtional_
324324 }
325325
326326-- | The label\'s name.
327−wtrclProperties :: Lens' WriteTimeseriesRequestCommonLabels (HashMap Text Text)
328−wtrclProperties
329− = lens _wtrclProperties
330− (\ s a -> s{_wtrclProperties = a})
327+wtrclAddtional :: Lens' WriteTimeseriesRequestCommonLabels (HashMap Text Text)
328+wtrclAddtional
329+ = lens _wtrclAddtional
330+ (\ s a -> s{_wtrclAddtional = a})
331331
332332instance FromJSON WriteTimeseriesRequestCommonLabels
333333 where
@@ -339,7 +339,7 @@ instance FromJSON WriteTimeseriesRequestCommonLabels
339339
340340instance ToJSON WriteTimeseriesRequestCommonLabels
341341 where
342− toJSON = toJSON . _wtrclProperties
342+ toJSON = toJSON . _wtrclAddtional
343343
344344-- | A label in a metric is a description of this metric, including the key
345345-- of this description (what the description is), and the value for this
@@ -552,27 +552,26 @@ instance ToJSON ListTimeseriesDescriptorsRequest
552552--
553553-- /See:/ 'timeseriesDescriptorLabels' smart constructor.
554554newtype TimeseriesDescriptorLabels = TimeseriesDescriptorLabels
555− { _tdlProperties :: HashMap Text Text
555+ { _tdlAddtional :: HashMap Text Text
556556 } deriving (Eq,Show,Data,Typeable,Generic)
557557
558558-- | Creates a value of 'TimeseriesDescriptorLabels' with the minimum fields required to make a request.
559559--
560560-- Use one of the following lenses to modify other fields as desired:
561561--
562−-- * 'tdlProperties'
562+-- * 'tdlAddtional'
563563timeseriesDescriptorLabels
564− :: HashMap Text Text -- ^ 'properties'
564+ :: HashMap Text Text -- ^ 'addtional'
565565 -> TimeseriesDescriptorLabels
566−timeseriesDescriptorLabels pTdlProperties_ =
566+timeseriesDescriptorLabels pTdlAddtional_ =
567567 TimeseriesDescriptorLabels
568− { _tdlProperties = pTdlProperties_
568+ { _tdlAddtional = pTdlAddtional_
569569 }
570570
571571-- | The label\'s name.
572−tdlProperties :: Lens' TimeseriesDescriptorLabels (HashMap Text Text)
573−tdlProperties
574− = lens _tdlProperties
575− (\ s a -> s{_tdlProperties = a})
572+tdlAddtional :: Lens' TimeseriesDescriptorLabels (HashMap Text Text)
573+tdlAddtional
574+ = lens _tdlAddtional (\ s a -> s{_tdlAddtional = a})
576575
577576instance FromJSON TimeseriesDescriptorLabels where
578577 parseJSON
@@ -581,7 +580,7 @@ instance FromJSON TimeseriesDescriptorLabels where
581580 TimeseriesDescriptorLabels <$> (parseJSONObject o))
582581
583582instance ToJSON TimeseriesDescriptorLabels where
584− toJSON = toJSON . _tdlProperties
583+ toJSON = toJSON . _tdlAddtional
585584
586585-- | The histogram\'s bucket. Buckets that form the histogram of a
587586-- distribution value. If the upper bound of a bucket, say U1, does not
gogol-pagespeed/gen/Network/Google/PageSpeed.hs+27−27
@@ -29,6 +29,12 @@ module Network.Google.PageSpeed
2929
3030 -- * Types
3131
32+ -- ** ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
33+ , ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
34+ , resultFormattedResultsRuleResultsAdditionalURLBlocksItem
35+ , rfrrraubiURLs
36+ , rfrrraubiHeader
37+
3238 -- ** PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
3339 , PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
3440 , pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
@@ -55,23 +61,9 @@ module Network.Google.PageSpeed
5561 , pafsvairiWidth
5662 , pafsvairiTop
5763
58− -- ** ResultRuleGroupsProperties
59− , ResultRuleGroupsProperties
60− , resultRuleGroupsProperties
61− , rrgpScore
62−
6364 -- ** PagespeedAPIRunPagespeedStrategy
6465 , PagespeedAPIRunPagespeedStrategy (..)
6566
66− -- ** ResultFormattedResultsRuleResultsProperties
67− , ResultFormattedResultsRuleResultsProperties
68− , resultFormattedResultsRuleResultsProperties
69− , rfrrrpSummary
70− , rfrrrpRuleImpact
71− , rfrrrpGroups
72− , rfrrrpLocalizedRuleName
73− , rfrrrpURLBlocks
74−
7567 -- ** ResultVersion
7668 , ResultVersion
7769 , resultVersion
@@ -103,12 +95,6 @@ module Network.Google.PageSpeed
10395 , paivpWidth
10496 , paivpTop
10597
106− -- ** ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
107− , ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
108− , resultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
109− , rfrrrpubiuiResult
110− , rfrrrpubiuiDetails
111−
11298 -- ** Result
11399 , Result
114100 , result
@@ -132,11 +118,10 @@ module Network.Google.PageSpeed
132118 , pafsvaiType
133119 , pafsvaiSecondaryRects
134120
135− -- ** ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
136− , ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
137− , resultFormattedResultsRuleResultsPropertiesURLBlocksItem
138− , rfrrrpubiURLs
139− , rfrrrpubiHeader
121+ -- ** ResultRuleGroupsAdditional
122+ , ResultRuleGroupsAdditional
123+ , resultRuleGroupsAdditional
124+ , rrgaScore
140125
141126 -- ** ResultFormattedResults
142127 , ResultFormattedResults
@@ -144,10 +129,19 @@ module Network.Google.PageSpeed
144129 , rfrLocale
145130 , rfrRuleResults
146131
132+ -- ** ResultFormattedResultsRuleResultsAdditional
133+ , ResultFormattedResultsRuleResultsAdditional
134+ , resultFormattedResultsRuleResultsAdditional
135+ , rfrrraSummary
136+ , rfrrraRuleImpact
137+ , rfrrraGroups
138+ , rfrrraLocalizedRuleName
139+ , rfrrraURLBlocks
140+
147141 -- ** ResultRuleGroups
148142 , ResultRuleGroups
149143 , resultRuleGroups
150− , rrgProperties
144+ , rrgAddtional
151145
152146 -- ** PagespeedAPIFormatStringV2
153147 , PagespeedAPIFormatStringV2
@@ -158,7 +152,13 @@ module Network.Google.PageSpeed
158152 -- ** ResultFormattedResultsRuleResults
159153 , ResultFormattedResultsRuleResults
160154 , resultFormattedResultsRuleResults
161− , rfrrrProperties
155+ , rfrrrAddtional
156+
157+ -- ** ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
158+ , ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
159+ , resultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
160+ , rfrrraubiuiResult
161+ , rfrrraubiuiDetails
162162 ) where
163163
164164import Network.Google.PageSpeed.Types
gogol-pagespeed/gen/Network/Google/PageSpeed/Types.hs+27−27
@@ -18,6 +18,12 @@ module Network.Google.PageSpeed.Types
1818 -- * Service Request
1919 pageSpeedRequest
2020
21+ -- * ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
22+ , ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
23+ , resultFormattedResultsRuleResultsAdditionalURLBlocksItem
24+ , rfrrraubiURLs
25+ , rfrrraubiHeader
26+
2127 -- * PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
2228 , PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
2329 , pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
@@ -44,23 +50,9 @@ module Network.Google.PageSpeed.Types
4450 , pafsvairiWidth
4551 , pafsvairiTop
4652
47− -- * ResultRuleGroupsProperties
48− , ResultRuleGroupsProperties
49− , resultRuleGroupsProperties
50− , rrgpScore
51−
5253 -- * PagespeedAPIRunPagespeedStrategy
5354 , PagespeedAPIRunPagespeedStrategy (..)
5455
55− -- * ResultFormattedResultsRuleResultsProperties
56− , ResultFormattedResultsRuleResultsProperties
57− , resultFormattedResultsRuleResultsProperties
58− , rfrrrpSummary
59− , rfrrrpRuleImpact
60− , rfrrrpGroups
61− , rfrrrpLocalizedRuleName
62− , rfrrrpURLBlocks
63−
6456 -- * ResultVersion
6557 , ResultVersion
6658 , resultVersion
@@ -92,12 +84,6 @@ module Network.Google.PageSpeed.Types
9284 , paivpWidth
9385 , paivpTop
9486
95− -- * ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
96− , ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
97− , resultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
98− , rfrrrpubiuiResult
99− , rfrrrpubiuiDetails
100−
10187 -- * Result
10288 , Result
10389 , result
@@ -121,11 +107,10 @@ module Network.Google.PageSpeed.Types
121107 , pafsvaiType
122108 , pafsvaiSecondaryRects
123109
124− -- * ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
125− , ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
126− , resultFormattedResultsRuleResultsPropertiesURLBlocksItem
127− , rfrrrpubiURLs
128− , rfrrrpubiHeader
110+ -- * ResultRuleGroupsAdditional
111+ , ResultRuleGroupsAdditional
112+ , resultRuleGroupsAdditional
113+ , rrgaScore
129114
130115 -- * ResultFormattedResults
131116 , ResultFormattedResults
@@ -133,10 +118,19 @@ module Network.Google.PageSpeed.Types
133118 , rfrLocale
134119 , rfrRuleResults
135120
121+ -- * ResultFormattedResultsRuleResultsAdditional
122+ , ResultFormattedResultsRuleResultsAdditional
123+ , resultFormattedResultsRuleResultsAdditional
124+ , rfrrraSummary
125+ , rfrrraRuleImpact
126+ , rfrrraGroups
127+ , rfrrraLocalizedRuleName
128+ , rfrrraURLBlocks
129+
136130 -- * ResultRuleGroups
137131 , ResultRuleGroups
138132 , resultRuleGroups
139− , rrgProperties
133+ , rrgAddtional
140134
141135 -- * PagespeedAPIFormatStringV2
142136 , PagespeedAPIFormatStringV2
@@ -147,7 +141,13 @@ module Network.Google.PageSpeed.Types
147141 -- * ResultFormattedResultsRuleResults
148142 , ResultFormattedResultsRuleResults
149143 , resultFormattedResultsRuleResults
150− , rfrrrProperties
144+ , rfrrrAddtional
145+
146+ -- * ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
147+ , ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
148+ , resultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
149+ , rfrrraubiuiResult
150+ , rfrrraubiuiDetails
151151 ) where
152152
153153import Network.Google.PageSpeed.Types.Product
gogol-pagespeed/gen/Network/Google/PageSpeed/Types/Product.hs+263−264
@@ -20,6 +20,63 @@ module Network.Google.PageSpeed.Types.Product where
2020import Network.Google.PageSpeed.Types.Sum
2121import Network.Google.Prelude
2222
23+--
24+-- /See:/ 'resultFormattedResultsRuleResultsAdditionalURLBlocksItem' smart constructor.
25+data ResultFormattedResultsRuleResultsAdditionalURLBlocksItem = ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
26+ { _rfrrraubiURLs :: !(Maybe [ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem])
27+ , _rfrrraubiHeader :: !(Maybe PagespeedAPIFormatStringV2)
28+ } deriving (Eq,Show,Data,Typeable,Generic)
29+
30+-- | Creates a value of 'ResultFormattedResultsRuleResultsAdditionalURLBlocksItem' with the minimum fields required to make a request.
31+--
32+-- Use one of the following lenses to modify other fields as desired:
33+--
34+-- * 'rfrrraubiURLs'
35+--
36+-- * 'rfrrraubiHeader'
37+resultFormattedResultsRuleResultsAdditionalURLBlocksItem
38+ :: ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
39+resultFormattedResultsRuleResultsAdditionalURLBlocksItem =
40+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
41+ { _rfrrraubiURLs = Nothing
42+ , _rfrrraubiHeader = Nothing
43+ }
44+
45+-- | List of entries that provide information about URLs in the url block.
46+-- Optional.
47+rfrrraubiURLs :: Lens' ResultFormattedResultsRuleResultsAdditionalURLBlocksItem [ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem]
48+rfrrraubiURLs
49+ = lens _rfrrraubiURLs
50+ (\ s a -> s{_rfrrraubiURLs = a})
51+ . _Default
52+ . _Coerce
53+
54+-- | Heading to be displayed with the list of URLs.
55+rfrrraubiHeader :: Lens' ResultFormattedResultsRuleResultsAdditionalURLBlocksItem (Maybe PagespeedAPIFormatStringV2)
56+rfrrraubiHeader
57+ = lens _rfrrraubiHeader
58+ (\ s a -> s{_rfrrraubiHeader = a})
59+
60+instance FromJSON
61+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
62+ where
63+ parseJSON
64+ = withObject
65+ "ResultFormattedResultsRuleResultsAdditionalURLBlocksItem"
66+ (\ o ->
67+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
68+ <$> (o .:? "urls" .!= mempty) <*> (o .:? "header"))
69+
70+instance ToJSON
71+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
72+ where
73+ toJSON
74+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItem{..}
75+ = object
76+ (catMaybes
77+ [("urls" .=) <$> _rfrrraubiURLs,
78+ ("header" .=) <$> _rfrrraubiHeader])
79+
2380--
2481-- /See:/ 'pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem' smart constructor.
2582data PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem = PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
@@ -262,147 +319,6 @@ instance ToJSON
262319 ("width" .=) <$> _pafsvairiWidth,
263320 ("top" .=) <$> _pafsvairiTop])
264321
265−-- | The name of this rule group: one of \"SPEED\" or \"USABILITY\".
266−--
267−-- /See:/ 'resultRuleGroupsProperties' smart constructor.
268−newtype ResultRuleGroupsProperties = ResultRuleGroupsProperties
269− { _rrgpScore :: Maybe Int32
270− } deriving (Eq,Show,Data,Typeable,Generic)
271−
272−-- | Creates a value of 'ResultRuleGroupsProperties' with the minimum fields required to make a request.
273−--
274−-- Use one of the following lenses to modify other fields as desired:
275−--
276−-- * 'rrgpScore'
277−resultRuleGroupsProperties
278− :: ResultRuleGroupsProperties
279−resultRuleGroupsProperties =
280− ResultRuleGroupsProperties
281− { _rrgpScore = Nothing
282− }
283−
284−-- | The score (0-100) for this rule group, which indicates how much better a
285−-- page could be in that category (e.g. how much faster, or how much more
286−-- usable). A high score indicates little room for improvement, while a
287−-- lower score indicates more room for improvement.
288−rrgpScore :: Lens' ResultRuleGroupsProperties (Maybe Int32)
289−rrgpScore
290− = lens _rrgpScore (\ s a -> s{_rrgpScore = a})
291−
292−instance FromJSON ResultRuleGroupsProperties where
293− parseJSON
294− = withObject "ResultRuleGroupsProperties"
295− (\ o ->
296− ResultRuleGroupsProperties <$> (o .:? "score"))
297−
298−instance ToJSON ResultRuleGroupsProperties where
299− toJSON ResultRuleGroupsProperties{..}
300− = object (catMaybes [("score" .=) <$> _rrgpScore])
301−
302−-- | The enum-like identifier for this rule. For instance \"EnableKeepAlive\"
303−-- or \"AvoidCssImport\". Not localized.
304−--
305−-- /See:/ 'resultFormattedResultsRuleResultsProperties' smart constructor.
306−data ResultFormattedResultsRuleResultsProperties = ResultFormattedResultsRuleResultsProperties
307− { _rfrrrpSummary :: !(Maybe PagespeedAPIFormatStringV2)
308− , _rfrrrpRuleImpact :: !(Maybe Double)
309− , _rfrrrpGroups :: !(Maybe [Text])
310− , _rfrrrpLocalizedRuleName :: !(Maybe Text)
311− , _rfrrrpURLBlocks :: !(Maybe [ResultFormattedResultsRuleResultsPropertiesURLBlocksItem])
312− } deriving (Eq,Show,Data,Typeable,Generic)
313−
314−-- | Creates a value of 'ResultFormattedResultsRuleResultsProperties' with the minimum fields required to make a request.
315−--
316−-- Use one of the following lenses to modify other fields as desired:
317−--
318−-- * 'rfrrrpSummary'
319−--
320−-- * 'rfrrrpRuleImpact'
321−--
322−-- * 'rfrrrpGroups'
323−--
324−-- * 'rfrrrpLocalizedRuleName'
325−--
326−-- * 'rfrrrpURLBlocks'
327−resultFormattedResultsRuleResultsProperties
328− :: ResultFormattedResultsRuleResultsProperties
329−resultFormattedResultsRuleResultsProperties =
330− ResultFormattedResultsRuleResultsProperties
331− { _rfrrrpSummary = Nothing
332− , _rfrrrpRuleImpact = Nothing
333− , _rfrrrpGroups = Nothing
334− , _rfrrrpLocalizedRuleName = Nothing
335− , _rfrrrpURLBlocks = Nothing
336− }
337−
338−-- | A brief summary description for the rule, indicating at a high level
339−-- what should be done to follow the rule and what benefit can be gained by
340−-- doing so.
341−rfrrrpSummary :: Lens' ResultFormattedResultsRuleResultsProperties (Maybe PagespeedAPIFormatStringV2)
342−rfrrrpSummary
343− = lens _rfrrrpSummary
344− (\ s a -> s{_rfrrrpSummary = a})
345−
346−-- | The impact (unbounded floating point value) that implementing the
347−-- suggestions for this rule would have on making the page faster. Impact
348−-- is comparable between rules to determine which rule\'s suggestions would
349−-- have a higher or lower impact on making a page faster. For instance, if
350−-- enabling compression would save 1MB, while optimizing images would save
351−-- 500kB, the enable compression rule would have 2x the impact of the image
352−-- optimization rule, all other things being equal.
353−rfrrrpRuleImpact :: Lens' ResultFormattedResultsRuleResultsProperties (Maybe Double)
354−rfrrrpRuleImpact
355− = lens _rfrrrpRuleImpact
356− (\ s a -> s{_rfrrrpRuleImpact = a})
357−
358−-- | List of rule groups that this rule belongs to. Each entry in the list is
359−-- one of \"SPEED\" or \"USABILITY\".
360−rfrrrpGroups :: Lens' ResultFormattedResultsRuleResultsProperties [Text]
361−rfrrrpGroups
362− = lens _rfrrrpGroups (\ s a -> s{_rfrrrpGroups = a})
363− . _Default
364− . _Coerce
365−
366−-- | Localized name of the rule, intended for presentation to a user.
367−rfrrrpLocalizedRuleName :: Lens' ResultFormattedResultsRuleResultsProperties (Maybe Text)
368−rfrrrpLocalizedRuleName
369− = lens _rfrrrpLocalizedRuleName
370− (\ s a -> s{_rfrrrpLocalizedRuleName = a})
371−
372−-- | List of blocks of URLs. Each block may contain a heading and a list of
373−-- URLs. Each URL may optionally include additional details.
374−rfrrrpURLBlocks :: Lens' ResultFormattedResultsRuleResultsProperties [ResultFormattedResultsRuleResultsPropertiesURLBlocksItem]
375−rfrrrpURLBlocks
376− = lens _rfrrrpURLBlocks
377− (\ s a -> s{_rfrrrpURLBlocks = a})
378− . _Default
379− . _Coerce
380−
381−instance FromJSON
382− ResultFormattedResultsRuleResultsProperties where
383− parseJSON
384− = withObject
385− "ResultFormattedResultsRuleResultsProperties"
386− (\ o ->
387− ResultFormattedResultsRuleResultsProperties <$>
388− (o .:? "summary") <*> (o .:? "ruleImpact") <*>
389− (o .:? "groups" .!= mempty)
390− <*> (o .:? "localizedRuleName")
391− <*> (o .:? "urlBlocks" .!= mempty))
392−
393−instance ToJSON
394− ResultFormattedResultsRuleResultsProperties where
395− toJSON
396− ResultFormattedResultsRuleResultsProperties{..}
397− = object
398− (catMaybes
399− [("summary" .=) <$> _rfrrrpSummary,
400− ("ruleImpact" .=) <$> _rfrrrpRuleImpact,
401− ("groups" .=) <$> _rfrrrpGroups,
402− ("localizedRuleName" .=) <$>
403− _rfrrrpLocalizedRuleName,
404− ("urlBlocks" .=) <$> _rfrrrpURLBlocks])
405−
406322-- | The version of PageSpeed used to generate these results.
407323--
408324-- /See:/ 'resultVersion' smart constructor.
@@ -705,65 +621,6 @@ instance ToJSON PagespeedAPIImageV2Page_rect where
705621 ("width" .=) <$> _paivpWidth,
706622 ("top" .=) <$> _paivpTop])
707623
708−--
709−-- /See:/ 'resultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem' smart constructor.
710−data ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem = ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
711− { _rfrrrpubiuiResult :: !(Maybe PagespeedAPIFormatStringV2)
712− , _rfrrrpubiuiDetails :: !(Maybe [PagespeedAPIFormatStringV2])
713− } deriving (Eq,Show,Data,Typeable,Generic)
714−
715−-- | Creates a value of 'ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem' with the minimum fields required to make a request.
716−--
717−-- Use one of the following lenses to modify other fields as desired:
718−--
719−-- * 'rfrrrpubiuiResult'
720−--
721−-- * 'rfrrrpubiuiDetails'
722−resultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
723− :: ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
724−resultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem =
725− ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
726− { _rfrrrpubiuiResult = Nothing
727− , _rfrrrpubiuiDetails = Nothing
728− }
729−
730−-- | A format string that gives information about the URL, and a list of
731−-- arguments for that format string.
732−rfrrrpubiuiResult :: Lens' ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem (Maybe PagespeedAPIFormatStringV2)
733−rfrrrpubiuiResult
734− = lens _rfrrrpubiuiResult
735− (\ s a -> s{_rfrrrpubiuiResult = a})
736−
737−-- | List of entries that provide additional details about a single URL.
738−-- Optional.
739−rfrrrpubiuiDetails :: Lens' ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem [PagespeedAPIFormatStringV2]
740−rfrrrpubiuiDetails
741− = lens _rfrrrpubiuiDetails
742− (\ s a -> s{_rfrrrpubiuiDetails = a})
743− . _Default
744− . _Coerce
745−
746−instance FromJSON
747− ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
748− where
749− parseJSON
750− = withObject
751− "ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem"
752− (\ o ->
753− ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
754− <$>
755− (o .:? "result") <*> (o .:? "details" .!= mempty))
756−
757−instance ToJSON
758− ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
759− where
760− toJSON
761− ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem{..}
762− = object
763− (catMaybes
764− [("result" .=) <$> _rfrrrpubiuiResult,
765− ("details" .=) <$> _rfrrrpubiuiDetails])
766−
767624--
768625-- /See:/ 'result' smart constructor.
769626data Result = Result
@@ -995,62 +852,42 @@ instance ToJSON PagespeedAPIFormatStringV2ArgsItem
995852 ("type" .=) <$> _pafsvaiType,
996853 ("secondary_rects" .=) <$> _pafsvaiSecondaryRects])
997854
855+-- | The name of this rule group: one of \"SPEED\" or \"USABILITY\".
998856--
999−-- /See:/ 'resultFormattedResultsRuleResultsPropertiesURLBlocksItem' smart constructor.
1000−data ResultFormattedResultsRuleResultsPropertiesURLBlocksItem = ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
1001− { _rfrrrpubiURLs :: !(Maybe [ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem])
1002− , _rfrrrpubiHeader :: !(Maybe PagespeedAPIFormatStringV2)
857+-- /See:/ 'resultRuleGroupsAdditional' smart constructor.
858+newtype ResultRuleGroupsAdditional = ResultRuleGroupsAdditional
859+ { _rrgaScore :: Maybe Int32
1003860 } deriving (Eq,Show,Data,Typeable,Generic)
1004861
1005−-- | Creates a value of 'ResultFormattedResultsRuleResultsPropertiesURLBlocksItem' with the minimum fields required to make a request.
862+-- | Creates a value of 'ResultRuleGroupsAdditional' with the minimum fields required to make a request.
1006863--
1007864-- Use one of the following lenses to modify other fields as desired:
1008865--
1009−-- * 'rfrrrpubiURLs'
1010−--
1011−-- * 'rfrrrpubiHeader'
1012−resultFormattedResultsRuleResultsPropertiesURLBlocksItem
1013− :: ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
1014−resultFormattedResultsRuleResultsPropertiesURLBlocksItem =
1015− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
1016− { _rfrrrpubiURLs = Nothing
1017− , _rfrrrpubiHeader = Nothing
866+-- * 'rrgaScore'
867+resultRuleGroupsAdditional
868+ :: ResultRuleGroupsAdditional
869+resultRuleGroupsAdditional =
870+ ResultRuleGroupsAdditional
871+ { _rrgaScore = Nothing
1018872 }
1019873
1020−-- | List of entries that provide information about URLs in the url block.
1021−-- Optional.
1022−rfrrrpubiURLs :: Lens' ResultFormattedResultsRuleResultsPropertiesURLBlocksItem [ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem]
1023−rfrrrpubiURLs
1024− = lens _rfrrrpubiURLs
1025− (\ s a -> s{_rfrrrpubiURLs = a})
1026− . _Default
1027− . _Coerce
1028−
1029−-- | Heading to be displayed with the list of URLs.
1030−rfrrrpubiHeader :: Lens' ResultFormattedResultsRuleResultsPropertiesURLBlocksItem (Maybe PagespeedAPIFormatStringV2)
1031−rfrrrpubiHeader
1032− = lens _rfrrrpubiHeader
1033− (\ s a -> s{_rfrrrpubiHeader = a})
874+-- | The score (0-100) for this rule group, which indicates how much better a
875+-- page could be in that category (e.g. how much faster, or how much more
876+-- usable). A high score indicates little room for improvement, while a
877+-- lower score indicates more room for improvement.
878+rrgaScore :: Lens' ResultRuleGroupsAdditional (Maybe Int32)
879+rrgaScore
880+ = lens _rrgaScore (\ s a -> s{_rrgaScore = a})
1034881
1035−instance FromJSON
1036− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
1037− where
882+instance FromJSON ResultRuleGroupsAdditional where
1038883 parseJSON
1039− = withObject
1040− "ResultFormattedResultsRuleResultsPropertiesURLBlocksItem"
884+ = withObject "ResultRuleGroupsAdditional"
1041885 (\ o ->
1042− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
1043− <$> (o .:? "urls" .!= mempty) <*> (o .:? "header"))
886+ ResultRuleGroupsAdditional <$> (o .:? "score"))
1044887
1045−instance ToJSON
1046− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
1047− where
1048− toJSON
1049− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem{..}
1050− = object
1051− (catMaybes
1052− [("urls" .=) <$> _rfrrrpubiURLs,
1053− ("header" .=) <$> _rfrrrpubiHeader])
888+instance ToJSON ResultRuleGroupsAdditional where
889+ toJSON ResultRuleGroupsAdditional{..}
890+ = object (catMaybes [("score" .=) <$> _rrgaScore])
1054891
1055892-- | Localized PageSpeed results. Contains a ruleResults entry for each
1056893-- PageSpeed rule instantiated and run by the server.
@@ -1102,31 +939,134 @@ instance ToJSON ResultFormattedResults where
1102939 [("locale" .=) <$> _rfrLocale,
1103940 ("ruleResults" .=) <$> _rfrRuleResults])
1104941
942+-- | The enum-like identifier for this rule. For instance \"EnableKeepAlive\"
943+-- or \"AvoidCssImport\". Not localized.
944+--
945+-- /See:/ 'resultFormattedResultsRuleResultsAdditional' smart constructor.
946+data ResultFormattedResultsRuleResultsAdditional = ResultFormattedResultsRuleResultsAdditional
947+ { _rfrrraSummary :: !(Maybe PagespeedAPIFormatStringV2)
948+ , _rfrrraRuleImpact :: !(Maybe Double)
949+ , _rfrrraGroups :: !(Maybe [Text])
950+ , _rfrrraLocalizedRuleName :: !(Maybe Text)
951+ , _rfrrraURLBlocks :: !(Maybe [ResultFormattedResultsRuleResultsAdditionalURLBlocksItem])
952+ } deriving (Eq,Show,Data,Typeable,Generic)
953+
954+-- | Creates a value of 'ResultFormattedResultsRuleResultsAdditional' with the minimum fields required to make a request.
955+--
956+-- Use one of the following lenses to modify other fields as desired:
957+--
958+-- * 'rfrrraSummary'
959+--
960+-- * 'rfrrraRuleImpact'
961+--
962+-- * 'rfrrraGroups'
963+--
964+-- * 'rfrrraLocalizedRuleName'
965+--
966+-- * 'rfrrraURLBlocks'
967+resultFormattedResultsRuleResultsAdditional
968+ :: ResultFormattedResultsRuleResultsAdditional
969+resultFormattedResultsRuleResultsAdditional =
970+ ResultFormattedResultsRuleResultsAdditional
971+ { _rfrrraSummary = Nothing
972+ , _rfrrraRuleImpact = Nothing
973+ , _rfrrraGroups = Nothing
974+ , _rfrrraLocalizedRuleName = Nothing
975+ , _rfrrraURLBlocks = Nothing
976+ }
977+
978+-- | A brief summary description for the rule, indicating at a high level
979+-- what should be done to follow the rule and what benefit can be gained by
980+-- doing so.
981+rfrrraSummary :: Lens' ResultFormattedResultsRuleResultsAdditional (Maybe PagespeedAPIFormatStringV2)
982+rfrrraSummary
983+ = lens _rfrrraSummary
984+ (\ s a -> s{_rfrrraSummary = a})
985+
986+-- | The impact (unbounded floating point value) that implementing the
987+-- suggestions for this rule would have on making the page faster. Impact
988+-- is comparable between rules to determine which rule\'s suggestions would
989+-- have a higher or lower impact on making a page faster. For instance, if
990+-- enabling compression would save 1MB, while optimizing images would save
991+-- 500kB, the enable compression rule would have 2x the impact of the image
992+-- optimization rule, all other things being equal.
993+rfrrraRuleImpact :: Lens' ResultFormattedResultsRuleResultsAdditional (Maybe Double)
994+rfrrraRuleImpact
995+ = lens _rfrrraRuleImpact
996+ (\ s a -> s{_rfrrraRuleImpact = a})
997+
998+-- | List of rule groups that this rule belongs to. Each entry in the list is
999+-- one of \"SPEED\" or \"USABILITY\".
1000+rfrrraGroups :: Lens' ResultFormattedResultsRuleResultsAdditional [Text]
1001+rfrrraGroups
1002+ = lens _rfrrraGroups (\ s a -> s{_rfrrraGroups = a})
1003+ . _Default
1004+ . _Coerce
1005+
1006+-- | Localized name of the rule, intended for presentation to a user.
1007+rfrrraLocalizedRuleName :: Lens' ResultFormattedResultsRuleResultsAdditional (Maybe Text)
1008+rfrrraLocalizedRuleName
1009+ = lens _rfrrraLocalizedRuleName
1010+ (\ s a -> s{_rfrrraLocalizedRuleName = a})
1011+
1012+-- | List of blocks of URLs. Each block may contain a heading and a list of
1013+-- URLs. Each URL may optionally include additional details.
1014+rfrrraURLBlocks :: Lens' ResultFormattedResultsRuleResultsAdditional [ResultFormattedResultsRuleResultsAdditionalURLBlocksItem]
1015+rfrrraURLBlocks
1016+ = lens _rfrrraURLBlocks
1017+ (\ s a -> s{_rfrrraURLBlocks = a})
1018+ . _Default
1019+ . _Coerce
1020+
1021+instance FromJSON
1022+ ResultFormattedResultsRuleResultsAdditional where
1023+ parseJSON
1024+ = withObject
1025+ "ResultFormattedResultsRuleResultsAdditional"
1026+ (\ o ->
1027+ ResultFormattedResultsRuleResultsAdditional <$>
1028+ (o .:? "summary") <*> (o .:? "ruleImpact") <*>
1029+ (o .:? "groups" .!= mempty)
1030+ <*> (o .:? "localizedRuleName")
1031+ <*> (o .:? "urlBlocks" .!= mempty))
1032+
1033+instance ToJSON
1034+ ResultFormattedResultsRuleResultsAdditional where
1035+ toJSON
1036+ ResultFormattedResultsRuleResultsAdditional{..}
1037+ = object
1038+ (catMaybes
1039+ [("summary" .=) <$> _rfrrraSummary,
1040+ ("ruleImpact" .=) <$> _rfrrraRuleImpact,
1041+ ("groups" .=) <$> _rfrrraGroups,
1042+ ("localizedRuleName" .=) <$>
1043+ _rfrrraLocalizedRuleName,
1044+ ("urlBlocks" .=) <$> _rfrrraURLBlocks])
1045+
11051046-- | A map with one entry for each rule group in these results.
11061047--
11071048-- /See:/ 'resultRuleGroups' smart constructor.
11081049newtype ResultRuleGroups = ResultRuleGroups
1109− { _rrgProperties :: HashMap Text ResultRuleGroupsProperties
1050+ { _rrgAddtional :: HashMap Text ResultRuleGroupsAdditional
11101051 } deriving (Eq,Show,Data,Typeable,Generic)
11111052
11121053-- | Creates a value of 'ResultRuleGroups' with the minimum fields required to make a request.
11131054--
11141055-- Use one of the following lenses to modify other fields as desired:
11151056--
1116−-- * 'rrgProperties'
1057+-- * 'rrgAddtional'
11171058resultRuleGroups
1118− :: HashMap Text ResultRuleGroupsProperties -- ^ 'properties'
1059+ :: HashMap Text ResultRuleGroupsAdditional -- ^ 'addtional'
11191060 -> ResultRuleGroups
1120−resultRuleGroups pRrgProperties_ =
1061+resultRuleGroups pRrgAddtional_ =
11211062 ResultRuleGroups
1122− { _rrgProperties = pRrgProperties_
1063+ { _rrgAddtional = pRrgAddtional_
11231064 }
11241065
11251066-- | The name of this rule group: one of \"SPEED\" or \"USABILITY\".
1126−rrgProperties :: Lens' ResultRuleGroups (HashMap Text ResultRuleGroupsProperties)
1127−rrgProperties
1128− = lens _rrgProperties
1129− (\ s a -> s{_rrgProperties = a})
1067+rrgAddtional :: Lens' ResultRuleGroups (HashMap Text ResultRuleGroupsAdditional)
1068+rrgAddtional
1069+ = lens _rrgAddtional (\ s a -> s{_rrgAddtional = a})
11301070
11311071instance FromJSON ResultRuleGroups where
11321072 parseJSON
@@ -1134,7 +1074,7 @@ instance FromJSON ResultRuleGroups where
11341074 (\ o -> ResultRuleGroups <$> (parseJSONObject o))
11351075
11361076instance ToJSON ResultRuleGroups where
1137− toJSON = toJSON . _rrgProperties
1077+ toJSON = toJSON . _rrgAddtional
11381078
11391079--
11401080-- /See:/ 'pagespeedAPIFormatStringV2' smart constructor.
@@ -1192,28 +1132,28 @@ instance ToJSON PagespeedAPIFormatStringV2 where
11921132--
11931133-- /See:/ 'resultFormattedResultsRuleResults' smart constructor.
11941134newtype ResultFormattedResultsRuleResults = ResultFormattedResultsRuleResults
1195− { _rfrrrProperties :: HashMap Text ResultFormattedResultsRuleResultsProperties
1135+ { _rfrrrAddtional :: HashMap Text ResultFormattedResultsRuleResultsAdditional
11961136 } deriving (Eq,Show,Data,Typeable,Generic)
11971137
11981138-- | Creates a value of 'ResultFormattedResultsRuleResults' with the minimum fields required to make a request.
11991139--
12001140-- Use one of the following lenses to modify other fields as desired:
12011141--
1202−-- * 'rfrrrProperties'
1142+-- * 'rfrrrAddtional'
12031143resultFormattedResultsRuleResults
1204− :: HashMap Text ResultFormattedResultsRuleResultsProperties -- ^ 'properties'
1144+ :: HashMap Text ResultFormattedResultsRuleResultsAdditional -- ^ 'addtional'
12051145 -> ResultFormattedResultsRuleResults
1206−resultFormattedResultsRuleResults pRfrrrProperties_ =
1146+resultFormattedResultsRuleResults pRfrrrAddtional_ =
12071147 ResultFormattedResultsRuleResults
1208− { _rfrrrProperties = pRfrrrProperties_
1148+ { _rfrrrAddtional = pRfrrrAddtional_
12091149 }
12101150
12111151-- | The enum-like identifier for this rule. For instance \"EnableKeepAlive\"
12121152-- or \"AvoidCssImport\". Not localized.
1213−rfrrrProperties :: Lens' ResultFormattedResultsRuleResults (HashMap Text ResultFormattedResultsRuleResultsProperties)
1214−rfrrrProperties
1215− = lens _rfrrrProperties
1216− (\ s a -> s{_rfrrrProperties = a})
1153+rfrrrAddtional :: Lens' ResultFormattedResultsRuleResults (HashMap Text ResultFormattedResultsRuleResultsAdditional)
1154+rfrrrAddtional
1155+ = lens _rfrrrAddtional
1156+ (\ s a -> s{_rfrrrAddtional = a})
12171157
12181158instance FromJSON ResultFormattedResultsRuleResults
12191159 where
@@ -1225,4 +1165,63 @@ instance FromJSON ResultFormattedResultsRuleResults
12251165
12261166instance ToJSON ResultFormattedResultsRuleResults
12271167 where
1228− toJSON = toJSON . _rfrrrProperties
1168+ toJSON = toJSON . _rfrrrAddtional
1169+
1170+--
1171+-- /See:/ 'resultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem' smart constructor.
1172+data ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem = ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
1173+ { _rfrrraubiuiResult :: !(Maybe PagespeedAPIFormatStringV2)
1174+ , _rfrrraubiuiDetails :: !(Maybe [PagespeedAPIFormatStringV2])
1175+ } deriving (Eq,Show,Data,Typeable,Generic)
1176+
1177+-- | Creates a value of 'ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem' with the minimum fields required to make a request.
1178+--
1179+-- Use one of the following lenses to modify other fields as desired:
1180+--
1181+-- * 'rfrrraubiuiResult'
1182+--
1183+-- * 'rfrrraubiuiDetails'
1184+resultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
1185+ :: ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
1186+resultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem =
1187+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
1188+ { _rfrrraubiuiResult = Nothing
1189+ , _rfrrraubiuiDetails = Nothing
1190+ }
1191+
1192+-- | A format string that gives information about the URL, and a list of
1193+-- arguments for that format string.
1194+rfrrraubiuiResult :: Lens' ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem (Maybe PagespeedAPIFormatStringV2)
1195+rfrrraubiuiResult
1196+ = lens _rfrrraubiuiResult
1197+ (\ s a -> s{_rfrrraubiuiResult = a})
1198+
1199+-- | List of entries that provide additional details about a single URL.
1200+-- Optional.
1201+rfrrraubiuiDetails :: Lens' ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem [PagespeedAPIFormatStringV2]
1202+rfrrraubiuiDetails
1203+ = lens _rfrrraubiuiDetails
1204+ (\ s a -> s{_rfrrraubiuiDetails = a})
1205+ . _Default
1206+ . _Coerce
1207+
1208+instance FromJSON
1209+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
1210+ where
1211+ parseJSON
1212+ = withObject
1213+ "ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem"
1214+ (\ o ->
1215+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
1216+ <$>
1217+ (o .:? "result") <*> (o .:? "details" .!= mempty))
1218+
1219+instance ToJSON
1220+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
1221+ where
1222+ toJSON
1223+ ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem{..}
1224+ = object
1225+ (catMaybes
1226+ [("result" .=) <$> _rfrrraubiuiResult,
1227+ ("details" .=) <$> _rfrrraubiuiDetails])
gogol-partners/gen/Network/Google/Partners.hs+1−1
@@ -174,7 +174,7 @@ module Network.Google.Partners
174174 -- ** LogMessageRequestClientInfo
175175 , LogMessageRequestClientInfo
176176 , logMessageRequestClientInfo
177− , lmrciProperties
177+ , lmrciAddtional
178178
179179 -- ** Lead
180180 , Lead
gogol-partners/gen/Network/Google/Partners/Types.hs+1−1
@@ -148,7 +148,7 @@ module Network.Google.Partners.Types
148148 -- * LogMessageRequestClientInfo
149149 , LogMessageRequestClientInfo
150150 , logMessageRequestClientInfo
151− , lmrciProperties
151+ , lmrciAddtional
152152
153153 -- * Lead
154154 , Lead
gogol-partners/gen/Network/Google/Partners/Types/Product.hs+10−10
@@ -1122,26 +1122,26 @@ instance ToJSON LocalizedCompanyInfo where
11221122--
11231123-- /See:/ 'logMessageRequestClientInfo' smart constructor.
11241124newtype LogMessageRequestClientInfo = LogMessageRequestClientInfo
1125− { _lmrciProperties :: HashMap Text Text
1125+ { _lmrciAddtional :: HashMap Text Text
11261126 } deriving (Eq,Show,Data,Typeable,Generic)
11271127
11281128-- | Creates a value of 'LogMessageRequestClientInfo' with the minimum fields required to make a request.
11291129--
11301130-- Use one of the following lenses to modify other fields as desired:
11311131--
1132−-- * 'lmrciProperties'
1132+-- * 'lmrciAddtional'
11331133logMessageRequestClientInfo
1134− :: HashMap Text Text -- ^ 'properties'
1134+ :: HashMap Text Text -- ^ 'addtional'
11351135 -> LogMessageRequestClientInfo
1136−logMessageRequestClientInfo pLmrciProperties_ =
1136+logMessageRequestClientInfo pLmrciAddtional_ =
11371137 LogMessageRequestClientInfo
1138− { _lmrciProperties = pLmrciProperties_
1138+ { _lmrciAddtional = pLmrciAddtional_
11391139 }
11401140
1141−lmrciProperties :: Lens' LogMessageRequestClientInfo (HashMap Text Text)
1142−lmrciProperties
1143− = lens _lmrciProperties
1144− (\ s a -> s{_lmrciProperties = a})
1141+lmrciAddtional :: Lens' LogMessageRequestClientInfo (HashMap Text Text)
1142+lmrciAddtional
1143+ = lens _lmrciAddtional
1144+ (\ s a -> s{_lmrciAddtional = a})
11451145
11461146instance FromJSON LogMessageRequestClientInfo where
11471147 parseJSON
@@ -1150,7 +1150,7 @@ instance FromJSON LogMessageRequestClientInfo where
11501150 LogMessageRequestClientInfo <$> (parseJSONObject o))
11511151
11521152instance ToJSON LogMessageRequestClientInfo where
1153− toJSON = toJSON . _lmrciProperties
1153+ toJSON = toJSON . _lmrciAddtional
11541154
11551155-- | A lead resource that represents an advertiser contact for a \`Company\`.
11561156-- These are usually generated via Google Partner Search (the advertiser
gogol-prediction/gen/Network/Google/Prediction.hs+9−9
@@ -63,7 +63,7 @@ module Network.Google.Prediction
6363 -- ** AnalyzeModelDescriptionConfusionMatrixRowTotals
6464 , AnalyzeModelDescriptionConfusionMatrixRowTotals
6565 , analyzeModelDescriptionConfusionMatrixRowTotals
66− , amdcmrtProperties
66+ , amdcmrtAddtional
6767
6868 -- ** Insert
6969 , Insert
@@ -88,7 +88,7 @@ module Network.Google.Prediction
8888 -- ** InsertUtilityItem
8989 , InsertUtilityItem
9090 , insertUtilityItem
91− , iuiProperties
91+ , iuiAddtional
9292
9393 -- ** Insert2
9494 , Insert2
@@ -105,11 +105,6 @@ module Network.Google.Prediction
105105 , insStoragePMMLLocation
106106 , insModelInfo
107107
108− -- ** AnalyzeModelDescriptionConfusionMatrixProperties
109− , AnalyzeModelDescriptionConfusionMatrixProperties
110− , analyzeModelDescriptionConfusionMatrixProperties
111− , amdcmpProperties
112−
113108 -- ** InsertTrainingInstancesItem
114109 , InsertTrainingInstancesItem
115110 , insertTrainingInstancesItem
@@ -170,7 +165,7 @@ module Network.Google.Prediction
170165 -- ** AnalyzeModelDescriptionConfusionMatrix
171166 , AnalyzeModelDescriptionConfusionMatrix
172167 , analyzeModelDescriptionConfusionMatrix
173− , amdcmProperties
168+ , amdcmAddtional
174169
175170 -- ** Output
176171 , Output
@@ -192,7 +187,7 @@ module Network.Google.Prediction
192187 -- ** AnalyzeErrorsItem
193188 , AnalyzeErrorsItem
194189 , analyzeErrorsItem
195− , aeiProperties
190+ , aeiAddtional
196191
197192 -- ** AnalyzeDataDescription
198193 , AnalyzeDataDescription
@@ -212,6 +207,11 @@ module Network.Google.Prediction
212207 , analyzeDataDescriptionFeaturesItemText
213208 , addfitCount
214209
210+ -- ** AnalyzeModelDescriptionConfusionMatrixAdditional
211+ , AnalyzeModelDescriptionConfusionMatrixAdditional
212+ , analyzeModelDescriptionConfusionMatrixAdditional
213+ , amdcmaAddtional
214+
215215 -- ** AnalyzeDataDescriptionFeaturesItem
216216 , AnalyzeDataDescriptionFeaturesItem
217217 , analyzeDataDescriptionFeaturesItem
gogol-prediction/gen/Network/Google/Prediction/Types.hs+9−9
@@ -31,7 +31,7 @@ module Network.Google.Prediction.Types
3131 -- * AnalyzeModelDescriptionConfusionMatrixRowTotals
3232 , AnalyzeModelDescriptionConfusionMatrixRowTotals
3333 , analyzeModelDescriptionConfusionMatrixRowTotals
34− , amdcmrtProperties
34+ , amdcmrtAddtional
3535
3636 -- * Insert
3737 , Insert
@@ -56,7 +56,7 @@ module Network.Google.Prediction.Types
5656 -- * InsertUtilityItem
5757 , InsertUtilityItem
5858 , insertUtilityItem
59− , iuiProperties
59+ , iuiAddtional
6060
6161 -- * Insert2
6262 , Insert2
@@ -73,11 +73,6 @@ module Network.Google.Prediction.Types
7373 , insStoragePMMLLocation
7474 , insModelInfo
7575
76− -- * AnalyzeModelDescriptionConfusionMatrixProperties
77− , AnalyzeModelDescriptionConfusionMatrixProperties
78− , analyzeModelDescriptionConfusionMatrixProperties
79− , amdcmpProperties
80−
8176 -- * InsertTrainingInstancesItem
8277 , InsertTrainingInstancesItem
8378 , insertTrainingInstancesItem
@@ -138,7 +133,7 @@ module Network.Google.Prediction.Types
138133 -- * AnalyzeModelDescriptionConfusionMatrix
139134 , AnalyzeModelDescriptionConfusionMatrix
140135 , analyzeModelDescriptionConfusionMatrix
141− , amdcmProperties
136+ , amdcmAddtional
142137
143138 -- * Output
144139 , Output
@@ -160,7 +155,7 @@ module Network.Google.Prediction.Types
160155 -- * AnalyzeErrorsItem
161156 , AnalyzeErrorsItem
162157 , analyzeErrorsItem
163− , aeiProperties
158+ , aeiAddtional
164159
165160 -- * AnalyzeDataDescription
166161 , AnalyzeDataDescription
@@ -180,6 +175,11 @@ module Network.Google.Prediction.Types
180175 , analyzeDataDescriptionFeaturesItemText
181176 , addfitCount
182177
178+ -- * AnalyzeModelDescriptionConfusionMatrixAdditional
179+ , AnalyzeModelDescriptionConfusionMatrixAdditional
180+ , analyzeModelDescriptionConfusionMatrixAdditional
181+ , amdcmaAddtional
182+
183183 -- * AnalyzeDataDescriptionFeaturesItem
184184 , AnalyzeDataDescriptionFeaturesItem
185185 , analyzeDataDescriptionFeaturesItem
gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+81−83
@@ -130,26 +130,26 @@ instance ToJSON Insert2ModelInfo where
130130--
131131-- /See:/ 'analyzeModelDescriptionConfusionMatrixRowTotals' smart constructor.
132132newtype AnalyzeModelDescriptionConfusionMatrixRowTotals = AnalyzeModelDescriptionConfusionMatrixRowTotals
133− { _amdcmrtProperties :: HashMap Text Text
133+ { _amdcmrtAddtional :: HashMap Text Text
134134 } deriving (Eq,Show,Data,Typeable,Generic)
135135
136136-- | Creates a value of 'AnalyzeModelDescriptionConfusionMatrixRowTotals' with the minimum fields required to make a request.
137137--
138138-- Use one of the following lenses to modify other fields as desired:
139139--
140−-- * 'amdcmrtProperties'
140+-- * 'amdcmrtAddtional'
141141analyzeModelDescriptionConfusionMatrixRowTotals
142− :: HashMap Text Text -- ^ 'properties'
142+ :: HashMap Text Text -- ^ 'addtional'
143143 -> AnalyzeModelDescriptionConfusionMatrixRowTotals
144−analyzeModelDescriptionConfusionMatrixRowTotals pAmdcmrtProperties_ =
144+analyzeModelDescriptionConfusionMatrixRowTotals pAmdcmrtAddtional_ =
145145 AnalyzeModelDescriptionConfusionMatrixRowTotals
146− { _amdcmrtProperties = pAmdcmrtProperties_
146+ { _amdcmrtAddtional = pAmdcmrtAddtional_
147147 }
148148
149−amdcmrtProperties :: Lens' AnalyzeModelDescriptionConfusionMatrixRowTotals (HashMap Text Text)
150−amdcmrtProperties
151− = lens _amdcmrtProperties
152− (\ s a -> s{_amdcmrtProperties = a})
149+amdcmrtAddtional :: Lens' AnalyzeModelDescriptionConfusionMatrixRowTotals (HashMap Text Text)
150+amdcmrtAddtional
151+ = lens _amdcmrtAddtional
152+ (\ s a -> s{_amdcmrtAddtional = a})
153153
154154instance FromJSON
155155 AnalyzeModelDescriptionConfusionMatrixRowTotals where
@@ -162,7 +162,7 @@ instance FromJSON
162162
163163instance ToJSON
164164 AnalyzeModelDescriptionConfusionMatrixRowTotals where
165− toJSON = toJSON . _amdcmrtProperties
165+ toJSON = toJSON . _amdcmrtAddtional
166166
167167--
168168-- /See:/ 'insert' smart constructor.
@@ -360,26 +360,25 @@ instance ToJSON List where
360360--
361361-- /See:/ 'insertUtilityItem' smart constructor.
362362newtype InsertUtilityItem = InsertUtilityItem
363− { _iuiProperties :: HashMap Text Double
363+ { _iuiAddtional :: HashMap Text Double
364364 } deriving (Eq,Show,Data,Typeable,Generic)
365365
366366-- | Creates a value of 'InsertUtilityItem' with the minimum fields required to make a request.
367367--
368368-- Use one of the following lenses to modify other fields as desired:
369369--
370−-- * 'iuiProperties'
370+-- * 'iuiAddtional'
371371insertUtilityItem
372− :: HashMap Text Double -- ^ 'properties'
372+ :: HashMap Text Double -- ^ 'addtional'
373373 -> InsertUtilityItem
374−insertUtilityItem pIuiProperties_ =
374+insertUtilityItem pIuiAddtional_ =
375375 InsertUtilityItem
376− { _iuiProperties = pIuiProperties_
376+ { _iuiAddtional = pIuiAddtional_
377377 }
378378
379−iuiProperties :: Lens' InsertUtilityItem (HashMap Text Double)
380−iuiProperties
381− = lens _iuiProperties
382− (\ s a -> s{_iuiProperties = a})
379+iuiAddtional :: Lens' InsertUtilityItem (HashMap Text Double)
380+iuiAddtional
381+ = lens _iuiAddtional (\ s a -> s{_iuiAddtional = a})
383382
384383instance FromJSON InsertUtilityItem where
385384 parseJSON
@@ -387,7 +386,7 @@ instance FromJSON InsertUtilityItem where
387386 (\ o -> InsertUtilityItem <$> (parseJSONObject o))
388387
389388instance ToJSON InsertUtilityItem where
390− toJSON = toJSON . _iuiProperties
389+ toJSON = toJSON . _iuiAddtional
391390
392391--
393392-- /See:/ 'insert2' smart constructor.
@@ -543,49 +542,6 @@ instance ToJSON Insert2 where
543542 _insStoragePMMLLocation,
544543 ("modelInfo" .=) <$> _insModelInfo])
545544
546−-- | Confusion matrix information for the true class label.
547−--
548−-- /See:/ 'analyzeModelDescriptionConfusionMatrixProperties' smart constructor.
549−newtype AnalyzeModelDescriptionConfusionMatrixProperties = AnalyzeModelDescriptionConfusionMatrixProperties
550− { _amdcmpProperties :: HashMap Text Text
551− } deriving (Eq,Show,Data,Typeable,Generic)
552−
553−-- | Creates a value of 'AnalyzeModelDescriptionConfusionMatrixProperties' with the minimum fields required to make a request.
554−--
555−-- Use one of the following lenses to modify other fields as desired:
556−--
557−-- * 'amdcmpProperties'
558−analyzeModelDescriptionConfusionMatrixProperties
559− :: HashMap Text Text -- ^ 'properties'
560− -> AnalyzeModelDescriptionConfusionMatrixProperties
561−analyzeModelDescriptionConfusionMatrixProperties pAmdcmpProperties_ =
562− AnalyzeModelDescriptionConfusionMatrixProperties
563− { _amdcmpProperties = pAmdcmpProperties_
564− }
565−
566−-- | Average number of times an instance with correct class label
567−-- modelDescription.confusionMatrix.(key) was wrongfully classified as this
568−-- label.
569−amdcmpProperties :: Lens' AnalyzeModelDescriptionConfusionMatrixProperties (HashMap Text Text)
570−amdcmpProperties
571− = lens _amdcmpProperties
572− (\ s a -> s{_amdcmpProperties = a})
573−
574−instance FromJSON
575− AnalyzeModelDescriptionConfusionMatrixProperties
576− where
577− parseJSON
578− = withObject
579− "AnalyzeModelDescriptionConfusionMatrixProperties"
580− (\ o ->
581− AnalyzeModelDescriptionConfusionMatrixProperties <$>
582− (parseJSONObject o))
583−
584−instance ToJSON
585− AnalyzeModelDescriptionConfusionMatrixProperties
586− where
587− toJSON = toJSON . _amdcmpProperties
588−
589545--
590546-- /See:/ 'insertTrainingInstancesItem' smart constructor.
591547data InsertTrainingInstancesItem = InsertTrainingInstancesItem
@@ -1070,27 +1026,27 @@ instance ToJSON Analyze where
10701026--
10711027-- /See:/ 'analyzeModelDescriptionConfusionMatrix' smart constructor.
10721028newtype AnalyzeModelDescriptionConfusionMatrix = AnalyzeModelDescriptionConfusionMatrix
1073− { _amdcmProperties :: HashMap Text AnalyzeModelDescriptionConfusionMatrixProperties
1029+ { _amdcmAddtional :: HashMap Text AnalyzeModelDescriptionConfusionMatrixAdditional
10741030 } deriving (Eq,Show,Data,Typeable,Generic)
10751031
10761032-- | Creates a value of 'AnalyzeModelDescriptionConfusionMatrix' with the minimum fields required to make a request.
10771033--
10781034-- Use one of the following lenses to modify other fields as desired:
10791035--
1080−-- * 'amdcmProperties'
1036+-- * 'amdcmAddtional'
10811037analyzeModelDescriptionConfusionMatrix
1082− :: HashMap Text AnalyzeModelDescriptionConfusionMatrixProperties -- ^ 'properties'
1038+ :: HashMap Text AnalyzeModelDescriptionConfusionMatrixAdditional -- ^ 'addtional'
10831039 -> AnalyzeModelDescriptionConfusionMatrix
1084−analyzeModelDescriptionConfusionMatrix pAmdcmProperties_ =
1040+analyzeModelDescriptionConfusionMatrix pAmdcmAddtional_ =
10851041 AnalyzeModelDescriptionConfusionMatrix
1086− { _amdcmProperties = pAmdcmProperties_
1042+ { _amdcmAddtional = pAmdcmAddtional_
10871043 }
10881044
10891045-- | Confusion matrix information for the true class label.
1090−amdcmProperties :: Lens' AnalyzeModelDescriptionConfusionMatrix (HashMap Text AnalyzeModelDescriptionConfusionMatrixProperties)
1091−amdcmProperties
1092− = lens _amdcmProperties
1093− (\ s a -> s{_amdcmProperties = a})
1046+amdcmAddtional :: Lens' AnalyzeModelDescriptionConfusionMatrix (HashMap Text AnalyzeModelDescriptionConfusionMatrixAdditional)
1047+amdcmAddtional
1048+ = lens _amdcmAddtional
1049+ (\ s a -> s{_amdcmAddtional = a})
10941050
10951051instance FromJSON
10961052 AnalyzeModelDescriptionConfusionMatrix where
@@ -1102,7 +1058,7 @@ instance FromJSON
11021058
11031059instance ToJSON
11041060 AnalyzeModelDescriptionConfusionMatrix where
1105− toJSON = toJSON . _amdcmProperties
1061+ toJSON = toJSON . _amdcmAddtional
11061062
11071063--
11081064-- /See:/ 'output' smart constructor.
@@ -1260,27 +1216,26 @@ instance ToJSON
12601216--
12611217-- /See:/ 'analyzeErrorsItem' smart constructor.
12621218newtype AnalyzeErrorsItem = AnalyzeErrorsItem
1263− { _aeiProperties :: HashMap Text Text
1219+ { _aeiAddtional :: HashMap Text Text
12641220 } deriving (Eq,Show,Data,Typeable,Generic)
12651221
12661222-- | Creates a value of 'AnalyzeErrorsItem' with the minimum fields required to make a request.
12671223--
12681224-- Use one of the following lenses to modify other fields as desired:
12691225--
1270−-- * 'aeiProperties'
1226+-- * 'aeiAddtional'
12711227analyzeErrorsItem
1272− :: HashMap Text Text -- ^ 'properties'
1228+ :: HashMap Text Text -- ^ 'addtional'
12731229 -> AnalyzeErrorsItem
1274−analyzeErrorsItem pAeiProperties_ =
1230+analyzeErrorsItem pAeiAddtional_ =
12751231 AnalyzeErrorsItem
1276− { _aeiProperties = pAeiProperties_
1232+ { _aeiAddtional = pAeiAddtional_
12771233 }
12781234
12791235-- | Error level followed by a detailed error message.
1280−aeiProperties :: Lens' AnalyzeErrorsItem (HashMap Text Text)
1281−aeiProperties
1282− = lens _aeiProperties
1283− (\ s a -> s{_aeiProperties = a})
1236+aeiAddtional :: Lens' AnalyzeErrorsItem (HashMap Text Text)
1237+aeiAddtional
1238+ = lens _aeiAddtional (\ s a -> s{_aeiAddtional = a})
12841239
12851240instance FromJSON AnalyzeErrorsItem where
12861241 parseJSON
@@ -1288,7 +1243,7 @@ instance FromJSON AnalyzeErrorsItem where
12881243 (\ o -> AnalyzeErrorsItem <$> (parseJSONObject o))
12891244
12901245instance ToJSON AnalyzeErrorsItem where
1291− toJSON = toJSON . _aeiProperties
1246+ toJSON = toJSON . _aeiAddtional
12921247
12931248-- | Description of the data the model was trained on.
12941249--
@@ -1445,6 +1400,49 @@ instance ToJSON
14451400 toJSON AnalyzeDataDescriptionFeaturesItemText{..}
14461401 = object (catMaybes [("count" .=) <$> _addfitCount])
14471402
1403+-- | Confusion matrix information for the true class label.
1404+--
1405+-- /See:/ 'analyzeModelDescriptionConfusionMatrixAdditional' smart constructor.
1406+newtype AnalyzeModelDescriptionConfusionMatrixAdditional = AnalyzeModelDescriptionConfusionMatrixAdditional
1407+ { _amdcmaAddtional :: HashMap Text Text
1408+ } deriving (Eq,Show,Data,Typeable,Generic)
1409+
1410+-- | Creates a value of 'AnalyzeModelDescriptionConfusionMatrixAdditional' with the minimum fields required to make a request.
1411+--
1412+-- Use one of the following lenses to modify other fields as desired:
1413+--
1414+-- * 'amdcmaAddtional'
1415+analyzeModelDescriptionConfusionMatrixAdditional
1416+ :: HashMap Text Text -- ^ 'addtional'
1417+ -> AnalyzeModelDescriptionConfusionMatrixAdditional
1418+analyzeModelDescriptionConfusionMatrixAdditional pAmdcmaAddtional_ =
1419+ AnalyzeModelDescriptionConfusionMatrixAdditional
1420+ { _amdcmaAddtional = pAmdcmaAddtional_
1421+ }
1422+
1423+-- | Average number of times an instance with correct class label
1424+-- modelDescription.confusionMatrix.(key) was wrongfully classified as this
1425+-- label.
1426+amdcmaAddtional :: Lens' AnalyzeModelDescriptionConfusionMatrixAdditional (HashMap Text Text)
1427+amdcmaAddtional
1428+ = lens _amdcmaAddtional
1429+ (\ s a -> s{_amdcmaAddtional = a})
1430+
1431+instance FromJSON
1432+ AnalyzeModelDescriptionConfusionMatrixAdditional
1433+ where
1434+ parseJSON
1435+ = withObject
1436+ "AnalyzeModelDescriptionConfusionMatrixAdditional"
1437+ (\ o ->
1438+ AnalyzeModelDescriptionConfusionMatrixAdditional <$>
1439+ (parseJSONObject o))
1440+
1441+instance ToJSON
1442+ AnalyzeModelDescriptionConfusionMatrixAdditional
1443+ where
1444+ toJSON = toJSON . _amdcmaAddtional
1445+
14481446--
14491447-- /See:/ 'analyzeDataDescriptionFeaturesItem' smart constructor.
14501448data AnalyzeDataDescriptionFeaturesItem = AnalyzeDataDescriptionFeaturesItem
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon.hs+1−1
@@ -83,7 +83,7 @@ module Network.Google.ProximityBeacon
8383 -- ** BeaconProperties
8484 , BeaconProperties
8585 , beaconProperties
86− , bpProperties
86+ , bpAddtional
8787
8888 -- ** Empty
8989 , Empty
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types.hs+1−1
@@ -33,7 +33,7 @@ module Network.Google.ProximityBeacon.Types
3333 -- * BeaconProperties
3434 , BeaconProperties
3535 , beaconProperties
36− , bpProperties
36+ , bpAddtional
3737
3838 -- * Empty
3939 , Empty
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+9−9
@@ -145,25 +145,25 @@ instance ToJSON AttachmentInfo where
145145--
146146-- /See:/ 'beaconProperties' smart constructor.
147147newtype BeaconProperties = BeaconProperties
148− { _bpProperties :: HashMap Text Text
148+ { _bpAddtional :: HashMap Text Text
149149 } deriving (Eq,Show,Data,Typeable,Generic)
150150
151151-- | Creates a value of 'BeaconProperties' with the minimum fields required to make a request.
152152--
153153-- Use one of the following lenses to modify other fields as desired:
154154--
155−-- * 'bpProperties'
155+-- * 'bpAddtional'
156156beaconProperties
157− :: HashMap Text Text -- ^ 'properties'
157+ :: HashMap Text Text -- ^ 'addtional'
158158 -> BeaconProperties
159−beaconProperties pBpProperties_ =
159+beaconProperties pBpAddtional_ =
160160 BeaconProperties
161− { _bpProperties = pBpProperties_
161+ { _bpAddtional = pBpAddtional_
162162 }
163163
164−bpProperties :: Lens' BeaconProperties (HashMap Text Text)
165−bpProperties
166− = lens _bpProperties (\ s a -> s{_bpProperties = a})
164+bpAddtional :: Lens' BeaconProperties (HashMap Text Text)
165+bpAddtional
166+ = lens _bpAddtional (\ s a -> s{_bpAddtional = a})
167167
168168instance FromJSON BeaconProperties where
169169 parseJSON
@@ -171,7 +171,7 @@ instance FromJSON BeaconProperties where
171171 (\ o -> BeaconProperties <$> (parseJSONObject o))
172172
173173instance ToJSON BeaconProperties where
174− toJSON = toJSON . _bpProperties
174+ toJSON = toJSON . _bpAddtional
175175
176176-- | A generic empty message that you can re-use to avoid defining duplicated
177177-- empty messages in your APIs. A typical example is to use it as the
gogol-pubsub/gen/Network/Google/PubSub.hs+2−2
@@ -156,7 +156,7 @@ module Network.Google.PubSub
156156 -- ** PubsubMessageAttributes
157157 , PubsubMessageAttributes
158158 , pubsubMessageAttributes
159− , pmaProperties
159+ , pmaAddtional
160160
161161 -- ** TestIAMPermissionsRequest
162162 , TestIAMPermissionsRequest
@@ -188,7 +188,7 @@ module Network.Google.PubSub
188188 -- ** PushConfigAttributes
189189 , PushConfigAttributes
190190 , pushConfigAttributes
191− , pcaProperties
191+ , pcaAddtional
192192
193193 -- ** Subscription
194194 , Subscription
gogol-pubsub/gen/Network/Google/PubSub/Types.hs+2−2
@@ -88,7 +88,7 @@ module Network.Google.PubSub.Types
8888 -- * PubsubMessageAttributes
8989 , PubsubMessageAttributes
9090 , pubsubMessageAttributes
91− , pmaProperties
91+ , pmaAddtional
9292
9393 -- * TestIAMPermissionsRequest
9494 , TestIAMPermissionsRequest
@@ -120,7 +120,7 @@ module Network.Google.PubSub.Types
120120 -- * PushConfigAttributes
121121 , PushConfigAttributes
122122 , pushConfigAttributes
123− , pcaProperties
123+ , pcaAddtional
124124
125125 -- * Subscription
126126 , Subscription
gogol-pubsub/gen/Network/Google/PubSub/Types/Product.hs+18−20
@@ -593,26 +593,25 @@ instance ToJSON PullRequest where
593593--
594594-- /See:/ 'pubsubMessageAttributes' smart constructor.
595595newtype PubsubMessageAttributes = PubsubMessageAttributes
596− { _pmaProperties :: HashMap Text Text
596+ { _pmaAddtional :: HashMap Text Text
597597 } deriving (Eq,Show,Data,Typeable,Generic)
598598
599599-- | Creates a value of 'PubsubMessageAttributes' with the minimum fields required to make a request.
600600--
601601-- Use one of the following lenses to modify other fields as desired:
602602--
603−-- * 'pmaProperties'
603+-- * 'pmaAddtional'
604604pubsubMessageAttributes
605− :: HashMap Text Text -- ^ 'properties'
605+ :: HashMap Text Text -- ^ 'addtional'
606606 -> PubsubMessageAttributes
607−pubsubMessageAttributes pPmaProperties_ =
607+pubsubMessageAttributes pPmaAddtional_ =
608608 PubsubMessageAttributes
609− { _pmaProperties = pPmaProperties_
609+ { _pmaAddtional = pPmaAddtional_
610610 }
611611
612−pmaProperties :: Lens' PubsubMessageAttributes (HashMap Text Text)
613−pmaProperties
614− = lens _pmaProperties
615− (\ s a -> s{_pmaProperties = a})
612+pmaAddtional :: Lens' PubsubMessageAttributes (HashMap Text Text)
613+pmaAddtional
614+ = lens _pmaAddtional (\ s a -> s{_pmaAddtional = a})
616615
617616instance FromJSON PubsubMessageAttributes where
618617 parseJSON
@@ -621,7 +620,7 @@ instance FromJSON PubsubMessageAttributes where
621620 PubsubMessageAttributes <$> (parseJSONObject o))
622621
623622instance ToJSON PubsubMessageAttributes where
624− toJSON = toJSON . _pmaProperties
623+ toJSON = toJSON . _pmaAddtional
625624
626625-- | Request message for \`TestIamPermissions\` method.
627626--
@@ -873,26 +872,25 @@ instance ToJSON Policy where
873872--
874873-- /See:/ 'pushConfigAttributes' smart constructor.
875874newtype PushConfigAttributes = PushConfigAttributes
876− { _pcaProperties :: HashMap Text Text
875+ { _pcaAddtional :: HashMap Text Text
877876 } deriving (Eq,Show,Data,Typeable,Generic)
878877
879878-- | Creates a value of 'PushConfigAttributes' with the minimum fields required to make a request.
880879--
881880-- Use one of the following lenses to modify other fields as desired:
882881--
883−-- * 'pcaProperties'
882+-- * 'pcaAddtional'
884883pushConfigAttributes
885− :: HashMap Text Text -- ^ 'properties'
884+ :: HashMap Text Text -- ^ 'addtional'
886885 -> PushConfigAttributes
887−pushConfigAttributes pPcaProperties_ =
886+pushConfigAttributes pPcaAddtional_ =
888887 PushConfigAttributes
889− { _pcaProperties = pPcaProperties_
888+ { _pcaAddtional = pPcaAddtional_
890889 }
891890
892−pcaProperties :: Lens' PushConfigAttributes (HashMap Text Text)
893−pcaProperties
894− = lens _pcaProperties
895− (\ s a -> s{_pcaProperties = a})
891+pcaAddtional :: Lens' PushConfigAttributes (HashMap Text Text)
892+pcaAddtional
893+ = lens _pcaAddtional (\ s a -> s{_pcaAddtional = a})
896894
897895instance FromJSON PushConfigAttributes where
898896 parseJSON
@@ -900,7 +898,7 @@ instance FromJSON PushConfigAttributes where
900898 (\ o -> PushConfigAttributes <$> (parseJSONObject o))
901899
902900instance ToJSON PushConfigAttributes where
903− toJSON = toJSON . _pcaProperties
901+ toJSON = toJSON . _pcaAddtional
904902
905903-- | A subscription resource.
906904--
gogol-resourcemanager/gen/Network/Google/ResourceManager.hs+1−1
@@ -132,7 +132,7 @@ module Network.Google.ResourceManager
132132 -- ** ProjectLabels
133133 , ProjectLabels
134134 , projectLabels
135− , plProperties
135+ , plAddtional
136136
137137 -- ** Organization
138138 , Organization
gogol-resourcemanager/gen/Network/Google/ResourceManager/Types.hs+1−1
@@ -79,7 +79,7 @@ module Network.Google.ResourceManager.Types
7979 -- * ProjectLabels
8080 , ProjectLabels
8181 , projectLabels
82− , plProperties
82+ , plAddtional
8383
8484 -- * Organization
8585 , Organization
gogol-resourcemanager/gen/Network/Google/ResourceManager/Types/Product.hs+9−9
@@ -536,25 +536,25 @@ instance ToJSON Policy where
536536--
537537-- /See:/ 'projectLabels' smart constructor.
538538newtype ProjectLabels = ProjectLabels
539− { _plProperties :: HashMap Text Text
539+ { _plAddtional :: HashMap Text Text
540540 } deriving (Eq,Show,Data,Typeable,Generic)
541541
542542-- | Creates a value of 'ProjectLabels' with the minimum fields required to make a request.
543543--
544544-- Use one of the following lenses to modify other fields as desired:
545545--
546−-- * 'plProperties'
546+-- * 'plAddtional'
547547projectLabels
548− :: HashMap Text Text -- ^ 'properties'
548+ :: HashMap Text Text -- ^ 'addtional'
549549 -> ProjectLabels
550−projectLabels pPlProperties_ =
550+projectLabels pPlAddtional_ =
551551 ProjectLabels
552− { _plProperties = pPlProperties_
552+ { _plAddtional = pPlAddtional_
553553 }
554554
555−plProperties :: Lens' ProjectLabels (HashMap Text Text)
556−plProperties
557− = lens _plProperties (\ s a -> s{_plProperties = a})
555+plAddtional :: Lens' ProjectLabels (HashMap Text Text)
556+plAddtional
557+ = lens _plAddtional (\ s a -> s{_plAddtional = a})
558558
559559instance FromJSON ProjectLabels where
560560 parseJSON
@@ -562,7 +562,7 @@ instance FromJSON ProjectLabels where
562562 (\ o -> ProjectLabels <$> (parseJSONObject o))
563563
564564instance ToJSON ProjectLabels where
565− toJSON = toJSON . _plProperties
565+ toJSON = toJSON . _plAddtional
566566
567567-- | The root node in the resource hierarchy to which a particular entity\'s
568568-- (e.g., company) resources belong.
gogol-resourceviews/gen/Network/Google/ResourceViews.hs+1−1
@@ -151,7 +151,7 @@ module Network.Google.ResourceViews
151151 -- ** ListResourceResponseItemEndpoints
152152 , ListResourceResponseItemEndpoints
153153 , listResourceResponseItemEndpoints
154− , lrrieProperties
154+ , lrrieAddtional
155155
156156 -- ** ZoneViewsAddResourcesRequest
157157 , ZoneViewsAddResourcesRequest
gogol-resourceviews/gen/Network/Google/ResourceViews/Types.hs+1−1
@@ -110,7 +110,7 @@ module Network.Google.ResourceViews.Types
110110 -- * ListResourceResponseItemEndpoints
111111 , ListResourceResponseItemEndpoints
112112 , listResourceResponseItemEndpoints
113− , lrrieProperties
113+ , lrrieAddtional
114114
115115 -- * ZoneViewsAddResourcesRequest
116116 , ZoneViewsAddResourcesRequest
gogol-resourceviews/gen/Network/Google/ResourceViews/Types/Product.hs+10−10
@@ -813,27 +813,27 @@ instance ToJSON ZoneViewsRemoveResourcesRequest where
813813--
814814-- /See:/ 'listResourceResponseItemEndpoints' smart constructor.
815815newtype ListResourceResponseItemEndpoints = ListResourceResponseItemEndpoints
816− { _lrrieProperties :: HashMap Text [Int32]
816+ { _lrrieAddtional :: HashMap Text [Int32]
817817 } deriving (Eq,Show,Data,Typeable,Generic)
818818
819819-- | Creates a value of 'ListResourceResponseItemEndpoints' with the minimum fields required to make a request.
820820--
821821-- Use one of the following lenses to modify other fields as desired:
822822--
823−-- * 'lrrieProperties'
823+-- * 'lrrieAddtional'
824824listResourceResponseItemEndpoints
825− :: HashMap Text [Int32] -- ^ 'properties'
825+ :: HashMap Text [Int32] -- ^ 'addtional'
826826 -> ListResourceResponseItemEndpoints
827−listResourceResponseItemEndpoints pLrrieProperties_ =
827+listResourceResponseItemEndpoints pLrrieAddtional_ =
828828 ListResourceResponseItemEndpoints
829− { _lrrieProperties = pLrrieProperties_
829+ { _lrrieAddtional = pLrrieAddtional_
830830 }
831831
832832-- | The name of the service end point.
833−lrrieProperties :: Lens' ListResourceResponseItemEndpoints (HashMap Text [Int32])
834−lrrieProperties
835− = lens _lrrieProperties
836− (\ s a -> s{_lrrieProperties = a})
833+lrrieAddtional :: Lens' ListResourceResponseItemEndpoints (HashMap Text [Int32])
834+lrrieAddtional
835+ = lens _lrrieAddtional
836+ (\ s a -> s{_lrrieAddtional = a})
837837
838838instance FromJSON ListResourceResponseItemEndpoints
839839 where
@@ -845,7 +845,7 @@ instance FromJSON ListResourceResponseItemEndpoints
845845
846846instance ToJSON ListResourceResponseItemEndpoints
847847 where
848− toJSON = toJSON . _lrrieProperties
848+ toJSON = toJSON . _lrrieAddtional
849849
850850-- | The request to add resources to the resource view.
851851--
gogol-storage-transfer/gen/Network/Google/StorageTransfer.hs+3−3
@@ -122,7 +122,7 @@ module Network.Google.StorageTransfer
122122 -- ** StatusDetailsItem
123123 , StatusDetailsItem
124124 , statusDetailsItem
125− , sdiProperties
125+ , sdiAddtional
126126
127127 -- ** Date
128128 , Date
@@ -204,7 +204,7 @@ module Network.Google.StorageTransfer
204204 -- ** OperationMetadata
205205 , OperationMetadata
206206 , operationMetadata
207− , omProperties
207+ , omAddtional
208208
209209 -- ** TransferOptions
210210 , TransferOptions
@@ -245,7 +245,7 @@ module Network.Google.StorageTransfer
245245 -- ** OperationResponse
246246 , OperationResponse
247247 , operationResponse
248− , orProperties
248+ , orAddtional
249249
250250 -- ** ResumeTransferOperationRequest
251251 , ResumeTransferOperationRequest
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types.hs+3−3
@@ -78,7 +78,7 @@ module Network.Google.StorageTransfer.Types
7878 -- * StatusDetailsItem
7979 , StatusDetailsItem
8080 , statusDetailsItem
81− , sdiProperties
81+ , sdiAddtional
8282
8383 -- * Date
8484 , Date
@@ -160,7 +160,7 @@ module Network.Google.StorageTransfer.Types
160160 -- * OperationMetadata
161161 , OperationMetadata
162162 , operationMetadata
163− , omProperties
163+ , omAddtional
164164
165165 -- * TransferOptions
166166 , TransferOptions
@@ -201,7 +201,7 @@ module Network.Google.StorageTransfer.Types
201201 -- * OperationResponse
202202 , OperationResponse
203203 , operationResponse
204− , orProperties
204+ , orAddtional
205205
206206 -- * ResumeTransferOperationRequest
207207 , ResumeTransferOperationRequest
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+27−28
@@ -578,27 +578,26 @@ instance ToJSON GoogleServiceAccount where
578578--
579579-- /See:/ 'statusDetailsItem' smart constructor.
580580newtype StatusDetailsItem = StatusDetailsItem
581− { _sdiProperties :: HashMap Text JSONValue
581+ { _sdiAddtional :: HashMap Text JSONValue
582582 } deriving (Eq,Show,Data,Typeable,Generic)
583583
584584-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
585585--
586586-- Use one of the following lenses to modify other fields as desired:
587587--
588−-- * 'sdiProperties'
588+-- * 'sdiAddtional'
589589statusDetailsItem
590− :: HashMap Text JSONValue -- ^ 'properties'
590+ :: HashMap Text JSONValue -- ^ 'addtional'
591591 -> StatusDetailsItem
592−statusDetailsItem pSdiProperties_ =
592+statusDetailsItem pSdiAddtional_ =
593593 StatusDetailsItem
594− { _sdiProperties = pSdiProperties_
594+ { _sdiAddtional = pSdiAddtional_
595595 }
596596
597597-- | Properties of the object. Contains field \'ype with type URL.
598−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
599−sdiProperties
600− = lens _sdiProperties
601− (\ s a -> s{_sdiProperties = a})
598+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
599+sdiAddtional
600+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
602601
603602instance FromJSON StatusDetailsItem where
604603 parseJSON
@@ -606,7 +605,7 @@ instance FromJSON StatusDetailsItem where
606605 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
607606
608607instance ToJSON StatusDetailsItem where
609− toJSON = toJSON . _sdiProperties
608+ toJSON = toJSON . _sdiAddtional
610609
611610-- | Represents a whole calendar date, e.g. date of birth. The time of day
612611-- and time zone are either specified elsewhere or are not significant. The
@@ -1392,26 +1391,26 @@ instance ToJSON ErrorLogEntry where
13921391--
13931392-- /See:/ 'operationMetadata' smart constructor.
13941393newtype OperationMetadata = OperationMetadata
1395− { _omProperties :: HashMap Text JSONValue
1394+ { _omAddtional :: HashMap Text JSONValue
13961395 } deriving (Eq,Show,Data,Typeable,Generic)
13971396
13981397-- | Creates a value of 'OperationMetadata' with the minimum fields required to make a request.
13991398--
14001399-- Use one of the following lenses to modify other fields as desired:
14011400--
1402−-- * 'omProperties'
1401+-- * 'omAddtional'
14031402operationMetadata
1404− :: HashMap Text JSONValue -- ^ 'properties'
1403+ :: HashMap Text JSONValue -- ^ 'addtional'
14051404 -> OperationMetadata
1406−operationMetadata pOmProperties_ =
1405+operationMetadata pOmAddtional_ =
14071406 OperationMetadata
1408− { _omProperties = pOmProperties_
1407+ { _omAddtional = pOmAddtional_
14091408 }
14101409
14111410-- | Properties of the object. Contains field \'ype with type URL.
1412−omProperties :: Lens' OperationMetadata (HashMap Text JSONValue)
1413−omProperties
1414− = lens _omProperties (\ s a -> s{_omProperties = a})
1411+omAddtional :: Lens' OperationMetadata (HashMap Text JSONValue)
1412+omAddtional
1413+ = lens _omAddtional (\ s a -> s{_omAddtional = a})
14151414
14161415instance FromJSON OperationMetadata where
14171416 parseJSON
@@ -1419,7 +1418,7 @@ instance FromJSON OperationMetadata where
14191418 (\ o -> OperationMetadata <$> (parseJSONObject o))
14201419
14211420instance ToJSON OperationMetadata where
1422− toJSON = toJSON . _omProperties
1421+ toJSON = toJSON . _omAddtional
14231422
14241423-- | TransferOptions uses three boolean parameters to define the actions to
14251424-- be performed on objects in a transfer.
@@ -1784,26 +1783,26 @@ instance ToJSON ListTransferJobsResponse where
17841783--
17851784-- /See:/ 'operationResponse' smart constructor.
17861785newtype OperationResponse = OperationResponse
1787− { _orProperties :: HashMap Text JSONValue
1786+ { _orAddtional :: HashMap Text JSONValue
17881787 } deriving (Eq,Show,Data,Typeable,Generic)
17891788
17901789-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
17911790--
17921791-- Use one of the following lenses to modify other fields as desired:
17931792--
1794−-- * 'orProperties'
1793+-- * 'orAddtional'
17951794operationResponse
1796− :: HashMap Text JSONValue -- ^ 'properties'
1795+ :: HashMap Text JSONValue -- ^ 'addtional'
17971796 -> OperationResponse
1798−operationResponse pOrProperties_ =
1797+operationResponse pOrAddtional_ =
17991798 OperationResponse
1800− { _orProperties = pOrProperties_
1799+ { _orAddtional = pOrAddtional_
18011800 }
18021801
18031802-- | Properties of the object. Contains field \'ype with type URL.
1804−orProperties :: Lens' OperationResponse (HashMap Text JSONValue)
1805−orProperties
1806− = lens _orProperties (\ s a -> s{_orProperties = a})
1803+orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
1804+orAddtional
1805+ = lens _orAddtional (\ s a -> s{_orAddtional = a})
18071806
18081807instance FromJSON OperationResponse where
18091808 parseJSON
@@ -1811,7 +1810,7 @@ instance FromJSON OperationResponse where
18111810 (\ o -> OperationResponse <$> (parseJSONObject o))
18121811
18131812instance ToJSON OperationResponse where
1814− toJSON = toJSON . _orProperties
1813+ toJSON = toJSON . _orAddtional
18151814
18161815-- | Request passed to ResumeTransferOperation.
18171816--
gogol-storage/gen/Network/Google/Storage.hs+2−2
@@ -169,7 +169,7 @@ module Network.Google.Storage
169169 -- ** ObjectMetadata
170170 , ObjectMetadata
171171 , objectMetadata
172− , omProperties
172+ , omAddtional
173173
174174 -- ** ObjectsPatchPredefinedACL
175175 , ObjectsPatchPredefinedACL (..)
@@ -316,7 +316,7 @@ module Network.Google.Storage
316316 -- ** ChannelParams
317317 , ChannelParams
318318 , channelParams
319− , cpProperties
319+ , cpAddtional
320320
321321 -- ** BucketsListProjection
322322 , BucketsListProjection (..)
gogol-storage/gen/Network/Google/Storage/Types.hs+2−2
@@ -57,7 +57,7 @@ module Network.Google.Storage.Types
5757 -- * ObjectMetadata
5858 , ObjectMetadata
5959 , objectMetadata
60− , omProperties
60+ , omAddtional
6161
6262 -- * ObjectsPatchPredefinedACL
6363 , ObjectsPatchPredefinedACL (..)
@@ -204,7 +204,7 @@ module Network.Google.Storage.Types
204204 -- * ChannelParams
205205 , ChannelParams
206206 , channelParams
207− , cpProperties
207+ , cpAddtional
208208
209209 -- * BucketsListProjection
210210 , BucketsListProjection (..)
gogol-storage/gen/Network/Google/Storage/Types/Product.hs+18−18
@@ -214,26 +214,26 @@ instance ToJSON BucketLogging where
214214--
215215-- /See:/ 'objectMetadata' smart constructor.
216216newtype ObjectMetadata = ObjectMetadata
217− { _omProperties :: HashMap Text Text
217+ { _omAddtional :: HashMap Text Text
218218 } deriving (Eq,Show,Data,Typeable,Generic)
219219
220220-- | Creates a value of 'ObjectMetadata' with the minimum fields required to make a request.
221221--
222222-- Use one of the following lenses to modify other fields as desired:
223223--
224−-- * 'omProperties'
224+-- * 'omAddtional'
225225objectMetadata
226− :: HashMap Text Text -- ^ 'properties'
226+ :: HashMap Text Text -- ^ 'addtional'
227227 -> ObjectMetadata
228−objectMetadata pOmProperties_ =
228+objectMetadata pOmAddtional_ =
229229 ObjectMetadata
230− { _omProperties = pOmProperties_
230+ { _omAddtional = pOmAddtional_
231231 }
232232
233233-- | An individual metadata entry.
234−omProperties :: Lens' ObjectMetadata (HashMap Text Text)
235−omProperties
236− = lens _omProperties (\ s a -> s{_omProperties = a})
234+omAddtional :: Lens' ObjectMetadata (HashMap Text Text)
235+omAddtional
236+ = lens _omAddtional (\ s a -> s{_omAddtional = a})
237237
238238instance FromJSON ObjectMetadata where
239239 parseJSON
@@ -241,7 +241,7 @@ instance FromJSON ObjectMetadata where
241241 (\ o -> ObjectMetadata <$> (parseJSONObject o))
242242
243243instance ToJSON ObjectMetadata where
244− toJSON = toJSON . _omProperties
244+ toJSON = toJSON . _omAddtional
245245
246246-- | The condition(s) under which the action will be taken.
247247--
@@ -1205,26 +1205,26 @@ instance ToJSON ComposeRequestSourceObjectsItem where
12051205--
12061206-- /See:/ 'channelParams' smart constructor.
12071207newtype ChannelParams = ChannelParams
1208− { _cpProperties :: HashMap Text Text
1208+ { _cpAddtional :: HashMap Text Text
12091209 } deriving (Eq,Show,Data,Typeable,Generic)
12101210
12111211-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
12121212--
12131213-- Use one of the following lenses to modify other fields as desired:
12141214--
1215−-- * 'cpProperties'
1215+-- * 'cpAddtional'
12161216channelParams
1217− :: HashMap Text Text -- ^ 'properties'
1217+ :: HashMap Text Text -- ^ 'addtional'
12181218 -> ChannelParams
1219−channelParams pCpProperties_ =
1219+channelParams pCpAddtional_ =
12201220 ChannelParams
1221− { _cpProperties = pCpProperties_
1221+ { _cpAddtional = pCpAddtional_
12221222 }
12231223
12241224-- | Declares a new parameter by name.
1225−cpProperties :: Lens' ChannelParams (HashMap Text Text)
1226−cpProperties
1227− = lens _cpProperties (\ s a -> s{_cpProperties = a})
1225+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
1226+cpAddtional
1227+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
12281228
12291229instance FromJSON ChannelParams where
12301230 parseJSON
@@ -1232,7 +1232,7 @@ instance FromJSON ChannelParams where
12321232 (\ o -> ChannelParams <$> (parseJSONObject o))
12331233
12341234instance ToJSON ChannelParams where
1235− toJSON = toJSON . _cpProperties
1235+ toJSON = toJSON . _cpAddtional
12361236
12371237-- | An object.
12381238--
gogol-youtube/gen/Network/Google/YouTube.hs+4−4
@@ -860,7 +860,7 @@ module Network.Google.YouTube
860860 -- ** ChannelLocalizations
861861 , ChannelLocalizations
862862 , channelLocalizations
863− , clProperties
863+ , clAddtional
864864
865865 -- ** PlayListSnippet
866866 , PlayListSnippet
@@ -920,7 +920,7 @@ module Network.Google.YouTube
920920 -- ** PlayListLocalizations
921921 , PlayListLocalizations
922922 , playListLocalizations
923− , pllProperties
923+ , pllAddtional
924924
925925 -- ** ContentRatingCzfilmRating
926926 , ContentRatingCzfilmRating (..)
@@ -1034,7 +1034,7 @@ module Network.Google.YouTube
10341034 -- ** VideoLocalizations
10351035 , VideoLocalizations
10361036 , videoLocalizations
1037− , vlProperties
1037+ , vlAddtional
10381038
10391039 -- ** ChannelSectionContentDetails
10401040 , ChannelSectionContentDetails
@@ -1340,7 +1340,7 @@ module Network.Google.YouTube
13401340 -- ** ChannelSectionLocalizations
13411341 , ChannelSectionLocalizations
13421342 , channelSectionLocalizations
1343− , cslProperties
1343+ , cslAddtional
13441344
13451345 -- ** ContentRatingIlfilmRating
13461346 , ContentRatingIlfilmRating (..)
gogol-youtube/gen/Network/Google/YouTube/Types.hs+4−4
@@ -667,7 +667,7 @@ module Network.Google.YouTube.Types
667667 -- * ChannelLocalizations
668668 , ChannelLocalizations
669669 , channelLocalizations
670− , clProperties
670+ , clAddtional
671671
672672 -- * PlayListSnippet
673673 , PlayListSnippet
@@ -727,7 +727,7 @@ module Network.Google.YouTube.Types
727727 -- * PlayListLocalizations
728728 , PlayListLocalizations
729729 , playListLocalizations
730− , pllProperties
730+ , pllAddtional
731731
732732 -- * ContentRatingCzfilmRating
733733 , ContentRatingCzfilmRating (..)
@@ -841,7 +841,7 @@ module Network.Google.YouTube.Types
841841 -- * VideoLocalizations
842842 , VideoLocalizations
843843 , videoLocalizations
844− , vlProperties
844+ , vlAddtional
845845
846846 -- * ChannelSectionContentDetails
847847 , ChannelSectionContentDetails
@@ -1147,7 +1147,7 @@ module Network.Google.YouTube.Types
11471147 -- * ChannelSectionLocalizations
11481148 , ChannelSectionLocalizations
11491149 , channelSectionLocalizations
1150− , cslProperties
1150+ , cslAddtional
11511151
11521152 -- * ContentRatingIlfilmRating
11531153 , ContentRatingIlfilmRating (..)
gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+36−38
@@ -4808,26 +4808,26 @@ instance ToJSON LiveStreamListResponse where
48084808--
48094809-- /See:/ 'channelLocalizations' smart constructor.
48104810newtype ChannelLocalizations = ChannelLocalizations
4811− { _clProperties :: HashMap Text ChannelLocalization
4811+ { _clAddtional :: HashMap Text ChannelLocalization
48124812 } deriving (Eq,Show,Data,Typeable,Generic)
48134813
48144814-- | Creates a value of 'ChannelLocalizations' with the minimum fields required to make a request.
48154815--
48164816-- Use one of the following lenses to modify other fields as desired:
48174817--
4818−-- * 'clProperties'
4818+-- * 'clAddtional'
48194819channelLocalizations
4820− :: HashMap Text ChannelLocalization -- ^ 'properties'
4820+ :: HashMap Text ChannelLocalization -- ^ 'addtional'
48214821 -> ChannelLocalizations
4822−channelLocalizations pClProperties_ =
4822+channelLocalizations pClAddtional_ =
48234823 ChannelLocalizations
4824− { _clProperties = pClProperties_
4824+ { _clAddtional = pClAddtional_
48254825 }
48264826
48274827-- | The language tag, using string since map_key require simple types.
4828−clProperties :: Lens' ChannelLocalizations (HashMap Text ChannelLocalization)
4829−clProperties
4830− = lens _clProperties (\ s a -> s{_clProperties = a})
4828+clAddtional :: Lens' ChannelLocalizations (HashMap Text ChannelLocalization)
4829+clAddtional
4830+ = lens _clAddtional (\ s a -> s{_clAddtional = a})
48314831
48324832instance FromJSON ChannelLocalizations where
48334833 parseJSON
@@ -4835,7 +4835,7 @@ instance FromJSON ChannelLocalizations where
48354835 (\ o -> ChannelLocalizations <$> (parseJSONObject o))
48364836
48374837instance ToJSON ChannelLocalizations where
4838− toJSON = toJSON . _clProperties
4838+ toJSON = toJSON . _clAddtional
48394839
48404840-- | Basic details about a playlist, including title, description and
48414841-- thumbnails.
@@ -5303,27 +5303,26 @@ instance ToJSON InvideoTiming where
53035303--
53045304-- /See:/ 'playListLocalizations' smart constructor.
53055305newtype PlayListLocalizations = PlayListLocalizations
5306− { _pllProperties :: HashMap Text PlayListLocalization
5306+ { _pllAddtional :: HashMap Text PlayListLocalization
53075307 } deriving (Eq,Show,Data,Typeable,Generic)
53085308
53095309-- | Creates a value of 'PlayListLocalizations' with the minimum fields required to make a request.
53105310--
53115311-- Use one of the following lenses to modify other fields as desired:
53125312--
5313−-- * 'pllProperties'
5313+-- * 'pllAddtional'
53145314playListLocalizations
5315− :: HashMap Text PlayListLocalization -- ^ 'properties'
5315+ :: HashMap Text PlayListLocalization -- ^ 'addtional'
53165316 -> PlayListLocalizations
5317−playListLocalizations pPllProperties_ =
5317+playListLocalizations pPllAddtional_ =
53185318 PlayListLocalizations
5319− { _pllProperties = pPllProperties_
5319+ { _pllAddtional = pPllAddtional_
53205320 }
53215321
53225322-- | The language tag, using string since map_key require simple types.
5323−pllProperties :: Lens' PlayListLocalizations (HashMap Text PlayListLocalization)
5324−pllProperties
5325− = lens _pllProperties
5326− (\ s a -> s{_pllProperties = a})
5323+pllAddtional :: Lens' PlayListLocalizations (HashMap Text PlayListLocalization)
5324+pllAddtional
5325+ = lens _pllAddtional (\ s a -> s{_pllAddtional = a})
53275326
53285327instance FromJSON PlayListLocalizations where
53295328 parseJSON
@@ -5332,7 +5331,7 @@ instance FromJSON PlayListLocalizations where
53325331 PlayListLocalizations <$> (parseJSONObject o))
53335332
53345333instance ToJSON PlayListLocalizations where
5335− toJSON = toJSON . _pllProperties
5334+ toJSON = toJSON . _pllAddtional
53365335
53375336-- | Video processing progress and completion time estimate.
53385337--
@@ -6086,26 +6085,26 @@ instance ToJSON VideoCategory where
60866085--
60876086-- /See:/ 'videoLocalizations' smart constructor.
60886087newtype VideoLocalizations = VideoLocalizations
6089− { _vlProperties :: HashMap Text VideoLocalization
6088+ { _vlAddtional :: HashMap Text VideoLocalization
60906089 } deriving (Eq,Show,Data,Typeable,Generic)
60916090
60926091-- | Creates a value of 'VideoLocalizations' with the minimum fields required to make a request.
60936092--
60946093-- Use one of the following lenses to modify other fields as desired:
60956094--
6096−-- * 'vlProperties'
6095+-- * 'vlAddtional'
60976096videoLocalizations
6098− :: HashMap Text VideoLocalization -- ^ 'properties'
6097+ :: HashMap Text VideoLocalization -- ^ 'addtional'
60996098 -> VideoLocalizations
6100−videoLocalizations pVlProperties_ =
6099+videoLocalizations pVlAddtional_ =
61016100 VideoLocalizations
6102− { _vlProperties = pVlProperties_
6101+ { _vlAddtional = pVlAddtional_
61036102 }
61046103
61056104-- | The language tag, using string since map_key require simple types.
6106−vlProperties :: Lens' VideoLocalizations (HashMap Text VideoLocalization)
6107−vlProperties
6108− = lens _vlProperties (\ s a -> s{_vlProperties = a})
6105+vlAddtional :: Lens' VideoLocalizations (HashMap Text VideoLocalization)
6106+vlAddtional
6107+ = lens _vlAddtional (\ s a -> s{_vlAddtional = a})
61096108
61106109instance FromJSON VideoLocalizations where
61116110 parseJSON
@@ -6113,7 +6112,7 @@ instance FromJSON VideoLocalizations where
61136112 (\ o -> VideoLocalizations <$> (parseJSONObject o))
61146113
61156114instance ToJSON VideoLocalizations where
6116− toJSON = toJSON . _vlProperties
6115+ toJSON = toJSON . _vlAddtional
61176116
61186117-- | Details about a channelsection, including playlists and channels.
61196118--
@@ -8260,27 +8259,26 @@ instance ToJSON LiveStreamHealthStatus where
82608259--
82618260-- /See:/ 'channelSectionLocalizations' smart constructor.
82628261newtype ChannelSectionLocalizations = ChannelSectionLocalizations
8263− { _cslProperties :: HashMap Text ChannelSectionLocalization
8262+ { _cslAddtional :: HashMap Text ChannelSectionLocalization
82648263 } deriving (Eq,Show,Data,Typeable,Generic)
82658264
82668265-- | Creates a value of 'ChannelSectionLocalizations' with the minimum fields required to make a request.
82678266--
82688267-- Use one of the following lenses to modify other fields as desired:
82698268--
8270−-- * 'cslProperties'
8269+-- * 'cslAddtional'
82718270channelSectionLocalizations
8272− :: HashMap Text ChannelSectionLocalization -- ^ 'properties'
8271+ :: HashMap Text ChannelSectionLocalization -- ^ 'addtional'
82738272 -> ChannelSectionLocalizations
8274−channelSectionLocalizations pCslProperties_ =
8273+channelSectionLocalizations pCslAddtional_ =
82758274 ChannelSectionLocalizations
8276− { _cslProperties = pCslProperties_
8275+ { _cslAddtional = pCslAddtional_
82778276 }
82788277
82798278-- | The language tag, using string since map_key require simple types.
8280−cslProperties :: Lens' ChannelSectionLocalizations (HashMap Text ChannelSectionLocalization)
8281−cslProperties
8282− = lens _cslProperties
8283− (\ s a -> s{_cslProperties = a})
8279+cslAddtional :: Lens' ChannelSectionLocalizations (HashMap Text ChannelSectionLocalization)
8280+cslAddtional
8281+ = lens _cslAddtional (\ s a -> s{_cslAddtional = a})
82848282
82858283instance FromJSON ChannelSectionLocalizations where
82868284 parseJSON
@@ -8289,7 +8287,7 @@ instance FromJSON ChannelSectionLocalizations where
82898287 ChannelSectionLocalizations <$> (parseJSONObject o))
82908288
82918289instance ToJSON ChannelSectionLocalizations where
8292− toJSON = toJSON . _cslProperties
8290+ toJSON = toJSON . _cslAddtional
82938291
82948292--
82958293-- /See:/ 'subscriptionListResponse' smart constructor.