on develop help sign in
Regenerating all services
6ca0a2aBrendan Hay
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
90 Arr <$> schema p (Just "item") (setRequired e)
90 Arr <$> schema p (Just "item") (setRequired e)
91
91
92 object p (Obj aps ps) = Obj
92 object p (Obj aps ps) = Obj
93− <$> traverse (localSchema p "properties") aps
93+ <$> traverse (localSchema p "additional") aps
94 <*> Map.traverseWithKey (localSchema p) ps
94 <*> Map.traverseWithKey (localSchema p) ps
95
95
96 name i p xs
96 name i p xs
gen/src/Gen/AST/Render.hs+1−1
@@ -74,7 +74,7 @@ renderSchema s = go (_schema s)
74 a <- traverse getSolved aps
74 a <- traverse getSolved aps
75 p <- traverse getSolved ps
75 p <- traverse getSolved ps
76 let ap = setAdditional <$> a
76 let ap = setAdditional <$> a
77− ts = maybe p (flip (Map.insert "properties") p) ap
77+ ts = maybe p (flip (Map.insert "addtional") p) ap
78 prod ts
78 prod ts
79 where
79 where
80 prod ts = Prod (dname k) (i ^. iDescription)
80 prod ts = Prod (dname k) (i ^. iDescription)
gen/src/Gen/AST/Solve.hs+5−5
@@ -151,16 +151,16 @@ getPrefix :: Global -> AST Prefix
151getPrefix g = loc "getPrefix" g $ memo prefixed g go
151getPrefix g = loc "getPrefix" g $ memo prefixed g go
152 where
152 where
153 go = \case
153 go = \case
154− SObj _ (Obj _ ps) -> field ps
154+ SObj _ (Obj aps ps) -> field (isJust aps) ps
155− SEnm _ (Enm vs) -> branch (map fst vs)
155+ SEnm _ (Enm vs) -> branch (map fst vs)
156− _ -> pure mempty
156+ _ -> pure mempty
157
157
158− field rs = do
158+ field aps rs = do
159 p <- uniq fields (acronymPrefixes g) ks
159 p <- uniq fields (acronymPrefixes g) ks
160 pure (Prefix p)
160 pure (Prefix p)
161 where
161 where
162 ls = Map.keys rs
162 ls = Map.keys rs
163− ks = Set.fromList (map (CI.mk . local) ls)
163+ ks = Set.fromList (map (CI.mk . local) (ls ++ ["additional" | aps]))
164
164
165 branch vs = do
165 branch vs = do
166 p <- uniq branches ps (Set.fromList (map CI.mk vs))
166 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
417 -- ** UserCustomSchemas
417 -- ** UserCustomSchemas
418 , UserCustomSchemas
418 , UserCustomSchemas
419 , userCustomSchemas
419 , userCustomSchemas
420− , ucsProperties
420+ , ucsAddtional
421
421
422 -- ** Aliases
422 -- ** Aliases
423 , Aliases
423 , Aliases
@@ -597,7 +597,7 @@ module Network.Google.Directory
597 -- ** ChannelParams
597 -- ** ChannelParams
598 , ChannelParams
598 , ChannelParams
599 , channelParams
599 , channelParams
600− , cpProperties
600+ , cpAddtional
601
601
602 -- ** UserOrganization
602 -- ** UserOrganization
603 , UserOrganization
603 , UserOrganization
@@ -713,7 +713,7 @@ module Network.Google.Directory
713 -- ** UserCustomProperties
713 -- ** UserCustomProperties
714 , UserCustomProperties
714 , UserCustomProperties
715 , userCustomProperties
715 , userCustomProperties
716− , ucpProperties
716+ , ucpAddtional
717
717
718 -- ** ChromeosDevicesListOrderBy
718 -- ** ChromeosDevicesListOrderBy
719 , ChromeosDevicesListOrderBy (..)
719 , ChromeosDevicesListOrderBy (..)
gogol-admin-directory/gen/Network/Google/Directory/Types.hs+3−3
@@ -207,7 +207,7 @@ module Network.Google.Directory.Types
207 -- * UserCustomSchemas
207 -- * UserCustomSchemas
208 , UserCustomSchemas
208 , UserCustomSchemas
209 , userCustomSchemas
209 , userCustomSchemas
210− , ucsProperties
210+ , ucsAddtional
211
211
212 -- * Aliases
212 -- * Aliases
213 , Aliases
213 , Aliases
@@ -387,7 +387,7 @@ module Network.Google.Directory.Types
387 -- * ChannelParams
387 -- * ChannelParams
388 , ChannelParams
388 , ChannelParams
389 , channelParams
389 , channelParams
390− , cpProperties
390+ , cpAddtional
391
391
392 -- * UserOrganization
392 -- * UserOrganization
393 , UserOrganization
393 , UserOrganization
@@ -503,7 +503,7 @@ module Network.Google.Directory.Types
503 -- * UserCustomProperties
503 -- * UserCustomProperties
504 , UserCustomProperties
504 , UserCustomProperties
505 , userCustomProperties
505 , userCustomProperties
506− , ucpProperties
506+ , ucpAddtional
507
507
508 -- * ChromeosDevicesListOrderBy
508 -- * ChromeosDevicesListOrderBy
509 , ChromeosDevicesListOrderBy (..)
509 , ChromeosDevicesListOrderBy (..)
gogol-admin-directory/gen/Network/Google/Directory/Types/Product.hs+27−29
@@ -1502,26 +1502,25 @@ instance ToJSON Tokens where
1502--
1502--
1503-- /See:/ 'userCustomSchemas' smart constructor.
1503-- /See:/ 'userCustomSchemas' smart constructor.
1504newtype UserCustomSchemas = UserCustomSchemas
1504newtype UserCustomSchemas = UserCustomSchemas
1505− { _ucsProperties :: HashMap Text UserCustomProperties
1505+ { _ucsAddtional :: HashMap Text UserCustomProperties
1506 } deriving (Eq,Show,Data,Typeable,Generic)
1506 } deriving (Eq,Show,Data,Typeable,Generic)
1507
1507
1508-- | Creates a value of 'UserCustomSchemas' with the minimum fields required to make a request.
1508-- | Creates a value of 'UserCustomSchemas' with the minimum fields required to make a request.
1509--
1509--
1510-- Use one of the following lenses to modify other fields as desired:
1510-- Use one of the following lenses to modify other fields as desired:
1511--
1511--
1512−-- * 'ucsProperties'
1512+-- * 'ucsAddtional'
1513userCustomSchemas
1513userCustomSchemas
1514− :: HashMap Text UserCustomProperties -- ^ 'properties'
1514+ :: HashMap Text UserCustomProperties -- ^ 'addtional'
1515 -> UserCustomSchemas
1515 -> UserCustomSchemas
1516−userCustomSchemas pUcsProperties_ =
1516+userCustomSchemas pUcsAddtional_ =
1517 UserCustomSchemas
1517 UserCustomSchemas
1518− { _ucsProperties = pUcsProperties_
1518+ { _ucsAddtional = pUcsAddtional_
1519 }
1519 }
1520
1520
1521−ucsProperties :: Lens' UserCustomSchemas (HashMap Text UserCustomProperties)
1521+ucsAddtional :: Lens' UserCustomSchemas (HashMap Text UserCustomProperties)
1522−ucsProperties
1522+ucsAddtional
1523− = lens _ucsProperties
1523+ = lens _ucsAddtional (\ s a -> s{_ucsAddtional = a})
1524− (\ s a -> s{_ucsProperties = a})
1525
1524
1526instance FromJSON UserCustomSchemas where
1525instance FromJSON UserCustomSchemas where
1527 parseJSON
1526 parseJSON
@@ -1529,7 +1528,7 @@ instance FromJSON UserCustomSchemas where
1529 (\ o -> UserCustomSchemas <$> (parseJSONObject o))
1528 (\ o -> UserCustomSchemas <$> (parseJSONObject o))
1530
1529
1531instance ToJSON UserCustomSchemas where
1530instance ToJSON UserCustomSchemas where
1532− toJSON = toJSON . _ucsProperties
1531+ toJSON = toJSON . _ucsAddtional
1533
1532
1534-- | JSON response template to list aliases in Directory API.
1533-- | JSON response template to list aliases in Directory API.
1535--
1534--
@@ -2961,26 +2960,26 @@ instance ToJSON UserRelation where
2961--
2960--
2962-- /See:/ 'channelParams' smart constructor.
2961-- /See:/ 'channelParams' smart constructor.
2963newtype ChannelParams = ChannelParams
2962newtype ChannelParams = ChannelParams
2964− { _cpProperties :: HashMap Text Text
2963+ { _cpAddtional :: HashMap Text Text
2965 } deriving (Eq,Show,Data,Typeable,Generic)
2964 } deriving (Eq,Show,Data,Typeable,Generic)
2966
2965
2967-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
2966-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
2968--
2967--
2969-- Use one of the following lenses to modify other fields as desired:
2968-- Use one of the following lenses to modify other fields as desired:
2970--
2969--
2971−-- * 'cpProperties'
2970+-- * 'cpAddtional'
2972channelParams
2971channelParams
2973− :: HashMap Text Text -- ^ 'properties'
2972+ :: HashMap Text Text -- ^ 'addtional'
2974 -> ChannelParams
2973 -> ChannelParams
2975−channelParams pCpProperties_ =
2974+channelParams pCpAddtional_ =
2976 ChannelParams
2975 ChannelParams
2977− { _cpProperties = pCpProperties_
2976+ { _cpAddtional = pCpAddtional_
2978 }
2977 }
2979
2978
2980-- | Declares a new parameter by name.
2979-- | Declares a new parameter by name.
2981−cpProperties :: Lens' ChannelParams (HashMap Text Text)
2980+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
2982−cpProperties
2981+cpAddtional
2983− = lens _cpProperties (\ s a -> s{_cpProperties = a})
2982+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
2984
2983
2985instance FromJSON ChannelParams where
2984instance FromJSON ChannelParams where
2986 parseJSON
2985 parseJSON
@@ -2988,7 +2987,7 @@ instance FromJSON ChannelParams where
2988 (\ o -> ChannelParams <$> (parseJSONObject o))
2987 (\ o -> ChannelParams <$> (parseJSONObject o))
2989
2988
2990instance ToJSON ChannelParams where
2989instance ToJSON ChannelParams where
2991− toJSON = toJSON . _cpProperties
2990+ toJSON = toJSON . _cpAddtional
2992
2991
2993-- | JSON template for an organization entry.
2992-- | JSON template for an organization entry.
2994--
2993--
@@ -3985,26 +3984,25 @@ instance ToJSON Member where
3985--
3984--
3986-- /See:/ 'userCustomProperties' smart constructor.
3985-- /See:/ 'userCustomProperties' smart constructor.
3987newtype UserCustomProperties = UserCustomProperties
3986newtype UserCustomProperties = UserCustomProperties
3988− { _ucpProperties :: HashMap Text JSONValue
3987+ { _ucpAddtional :: HashMap Text JSONValue
3989 } deriving (Eq,Show,Data,Typeable,Generic)
3988 } deriving (Eq,Show,Data,Typeable,Generic)
3990
3989
3991-- | Creates a value of 'UserCustomProperties' with the minimum fields required to make a request.
3990-- | Creates a value of 'UserCustomProperties' with the minimum fields required to make a request.
3992--
3991--
3993-- Use one of the following lenses to modify other fields as desired:
3992-- Use one of the following lenses to modify other fields as desired:
3994--
3993--
3995−-- * 'ucpProperties'
3994+-- * 'ucpAddtional'
3996userCustomProperties
3995userCustomProperties
3997− :: HashMap Text JSONValue -- ^ 'properties'
3996+ :: HashMap Text JSONValue -- ^ 'addtional'
3998 -> UserCustomProperties
3997 -> UserCustomProperties
3999−userCustomProperties pUcpProperties_ =
3998+userCustomProperties pUcpAddtional_ =
4000 UserCustomProperties
3999 UserCustomProperties
4001− { _ucpProperties = pUcpProperties_
4000+ { _ucpAddtional = pUcpAddtional_
4002 }
4001 }
4003
4002
4004−ucpProperties :: Lens' UserCustomProperties (HashMap Text JSONValue)
4003+ucpAddtional :: Lens' UserCustomProperties (HashMap Text JSONValue)
4005−ucpProperties
4004+ucpAddtional
4006− = lens _ucpProperties
4005+ = lens _ucpAddtional (\ s a -> s{_ucpAddtional = a})
4007− (\ s a -> s{_ucpProperties = a})
4008
4006
4009instance FromJSON UserCustomProperties where
4007instance FromJSON UserCustomProperties where
4010 parseJSON
4008 parseJSON
@@ -4012,7 +4010,7 @@ instance FromJSON UserCustomProperties where
4012 (\ o -> UserCustomProperties <$> (parseJSONObject o))
4010 (\ o -> UserCustomProperties <$> (parseJSONObject o))
4013
4011
4014instance ToJSON UserCustomProperties where
4012instance ToJSON UserCustomProperties where
4015− toJSON = toJSON . _ucpProperties
4013+ toJSON = toJSON . _ucpAddtional
4016
4014
4017-- | Template for notifications list response.
4015-- | Template for notifications list response.
4018--
4016--
gogol-admin-reports/gen/Network/Google/Reports.hs+2−2
@@ -71,7 +71,7 @@ module Network.Google.Reports
71 -- ** UsageReportParametersItemMsgValueItem
71 -- ** UsageReportParametersItemMsgValueItem
72 , UsageReportParametersItemMsgValueItem
72 , UsageReportParametersItemMsgValueItem
73 , usageReportParametersItemMsgValueItem
73 , usageReportParametersItemMsgValueItem
74− , urpimviProperties
74+ , urpimviAddtional
75
75
76 -- ** Activities
76 -- ** Activities
77 , Activities
77 , Activities
@@ -127,7 +127,7 @@ module Network.Google.Reports
127 -- ** ChannelParams
127 -- ** ChannelParams
128 , ChannelParams
128 , ChannelParams
129 , channelParams
129 , channelParams
130− , cpProperties
130+ , cpAddtional
131
131
132 -- ** Activity
132 -- ** Activity
133 , Activity
133 , Activity
gogol-admin-reports/gen/Network/Google/Reports/Types.hs+2−2
@@ -48,7 +48,7 @@ module Network.Google.Reports.Types
48 -- * UsageReportParametersItemMsgValueItem
48 -- * UsageReportParametersItemMsgValueItem
49 , UsageReportParametersItemMsgValueItem
49 , UsageReportParametersItemMsgValueItem
50 , usageReportParametersItemMsgValueItem
50 , usageReportParametersItemMsgValueItem
51− , urpimviProperties
51+ , urpimviAddtional
52
52
53 -- * Activities
53 -- * Activities
54 , Activities
54 , Activities
@@ -104,7 +104,7 @@ module Network.Google.Reports.Types
104 -- * ChannelParams
104 -- * ChannelParams
105 , ChannelParams
105 , ChannelParams
106 , channelParams
106 , channelParams
107− , cpProperties
107+ , cpAddtional
108
108
109 -- * Activity
109 -- * Activity
110 , Activity
110 , Activity
gogol-admin-reports/gen/Network/Google/Reports/Types/Product.hs+19−19
@@ -274,26 +274,26 @@ instance ToJSON UsageReports where
274--
274--
275-- /See:/ 'usageReportParametersItemMsgValueItem' smart constructor.
275-- /See:/ 'usageReportParametersItemMsgValueItem' smart constructor.
276newtype UsageReportParametersItemMsgValueItem = UsageReportParametersItemMsgValueItem
276newtype UsageReportParametersItemMsgValueItem = UsageReportParametersItemMsgValueItem
277− { _urpimviProperties :: HashMap Text JSONValue
277+ { _urpimviAddtional :: HashMap Text JSONValue
278 } deriving (Eq,Show,Data,Typeable,Generic)
278 } deriving (Eq,Show,Data,Typeable,Generic)
279
279
280-- | Creates a value of 'UsageReportParametersItemMsgValueItem' with the minimum fields required to make a request.
280-- | Creates a value of 'UsageReportParametersItemMsgValueItem' with the minimum fields required to make a request.
281--
281--
282-- Use one of the following lenses to modify other fields as desired:
282-- Use one of the following lenses to modify other fields as desired:
283--
283--
284−-- * 'urpimviProperties'
284+-- * 'urpimviAddtional'
285usageReportParametersItemMsgValueItem
285usageReportParametersItemMsgValueItem
286− :: HashMap Text JSONValue -- ^ 'properties'
286+ :: HashMap Text JSONValue -- ^ 'addtional'
287 -> UsageReportParametersItemMsgValueItem
287 -> UsageReportParametersItemMsgValueItem
288−usageReportParametersItemMsgValueItem pUrpimviProperties_ =
288+usageReportParametersItemMsgValueItem pUrpimviAddtional_ =
289 UsageReportParametersItemMsgValueItem
289 UsageReportParametersItemMsgValueItem
290− { _urpimviProperties = pUrpimviProperties_
290+ { _urpimviAddtional = pUrpimviAddtional_
291 }
291 }
292
292
293−urpimviProperties :: Lens' UsageReportParametersItemMsgValueItem (HashMap Text JSONValue)
293+urpimviAddtional :: Lens' UsageReportParametersItemMsgValueItem (HashMap Text JSONValue)
294−urpimviProperties
294+urpimviAddtional
295− = lens _urpimviProperties
295+ = lens _urpimviAddtional
296− (\ s a -> s{_urpimviProperties = a})
296+ (\ s a -> s{_urpimviAddtional = a})
297
297
298instance FromJSON
298instance FromJSON
299 UsageReportParametersItemMsgValueItem where
299 UsageReportParametersItemMsgValueItem where
@@ -305,7 +305,7 @@ instance FromJSON
305
305
306instance ToJSON UsageReportParametersItemMsgValueItem
306instance ToJSON UsageReportParametersItemMsgValueItem
307 where
307 where
308− toJSON = toJSON . _urpimviProperties
308+ toJSON = toJSON . _urpimviAddtional
309
309
310-- | JSON template for a collection of activites.
310-- | JSON template for a collection of activites.
311--
311--
@@ -754,26 +754,26 @@ instance ToJSON ActivityEventsItem where
754--
754--
755-- /See:/ 'channelParams' smart constructor.
755-- /See:/ 'channelParams' smart constructor.
756newtype ChannelParams = ChannelParams
756newtype ChannelParams = ChannelParams
757− { _cpProperties :: HashMap Text Text
757+ { _cpAddtional :: HashMap Text Text
758 } deriving (Eq,Show,Data,Typeable,Generic)
758 } deriving (Eq,Show,Data,Typeable,Generic)
759
759
760-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
760-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
761--
761--
762-- Use one of the following lenses to modify other fields as desired:
762-- Use one of the following lenses to modify other fields as desired:
763--
763--
764−-- * 'cpProperties'
764+-- * 'cpAddtional'
765channelParams
765channelParams
766− :: HashMap Text Text -- ^ 'properties'
766+ :: HashMap Text Text -- ^ 'addtional'
767 -> ChannelParams
767 -> ChannelParams
768−channelParams pCpProperties_ =
768+channelParams pCpAddtional_ =
769 ChannelParams
769 ChannelParams
770− { _cpProperties = pCpProperties_
770+ { _cpAddtional = pCpAddtional_
771 }
771 }
772
772
773-- | Declares a new parameter by name.
773-- | Declares a new parameter by name.
774−cpProperties :: Lens' ChannelParams (HashMap Text Text)
774+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
775−cpProperties
775+cpAddtional
776− = lens _cpProperties (\ s a -> s{_cpProperties = a})
776+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
777
777
778instance FromJSON ChannelParams where
778instance FromJSON ChannelParams where
779 parseJSON
779 parseJSON
@@ -781,7 +781,7 @@ instance FromJSON ChannelParams where
781 (\ o -> ChannelParams <$> (parseJSONObject o))
781 (\ o -> ChannelParams <$> (parseJSONObject o))
782
782
783instance ToJSON ChannelParams where
783instance ToJSON ChannelParams where
784− toJSON = toJSON . _cpProperties
784+ toJSON = toJSON . _cpAddtional
785
785
786-- | JSON template for the activity resource.
786-- | JSON template for the activity resource.
787--
787--
gogol-analytics/gen/Network/Google/Analytics.hs+4−4
@@ -331,7 +331,7 @@ module Network.Google.Analytics
331 -- ** GaDataTotalsForAllResults
331 -- ** GaDataTotalsForAllResults
332 , GaDataTotalsForAllResults
332 , GaDataTotalsForAllResults
333 , gaDataTotalsForAllResults
333 , gaDataTotalsForAllResults
334− , gdtfarProperties
334+ , gdtfarAddtional
335
335
336 -- ** ProFileParentLink
336 -- ** ProFileParentLink
337 , ProFileParentLink
337 , ProFileParentLink
@@ -645,7 +645,7 @@ module Network.Google.Analytics
645 -- ** RealtimeDataTotalsForAllResults
645 -- ** RealtimeDataTotalsForAllResults
646 , RealtimeDataTotalsForAllResults
646 , RealtimeDataTotalsForAllResults
647 , realtimeDataTotalsForAllResults
647 , realtimeDataTotalsForAllResults
648− , rdtfarProperties
648+ , rdtfarAddtional
649
649
650 -- ** CustomDataSource
650 -- ** CustomDataSource
651 , CustomDataSource
651 , CustomDataSource
@@ -1213,7 +1213,7 @@ module Network.Google.Analytics
1213 -- ** McfDataTotalsForAllResults
1213 -- ** McfDataTotalsForAllResults
1214 , McfDataTotalsForAllResults
1214 , McfDataTotalsForAllResults
1215 , mcfDataTotalsForAllResults
1215 , mcfDataTotalsForAllResults
1216− , mdtfarProperties
1216+ , mdtfarAddtional
1217
1217
1218 -- ** UnSampledReportCloudStorageDownloadDetails
1218 -- ** UnSampledReportCloudStorageDownloadDetails
1219 , UnSampledReportCloudStorageDownloadDetails
1219 , UnSampledReportCloudStorageDownloadDetails
@@ -1243,7 +1243,7 @@ module Network.Google.Analytics
1243 -- ** ColumnAttributes
1243 -- ** ColumnAttributes
1244 , ColumnAttributes
1244 , ColumnAttributes
1245 , columnAttributes
1245 , columnAttributes
1246− , caProperties
1246+ , caAddtional
1247 ) where
1247 ) where
1248
1248
1249import Network.Google.Analytics.Types
1249import Network.Google.Analytics.Types
gogol-analytics/gen/Network/Google/Analytics/Types.hs+4−4
@@ -90,7 +90,7 @@ module Network.Google.Analytics.Types
90 -- * GaDataTotalsForAllResults
90 -- * GaDataTotalsForAllResults
91 , GaDataTotalsForAllResults
91 , GaDataTotalsForAllResults
92 , gaDataTotalsForAllResults
92 , gaDataTotalsForAllResults
93− , gdtfarProperties
93+ , gdtfarAddtional
94
94
95 -- * ProFileParentLink
95 -- * ProFileParentLink
96 , ProFileParentLink
96 , ProFileParentLink
@@ -404,7 +404,7 @@ module Network.Google.Analytics.Types
404 -- * RealtimeDataTotalsForAllResults
404 -- * RealtimeDataTotalsForAllResults
405 , RealtimeDataTotalsForAllResults
405 , RealtimeDataTotalsForAllResults
406 , realtimeDataTotalsForAllResults
406 , realtimeDataTotalsForAllResults
407− , rdtfarProperties
407+ , rdtfarAddtional
408
408
409 -- * CustomDataSource
409 -- * CustomDataSource
410 , CustomDataSource
410 , CustomDataSource
@@ -972,7 +972,7 @@ module Network.Google.Analytics.Types
972 -- * McfDataTotalsForAllResults
972 -- * McfDataTotalsForAllResults
973 , McfDataTotalsForAllResults
973 , McfDataTotalsForAllResults
974 , mcfDataTotalsForAllResults
974 , mcfDataTotalsForAllResults
975− , mdtfarProperties
975+ , mdtfarAddtional
976
976
977 -- * UnSampledReportCloudStorageDownloadDetails
977 -- * UnSampledReportCloudStorageDownloadDetails
978 , UnSampledReportCloudStorageDownloadDetails
978 , UnSampledReportCloudStorageDownloadDetails
@@ -1002,7 +1002,7 @@ module Network.Google.Analytics.Types
1002 -- * ColumnAttributes
1002 -- * ColumnAttributes
1003 , ColumnAttributes
1003 , ColumnAttributes
1004 , columnAttributes
1004 , columnAttributes
1005− , caProperties
1005+ , caAddtional
1006 ) where
1006 ) where
1007
1007
1008import Network.Google.Analytics.Types.Product
1008import Network.Google.Analytics.Types.Product
gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+39−39
@@ -692,28 +692,28 @@ instance ToJSON McfDataColumnHeadersItem where
692--
692--
693-- /See:/ 'gaDataTotalsForAllResults' smart constructor.
693-- /See:/ 'gaDataTotalsForAllResults' smart constructor.
694newtype GaDataTotalsForAllResults = GaDataTotalsForAllResults
694newtype GaDataTotalsForAllResults = GaDataTotalsForAllResults
695− { _gdtfarProperties :: HashMap Text Text
695+ { _gdtfarAddtional :: HashMap Text Text
696 } deriving (Eq,Show,Data,Typeable,Generic)
696 } deriving (Eq,Show,Data,Typeable,Generic)
697
697
698-- | Creates a value of 'GaDataTotalsForAllResults' with the minimum fields required to make a request.
698-- | Creates a value of 'GaDataTotalsForAllResults' with the minimum fields required to make a request.
699--
699--
700-- Use one of the following lenses to modify other fields as desired:
700-- Use one of the following lenses to modify other fields as desired:
701--
701--
702−-- * 'gdtfarProperties'
702+-- * 'gdtfarAddtional'
703gaDataTotalsForAllResults
703gaDataTotalsForAllResults
704− :: HashMap Text Text -- ^ 'properties'
704+ :: HashMap Text Text -- ^ 'addtional'
705 -> GaDataTotalsForAllResults
705 -> GaDataTotalsForAllResults
706−gaDataTotalsForAllResults pGdtfarProperties_ =
706+gaDataTotalsForAllResults pGdtfarAddtional_ =
707 GaDataTotalsForAllResults
707 GaDataTotalsForAllResults
708− { _gdtfarProperties = pGdtfarProperties_
708+ { _gdtfarAddtional = pGdtfarAddtional_
709 }
709 }
710
710
711-- | Key-value pair for the total value of a metric. Key is the metric name
711-- | Key-value pair for the total value of a metric. Key is the metric name
712-- and the value is the total value for that metric.
712-- and the value is the total value for that metric.
713−gdtfarProperties :: Lens' GaDataTotalsForAllResults (HashMap Text Text)
713+gdtfarAddtional :: Lens' GaDataTotalsForAllResults (HashMap Text Text)
714−gdtfarProperties
714+gdtfarAddtional
715− = lens _gdtfarProperties
715+ = lens _gdtfarAddtional
716− (\ s a -> s{_gdtfarProperties = a})
716+ (\ s a -> s{_gdtfarAddtional = a})
717
717
718instance FromJSON GaDataTotalsForAllResults where
718instance FromJSON GaDataTotalsForAllResults where
719 parseJSON
719 parseJSON
@@ -722,7 +722,7 @@ instance FromJSON GaDataTotalsForAllResults where
722 GaDataTotalsForAllResults <$> (parseJSONObject o))
722 GaDataTotalsForAllResults <$> (parseJSONObject o))
723
723
724instance ToJSON GaDataTotalsForAllResults where
724instance ToJSON GaDataTotalsForAllResults where
725− toJSON = toJSON . _gdtfarProperties
725+ toJSON = toJSON . _gdtfarAddtional
726
726
727-- | Parent link for this view (profile). Points to the web property to which
727-- | Parent link for this view (profile). Points to the web property to which
728-- this view (profile) belongs.
728-- this view (profile) belongs.
@@ -3733,28 +3733,28 @@ instance ToJSON GaData where
3733--
3733--
3734-- /See:/ 'realtimeDataTotalsForAllResults' smart constructor.
3734-- /See:/ 'realtimeDataTotalsForAllResults' smart constructor.
3735newtype RealtimeDataTotalsForAllResults = RealtimeDataTotalsForAllResults
3735newtype RealtimeDataTotalsForAllResults = RealtimeDataTotalsForAllResults
3736− { _rdtfarProperties :: HashMap Text Text
3736+ { _rdtfarAddtional :: HashMap Text Text
3737 } deriving (Eq,Show,Data,Typeable,Generic)
3737 } deriving (Eq,Show,Data,Typeable,Generic)
3738
3738
3739-- | Creates a value of 'RealtimeDataTotalsForAllResults' with the minimum fields required to make a request.
3739-- | Creates a value of 'RealtimeDataTotalsForAllResults' with the minimum fields required to make a request.
3740--
3740--
3741-- Use one of the following lenses to modify other fields as desired:
3741-- Use one of the following lenses to modify other fields as desired:
3742--
3742--
3743−-- * 'rdtfarProperties'
3743+-- * 'rdtfarAddtional'
3744realtimeDataTotalsForAllResults
3744realtimeDataTotalsForAllResults
3745− :: HashMap Text Text -- ^ 'properties'
3745+ :: HashMap Text Text -- ^ 'addtional'
3746 -> RealtimeDataTotalsForAllResults
3746 -> RealtimeDataTotalsForAllResults
3747−realtimeDataTotalsForAllResults pRdtfarProperties_ =
3747+realtimeDataTotalsForAllResults pRdtfarAddtional_ =
3748 RealtimeDataTotalsForAllResults
3748 RealtimeDataTotalsForAllResults
3749− { _rdtfarProperties = pRdtfarProperties_
3749+ { _rdtfarAddtional = pRdtfarAddtional_
3750 }
3750 }
3751
3751
3752-- | Key-value pair for the total value of a metric. Key is the metric name
3752-- | Key-value pair for the total value of a metric. Key is the metric name
3753-- and the value is the total value for that metric.
3753-- and the value is the total value for that metric.
3754−rdtfarProperties :: Lens' RealtimeDataTotalsForAllResults (HashMap Text Text)
3754+rdtfarAddtional :: Lens' RealtimeDataTotalsForAllResults (HashMap Text Text)
3755−rdtfarProperties
3755+rdtfarAddtional
3756− = lens _rdtfarProperties
3756+ = lens _rdtfarAddtional
3757− (\ s a -> s{_rdtfarProperties = a})
3757+ (\ s a -> s{_rdtfarAddtional = a})
3758
3758
3759instance FromJSON RealtimeDataTotalsForAllResults
3759instance FromJSON RealtimeDataTotalsForAllResults
3760 where
3760 where
@@ -3765,7 +3765,7 @@ instance FromJSON RealtimeDataTotalsForAllResults
3765 (parseJSONObject o))
3765 (parseJSONObject o))
3766
3766
3767instance ToJSON RealtimeDataTotalsForAllResults where
3767instance ToJSON RealtimeDataTotalsForAllResults where
3768− toJSON = toJSON . _rdtfarProperties
3768+ toJSON = toJSON . _rdtfarAddtional
3769
3769
3770-- | JSON template for an Analytics custom data source.
3770-- | JSON template for an Analytics custom data source.
3771--
3771--
@@ -9167,28 +9167,28 @@ instance ToJSON ExperimentVariationsItem where
9167--
9167--
9168-- /See:/ 'mcfDataTotalsForAllResults' smart constructor.
9168-- /See:/ 'mcfDataTotalsForAllResults' smart constructor.
9169newtype McfDataTotalsForAllResults = McfDataTotalsForAllResults
9169newtype McfDataTotalsForAllResults = McfDataTotalsForAllResults
9170− { _mdtfarProperties :: HashMap Text Text
9170+ { _mdtfarAddtional :: HashMap Text Text
9171 } deriving (Eq,Show,Data,Typeable,Generic)
9171 } deriving (Eq,Show,Data,Typeable,Generic)
9172
9172
9173-- | Creates a value of 'McfDataTotalsForAllResults' with the minimum fields required to make a request.
9173-- | Creates a value of 'McfDataTotalsForAllResults' with the minimum fields required to make a request.
9174--
9174--
9175-- Use one of the following lenses to modify other fields as desired:
9175-- Use one of the following lenses to modify other fields as desired:
9176--
9176--
9177−-- * 'mdtfarProperties'
9177+-- * 'mdtfarAddtional'
9178mcfDataTotalsForAllResults
9178mcfDataTotalsForAllResults
9179− :: HashMap Text Text -- ^ 'properties'
9179+ :: HashMap Text Text -- ^ 'addtional'
9180 -> McfDataTotalsForAllResults
9180 -> McfDataTotalsForAllResults
9181−mcfDataTotalsForAllResults pMdtfarProperties_ =
9181+mcfDataTotalsForAllResults pMdtfarAddtional_ =
9182 McfDataTotalsForAllResults
9182 McfDataTotalsForAllResults
9183− { _mdtfarProperties = pMdtfarProperties_
9183+ { _mdtfarAddtional = pMdtfarAddtional_
9184 }
9184 }
9185
9185
9186-- | Key-value pair for the total value of a metric. Key is the metric name
9186-- | Key-value pair for the total value of a metric. Key is the metric name
9187-- and the value is the total value for that metric.
9187-- and the value is the total value for that metric.
9188−mdtfarProperties :: Lens' McfDataTotalsForAllResults (HashMap Text Text)
9188+mdtfarAddtional :: Lens' McfDataTotalsForAllResults (HashMap Text Text)
9189−mdtfarProperties
9189+mdtfarAddtional
9190− = lens _mdtfarProperties
9190+ = lens _mdtfarAddtional
9191− (\ s a -> s{_mdtfarProperties = a})
9191+ (\ s a -> s{_mdtfarAddtional = a})
9192
9192
9193instance FromJSON McfDataTotalsForAllResults where
9193instance FromJSON McfDataTotalsForAllResults where
9194 parseJSON
9194 parseJSON
@@ -9197,7 +9197,7 @@ instance FromJSON McfDataTotalsForAllResults where
9197 McfDataTotalsForAllResults <$> (parseJSONObject o))
9197 McfDataTotalsForAllResults <$> (parseJSONObject o))
9198
9198
9199instance ToJSON McfDataTotalsForAllResults where
9199instance ToJSON McfDataTotalsForAllResults where
9200− toJSON = toJSON . _mdtfarProperties
9200+ toJSON = toJSON . _mdtfarAddtional
9201
9201
9202-- | Download details for a file stored in Google Cloud Storage.
9202-- | Download details for a file stored in Google Cloud Storage.
9203--
9203--
@@ -9410,26 +9410,26 @@ instance ToJSON GoalParentLink where
9410--
9410--
9411-- /See:/ 'columnAttributes' smart constructor.
9411-- /See:/ 'columnAttributes' smart constructor.
9412newtype ColumnAttributes = ColumnAttributes
9412newtype ColumnAttributes = ColumnAttributes
9413− { _caProperties :: HashMap Text Text
9413+ { _caAddtional :: HashMap Text Text
9414 } deriving (Eq,Show,Data,Typeable,Generic)
9414 } deriving (Eq,Show,Data,Typeable,Generic)
9415
9415
9416-- | Creates a value of 'ColumnAttributes' with the minimum fields required to make a request.
9416-- | Creates a value of 'ColumnAttributes' with the minimum fields required to make a request.
9417--
9417--
9418-- Use one of the following lenses to modify other fields as desired:
9418-- Use one of the following lenses to modify other fields as desired:
9419--
9419--
9420−-- * 'caProperties'
9420+-- * 'caAddtional'
9421columnAttributes
9421columnAttributes
9422− :: HashMap Text Text -- ^ 'properties'
9422+ :: HashMap Text Text -- ^ 'addtional'
9423 -> ColumnAttributes
9423 -> ColumnAttributes
9424−columnAttributes pCaProperties_ =
9424+columnAttributes pCaAddtional_ =
9425 ColumnAttributes
9425 ColumnAttributes
9426− { _caProperties = pCaProperties_
9426+ { _caAddtional = pCaAddtional_
9427 }
9427 }
9428
9428
9429-- | The name of the attribute.
9429-- | The name of the attribute.
9430−caProperties :: Lens' ColumnAttributes (HashMap Text Text)
9430+caAddtional :: Lens' ColumnAttributes (HashMap Text Text)
9431−caProperties
9431+caAddtional
9432− = lens _caProperties (\ s a -> s{_caProperties = a})
9432+ = lens _caAddtional (\ s a -> s{_caAddtional = a})
9433
9433
9434instance FromJSON ColumnAttributes where
9434instance FromJSON ColumnAttributes where
9435 parseJSON
9435 parseJSON
@@ -9437,4 +9437,4 @@ instance FromJSON ColumnAttributes where
9437 (\ o -> ColumnAttributes <$> (parseJSONObject o))
9437 (\ o -> ColumnAttributes <$> (parseJSONObject o))
9438
9438
9439instance ToJSON ColumnAttributes where
9439instance 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
184 -- ** InAppProductListings
184 -- ** InAppProductListings
185 , InAppProductListings
185 , InAppProductListings
186 , inAppProductListings
186 , inAppProductListings
187− , iaplProperties
187+ , iaplAddtional
188
188
189 -- ** InAppProductsUpdateResponse
189 -- ** InAppProductsUpdateResponse
190 , InAppProductsUpdateResponse
190 , InAppProductsUpdateResponse
@@ -349,7 +349,7 @@ module Network.Google.AndroidPublisher
349 -- ** InAppProductPrices
349 -- ** InAppProductPrices
350 , InAppProductPrices
350 , InAppProductPrices
351 , inAppProductPrices
351 , inAppProductPrices
352− , iAppProperties
352+ , iAppAddtional
353
353
354 -- ** InAppProductsBatchRequest
354 -- ** InAppProductsBatchRequest
355 , InAppProductsBatchRequest
355 , InAppProductsBatchRequest
gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs+2−2
@@ -21,7 +21,7 @@ module Network.Google.AndroidPublisher.Types
21 -- * InAppProductListings
21 -- * InAppProductListings
22 , InAppProductListings
22 , InAppProductListings
23 , inAppProductListings
23 , inAppProductListings
24− , iaplProperties
24+ , iaplAddtional
25
25
26 -- * InAppProductsUpdateResponse
26 -- * InAppProductsUpdateResponse
27 , InAppProductsUpdateResponse
27 , InAppProductsUpdateResponse
@@ -186,7 +186,7 @@ module Network.Google.AndroidPublisher.Types
186 -- * InAppProductPrices
186 -- * InAppProductPrices
187 , InAppProductPrices
187 , InAppProductPrices
188 , inAppProductPrices
188 , inAppProductPrices
189− , iAppProperties
189+ , iAppAddtional
190
190
191 -- * InAppProductsBatchRequest
191 -- * InAppProductsBatchRequest
192 , InAppProductsBatchRequest
192 , InAppProductsBatchRequest
gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+20−20
@@ -24,28 +24,28 @@ import Network.Google.Prelude
24--
24--
25-- /See:/ 'inAppProductListings' smart constructor.
25-- /See:/ 'inAppProductListings' smart constructor.
26newtype InAppProductListings = InAppProductListings
26newtype InAppProductListings = InAppProductListings
27− { _iaplProperties :: HashMap Text InAppProductListing
27+ { _iaplAddtional :: HashMap Text InAppProductListing
28 } deriving (Eq,Show,Data,Typeable,Generic)
28 } deriving (Eq,Show,Data,Typeable,Generic)
29
29
30-- | Creates a value of 'InAppProductListings' with the minimum fields required to make a request.
30-- | Creates a value of 'InAppProductListings' with the minimum fields required to make a request.
31--
31--
32-- Use one of the following lenses to modify other fields as desired:
32-- Use one of the following lenses to modify other fields as desired:
33--
33--
34−-- * 'iaplProperties'
34+-- * 'iaplAddtional'
35inAppProductListings
35inAppProductListings
36− :: HashMap Text InAppProductListing -- ^ 'properties'
36+ :: HashMap Text InAppProductListing -- ^ 'addtional'
37 -> InAppProductListings
37 -> InAppProductListings
38−inAppProductListings pIaplProperties_ =
38+inAppProductListings pIaplAddtional_ =
39 InAppProductListings
39 InAppProductListings
40− { _iaplProperties = pIaplProperties_
40+ { _iaplAddtional = pIaplAddtional_
41 }
41 }
42
42
43-- | The language of the localized data, as defined by BCP 47. i.e.:
43-- | The language of the localized data, as defined by BCP 47. i.e.:
44-- \"en-US\", \"en-GB\".
44-- \"en-US\", \"en-GB\".
45−iaplProperties :: Lens' InAppProductListings (HashMap Text InAppProductListing)
45+iaplAddtional :: Lens' InAppProductListings (HashMap Text InAppProductListing)
46−iaplProperties
46+iaplAddtional
47− = lens _iaplProperties
47+ = lens _iaplAddtional
48− (\ s a -> s{_iaplProperties = a})
48+ (\ s a -> s{_iaplAddtional = a})
49
49
50instance FromJSON InAppProductListings where
50instance FromJSON InAppProductListings where
51 parseJSON
51 parseJSON
@@ -53,7 +53,7 @@ instance FromJSON InAppProductListings where
53 (\ o -> InAppProductListings <$> (parseJSONObject o))
53 (\ o -> InAppProductListings <$> (parseJSONObject o))
54
54
55instance ToJSON InAppProductListings where
55instance ToJSON InAppProductListings where
56− toJSON = toJSON . _iaplProperties
56+ toJSON = toJSON . _iaplAddtional
57
57
58--
58--
59-- /See:/ 'inAppProductsUpdateResponse' smart constructor.
59-- /See:/ 'inAppProductsUpdateResponse' smart constructor.
@@ -1270,27 +1270,27 @@ instance ToJSON AppDetails where
1270--
1270--
1271-- /See:/ 'inAppProductPrices' smart constructor.
1271-- /See:/ 'inAppProductPrices' smart constructor.
1272newtype InAppProductPrices = InAppProductPrices
1272newtype InAppProductPrices = InAppProductPrices
1273− { _iAppProperties :: HashMap Text Price
1273+ { _iAppAddtional :: HashMap Text Price
1274 } deriving (Eq,Show,Data,Typeable,Generic)
1274 } deriving (Eq,Show,Data,Typeable,Generic)
1275
1275
1276-- | Creates a value of 'InAppProductPrices' with the minimum fields required to make a request.
1276-- | Creates a value of 'InAppProductPrices' with the minimum fields required to make a request.
1277--
1277--
1278-- Use one of the following lenses to modify other fields as desired:
1278-- Use one of the following lenses to modify other fields as desired:
1279--
1279--
1280−-- * 'iAppProperties'
1280+-- * 'iAppAddtional'
1281inAppProductPrices
1281inAppProductPrices
1282− :: HashMap Text Price -- ^ 'properties'
1282+ :: HashMap Text Price -- ^ 'addtional'
1283 -> InAppProductPrices
1283 -> InAppProductPrices
1284−inAppProductPrices pIAppProperties_ =
1284+inAppProductPrices pIAppAddtional_ =
1285 InAppProductPrices
1285 InAppProductPrices
1286− { _iAppProperties = pIAppProperties_
1286+ { _iAppAddtional = pIAppAddtional_
1287 }
1287 }
1288
1288
1289-- | Region code, as defined by ISO 3166-2.
1289-- | Region code, as defined by ISO 3166-2.
1290−iAppProperties :: Lens' InAppProductPrices (HashMap Text Price)
1290+iAppAddtional :: Lens' InAppProductPrices (HashMap Text Price)
1291−iAppProperties
1291+iAppAddtional
1292− = lens _iAppProperties
1292+ = lens _iAppAddtional
1293− (\ s a -> s{_iAppProperties = a})
1293+ (\ s a -> s{_iAppAddtional = a})
1294
1294
1295instance FromJSON InAppProductPrices where
1295instance FromJSON InAppProductPrices where
1296 parseJSON
1296 parseJSON
@@ -1298,7 +1298,7 @@ instance FromJSON InAppProductPrices where
1298 (\ o -> InAppProductPrices <$> (parseJSONObject o))
1298 (\ o -> InAppProductPrices <$> (parseJSONObject o))
1299
1299
1300instance ToJSON InAppProductPrices where
1300instance ToJSON InAppProductPrices where
1301− toJSON = toJSON . _iAppProperties
1301+ toJSON = toJSON . _iAppAddtional
1302
1302
1303--
1303--
1304-- /See:/ 'inAppProductsBatchRequest' smart constructor.
1304-- /See:/ 'inAppProductsBatchRequest' smart constructor.
gogol-appengine/gen/Network/Google/AppEngine.hs+9−9
@@ -69,7 +69,7 @@ module Network.Google.AppEngine
69 -- ** OperationSchema
69 -- ** OperationSchema
70 , OperationSchema
70 , OperationSchema
71 , operationSchema
71 , operationSchema
72− , osProperties
72+ , osAddtional
73
73
74 -- ** TrafficSplit
74 -- ** TrafficSplit
75 , TrafficSplit
75 , TrafficSplit
@@ -130,7 +130,7 @@ module Network.Google.AppEngine
130 -- ** VersionEnvVariables
130 -- ** VersionEnvVariables
131 , VersionEnvVariables
131 , VersionEnvVariables
132 , versionEnvVariables
132 , versionEnvVariables
133− , vevProperties
133+ , vevAddtional
134
134
135 -- ** Application
135 -- ** Application
136 , Application
136 , Application
@@ -144,7 +144,7 @@ module Network.Google.AppEngine
144 -- ** VersionBetaSettings
144 -- ** VersionBetaSettings
145 , VersionBetaSettings
145 , VersionBetaSettings
146 , versionBetaSettings
146 , versionBetaSettings
147− , vbsProperties
147+ , vbsAddtional
148
148
149 -- ** Operation
149 -- ** Operation
150 , Operation
150 , Operation
@@ -165,7 +165,7 @@ module Network.Google.AppEngine
165 -- ** StaticDirectoryHandlerHTTPHeaders
165 -- ** StaticDirectoryHandlerHTTPHeaders
166 , StaticDirectoryHandlerHTTPHeaders
166 , StaticDirectoryHandlerHTTPHeaders
167 , staticDirectoryHandlerHTTPHeaders
167 , staticDirectoryHandlerHTTPHeaders
168− , sdhhttphProperties
168+ , sdhhttphAddtional
169
169
170 -- ** ListVersionsResponse
170 -- ** ListVersionsResponse
171 , ListVersionsResponse
171 , ListVersionsResponse
@@ -207,7 +207,7 @@ module Network.Google.AppEngine
207 -- ** StatusDetailsItem
207 -- ** StatusDetailsItem
208 , StatusDetailsItem
208 , StatusDetailsItem
209 , statusDetailsItem
209 , statusDetailsItem
210− , sdiProperties
210+ , sdiAddtional
211
211
212 -- ** Network
212 -- ** Network
213 , Network
213 , Network
@@ -219,7 +219,7 @@ module Network.Google.AppEngine
219 -- ** StaticFilesHandlerHTTPHeaders
219 -- ** StaticFilesHandlerHTTPHeaders
220 , StaticFilesHandlerHTTPHeaders
220 , StaticFilesHandlerHTTPHeaders
221 , staticFilesHandlerHTTPHeaders
221 , staticFilesHandlerHTTPHeaders
222− , sfhhttphProperties
222+ , sfhhttphAddtional
223
223
224 -- ** Resources
224 -- ** Resources
225 , Resources
225 , Resources
@@ -231,7 +231,7 @@ module Network.Google.AppEngine
231 -- ** DeploymentFiles
231 -- ** DeploymentFiles
232 , DeploymentFiles
232 , DeploymentFiles
233 , deploymentFiles
233 , deploymentFiles
234− , dfProperties
234+ , dfAddtional
235
235
236 -- ** CPUUtilization
236 -- ** CPUUtilization
237 , CPUUtilization
237 , CPUUtilization
@@ -242,7 +242,7 @@ module Network.Google.AppEngine
242 -- ** TrafficSplitAllocations
242 -- ** TrafficSplitAllocations
243 , TrafficSplitAllocations
243 , TrafficSplitAllocations
244 , trafficSplitAllocations
244 , trafficSplitAllocations
245− , tsaProperties
245+ , tsaAddtional
246
246
247 -- ** ManualScaling
247 -- ** ManualScaling
248 , ManualScaling
248 , ManualScaling
@@ -329,7 +329,7 @@ module Network.Google.AppEngine
329 -- ** OperationResponse
329 -- ** OperationResponse
330 , OperationResponse
330 , OperationResponse
331 , operationResponse
331 , operationResponse
332− , orProperties
332+ , orAddtional
333
333
334 -- ** ContainerInfo
334 -- ** ContainerInfo
335 , ContainerInfo
335 , ContainerInfo
gogol-appengine/gen/Network/Google/AppEngine/Types.hs+9−9
@@ -28,7 +28,7 @@ module Network.Google.AppEngine.Types
28 -- * OperationSchema
28 -- * OperationSchema
29 , OperationSchema
29 , OperationSchema
30 , operationSchema
30 , operationSchema
31− , osProperties
31+ , osAddtional
32
32
33 -- * TrafficSplit
33 -- * TrafficSplit
34 , TrafficSplit
34 , TrafficSplit
@@ -89,7 +89,7 @@ module Network.Google.AppEngine.Types
89 -- * VersionEnvVariables
89 -- * VersionEnvVariables
90 , VersionEnvVariables
90 , VersionEnvVariables
91 , versionEnvVariables
91 , versionEnvVariables
92− , vevProperties
92+ , vevAddtional
93
93
94 -- * Application
94 -- * Application
95 , Application
95 , Application
@@ -103,7 +103,7 @@ module Network.Google.AppEngine.Types
103 -- * VersionBetaSettings
103 -- * VersionBetaSettings
104 , VersionBetaSettings
104 , VersionBetaSettings
105 , versionBetaSettings
105 , versionBetaSettings
106− , vbsProperties
106+ , vbsAddtional
107
107
108 -- * Operation
108 -- * Operation
109 , Operation
109 , Operation
@@ -124,7 +124,7 @@ module Network.Google.AppEngine.Types
124 -- * StaticDirectoryHandlerHTTPHeaders
124 -- * StaticDirectoryHandlerHTTPHeaders
125 , StaticDirectoryHandlerHTTPHeaders
125 , StaticDirectoryHandlerHTTPHeaders
126 , staticDirectoryHandlerHTTPHeaders
126 , staticDirectoryHandlerHTTPHeaders
127− , sdhhttphProperties
127+ , sdhhttphAddtional
128
128
129 -- * ListVersionsResponse
129 -- * ListVersionsResponse
130 , ListVersionsResponse
130 , ListVersionsResponse
@@ -166,7 +166,7 @@ module Network.Google.AppEngine.Types
166 -- * StatusDetailsItem
166 -- * StatusDetailsItem
167 , StatusDetailsItem
167 , StatusDetailsItem
168 , statusDetailsItem
168 , statusDetailsItem
169− , sdiProperties
169+ , sdiAddtional
170
170
171 -- * Network
171 -- * Network
172 , Network
172 , Network
@@ -178,7 +178,7 @@ module Network.Google.AppEngine.Types
178 -- * StaticFilesHandlerHTTPHeaders
178 -- * StaticFilesHandlerHTTPHeaders
179 , StaticFilesHandlerHTTPHeaders
179 , StaticFilesHandlerHTTPHeaders
180 , staticFilesHandlerHTTPHeaders
180 , staticFilesHandlerHTTPHeaders
181− , sfhhttphProperties
181+ , sfhhttphAddtional
182
182
183 -- * Resources
183 -- * Resources
184 , Resources
184 , Resources
@@ -190,7 +190,7 @@ module Network.Google.AppEngine.Types
190 -- * DeploymentFiles
190 -- * DeploymentFiles
191 , DeploymentFiles
191 , DeploymentFiles
192 , deploymentFiles
192 , deploymentFiles
193− , dfProperties
193+ , dfAddtional
194
194
195 -- * CPUUtilization
195 -- * CPUUtilization
196 , CPUUtilization
196 , CPUUtilization
@@ -201,7 +201,7 @@ module Network.Google.AppEngine.Types
201 -- * TrafficSplitAllocations
201 -- * TrafficSplitAllocations
202 , TrafficSplitAllocations
202 , TrafficSplitAllocations
203 , trafficSplitAllocations
203 , trafficSplitAllocations
204− , tsaProperties
204+ , tsaAddtional
205
205
206 -- * ManualScaling
206 -- * ManualScaling
207 , ManualScaling
207 , ManualScaling
@@ -288,7 +288,7 @@ module Network.Google.AppEngine.Types
288 -- * OperationResponse
288 -- * OperationResponse
289 , OperationResponse
289 , OperationResponse
290 , operationResponse
290 , operationResponse
291− , orProperties
291+ , orAddtional
292
292
293 -- * ContainerInfo
293 -- * ContainerInfo
294 , ContainerInfo
294 , ContainerInfo
gogol-appengine/gen/Network/Google/AppEngine/Types/Product.hs+83−87
@@ -125,26 +125,26 @@ instance ToJSON Status where
125--
125--
126-- /See:/ 'operationSchema' smart constructor.
126-- /See:/ 'operationSchema' smart constructor.
127newtype OperationSchema = OperationSchema
127newtype OperationSchema = OperationSchema
128− { _osProperties :: HashMap Text JSONValue
128+ { _osAddtional :: HashMap Text JSONValue
129 } deriving (Eq,Show,Data,Typeable,Generic)
129 } deriving (Eq,Show,Data,Typeable,Generic)
130
130
131-- | Creates a value of 'OperationSchema' with the minimum fields required to make a request.
131-- | Creates a value of 'OperationSchema' with the minimum fields required to make a request.
132--
132--
133-- Use one of the following lenses to modify other fields as desired:
133-- Use one of the following lenses to modify other fields as desired:
134--
134--
135−-- * 'osProperties'
135+-- * 'osAddtional'
136operationSchema
136operationSchema
137− :: HashMap Text JSONValue -- ^ 'properties'
137+ :: HashMap Text JSONValue -- ^ 'addtional'
138 -> OperationSchema
138 -> OperationSchema
139−operationSchema pOsProperties_ =
139+operationSchema pOsAddtional_ =
140 OperationSchema
140 OperationSchema
141− { _osProperties = pOsProperties_
141+ { _osAddtional = pOsAddtional_
142 }
142 }
143
143
144-- | Properties of the object. Contains field \'ype with type URL.
144-- | Properties of the object. Contains field \'ype with type URL.
145−osProperties :: Lens' OperationSchema (HashMap Text JSONValue)
145+osAddtional :: Lens' OperationSchema (HashMap Text JSONValue)
146−osProperties
146+osAddtional
147− = lens _osProperties (\ s a -> s{_osProperties = a})
147+ = lens _osAddtional (\ s a -> s{_osAddtional = a})
148
148
149instance FromJSON OperationSchema where
149instance FromJSON OperationSchema where
150 parseJSON
150 parseJSON
@@ -152,7 +152,7 @@ instance FromJSON OperationSchema where
152 (\ o -> OperationSchema <$> (parseJSONObject o))
152 (\ o -> OperationSchema <$> (parseJSONObject o))
153
153
154instance ToJSON OperationSchema where
154instance ToJSON OperationSchema where
155− toJSON = toJSON . _osProperties
155+ toJSON = toJSON . _osAddtional
156
156
157-- | Configuration for traffic splitting for versions within a single module.
157-- | Configuration for traffic splitting for versions within a single module.
158-- Traffic splitting allows traffic directed to the module to be assigned
158-- Traffic splitting allows traffic directed to the module to be assigned
@@ -683,26 +683,25 @@ instance ToJSON APIConfigHandler where
683--
683--
684-- /See:/ 'versionEnvVariables' smart constructor.
684-- /See:/ 'versionEnvVariables' smart constructor.
685newtype VersionEnvVariables = VersionEnvVariables
685newtype VersionEnvVariables = VersionEnvVariables
686− { _vevProperties :: HashMap Text Text
686+ { _vevAddtional :: HashMap Text Text
687 } deriving (Eq,Show,Data,Typeable,Generic)
687 } deriving (Eq,Show,Data,Typeable,Generic)
688
688
689-- | Creates a value of 'VersionEnvVariables' with the minimum fields required to make a request.
689-- | Creates a value of 'VersionEnvVariables' with the minimum fields required to make a request.
690--
690--
691-- Use one of the following lenses to modify other fields as desired:
691-- Use one of the following lenses to modify other fields as desired:
692--
692--
693−-- * 'vevProperties'
693+-- * 'vevAddtional'
694versionEnvVariables
694versionEnvVariables
695− :: HashMap Text Text -- ^ 'properties'
695+ :: HashMap Text Text -- ^ 'addtional'
696 -> VersionEnvVariables
696 -> VersionEnvVariables
697−versionEnvVariables pVevProperties_ =
697+versionEnvVariables pVevAddtional_ =
698 VersionEnvVariables
698 VersionEnvVariables
699− { _vevProperties = pVevProperties_
699+ { _vevAddtional = pVevAddtional_
700 }
700 }
701
701
702−vevProperties :: Lens' VersionEnvVariables (HashMap Text Text)
702+vevAddtional :: Lens' VersionEnvVariables (HashMap Text Text)
703−vevProperties
703+vevAddtional
704− = lens _vevProperties
704+ = lens _vevAddtional (\ s a -> s{_vevAddtional = a})
705− (\ s a -> s{_vevProperties = a})
706
705
707instance FromJSON VersionEnvVariables where
706instance FromJSON VersionEnvVariables where
708 parseJSON
707 parseJSON
@@ -710,7 +709,7 @@ instance FromJSON VersionEnvVariables where
710 (\ o -> VersionEnvVariables <$> (parseJSONObject o))
709 (\ o -> VersionEnvVariables <$> (parseJSONObject o))
711
710
712instance ToJSON VersionEnvVariables where
711instance ToJSON VersionEnvVariables where
713− toJSON = toJSON . _vevProperties
712+ toJSON = toJSON . _vevAddtional
714
713
715-- | An Application contains the top-level configuration of an App Engine
714-- | An Application contains the top-level configuration of an App Engine
716-- application.
715-- application.
@@ -808,26 +807,25 @@ instance ToJSON Application where
808--
807--
809-- /See:/ 'versionBetaSettings' smart constructor.
808-- /See:/ 'versionBetaSettings' smart constructor.
810newtype VersionBetaSettings = VersionBetaSettings
809newtype VersionBetaSettings = VersionBetaSettings
811− { _vbsProperties :: HashMap Text Text
810+ { _vbsAddtional :: HashMap Text Text
812 } deriving (Eq,Show,Data,Typeable,Generic)
811 } deriving (Eq,Show,Data,Typeable,Generic)
813
812
814-- | Creates a value of 'VersionBetaSettings' with the minimum fields required to make a request.
813-- | Creates a value of 'VersionBetaSettings' with the minimum fields required to make a request.
815--
814--
816-- Use one of the following lenses to modify other fields as desired:
815-- Use one of the following lenses to modify other fields as desired:
817--
816--
818−-- * 'vbsProperties'
817+-- * 'vbsAddtional'
819versionBetaSettings
818versionBetaSettings
820− :: HashMap Text Text -- ^ 'properties'
819+ :: HashMap Text Text -- ^ 'addtional'
821 -> VersionBetaSettings
820 -> VersionBetaSettings
822−versionBetaSettings pVbsProperties_ =
821+versionBetaSettings pVbsAddtional_ =
823 VersionBetaSettings
822 VersionBetaSettings
824− { _vbsProperties = pVbsProperties_
823+ { _vbsAddtional = pVbsAddtional_
825 }
824 }
826
825
827−vbsProperties :: Lens' VersionBetaSettings (HashMap Text Text)
826+vbsAddtional :: Lens' VersionBetaSettings (HashMap Text Text)
828−vbsProperties
827+vbsAddtional
829− = lens _vbsProperties
828+ = lens _vbsAddtional (\ s a -> s{_vbsAddtional = a})
830− (\ s a -> s{_vbsProperties = a})
831
829
832instance FromJSON VersionBetaSettings where
830instance FromJSON VersionBetaSettings where
833 parseJSON
831 parseJSON
@@ -835,7 +833,7 @@ instance FromJSON VersionBetaSettings where
835 (\ o -> VersionBetaSettings <$> (parseJSONObject o))
833 (\ o -> VersionBetaSettings <$> (parseJSONObject o))
836
834
837instance ToJSON VersionBetaSettings where
835instance ToJSON VersionBetaSettings where
838− toJSON = toJSON . _vbsProperties
836+ toJSON = toJSON . _vbsAddtional
839
837
840-- | This resource represents a long-running operation that is the result of
838-- | This resource represents a long-running operation that is the result of
841-- a network API call.
839-- a network API call.
@@ -995,26 +993,26 @@ instance ToJSON URLDispatchRule where
995--
993--
996-- /See:/ 'staticDirectoryHandlerHTTPHeaders' smart constructor.
994-- /See:/ 'staticDirectoryHandlerHTTPHeaders' smart constructor.
997newtype StaticDirectoryHandlerHTTPHeaders = StaticDirectoryHandlerHTTPHeaders
995newtype StaticDirectoryHandlerHTTPHeaders = StaticDirectoryHandlerHTTPHeaders
998− { _sdhhttphProperties :: HashMap Text Text
996+ { _sdhhttphAddtional :: HashMap Text Text
999 } deriving (Eq,Show,Data,Typeable,Generic)
997 } deriving (Eq,Show,Data,Typeable,Generic)
1000
998
1001-- | Creates a value of 'StaticDirectoryHandlerHTTPHeaders' with the minimum fields required to make a request.
999-- | Creates a value of 'StaticDirectoryHandlerHTTPHeaders' with the minimum fields required to make a request.
1002--
1000--
1003-- Use one of the following lenses to modify other fields as desired:
1001-- Use one of the following lenses to modify other fields as desired:
1004--
1002--
1005−-- * 'sdhhttphProperties'
1003+-- * 'sdhhttphAddtional'
1006staticDirectoryHandlerHTTPHeaders
1004staticDirectoryHandlerHTTPHeaders
1007− :: HashMap Text Text -- ^ 'properties'
1005+ :: HashMap Text Text -- ^ 'addtional'
1008 -> StaticDirectoryHandlerHTTPHeaders
1006 -> StaticDirectoryHandlerHTTPHeaders
1009−staticDirectoryHandlerHTTPHeaders pSdhhttphProperties_ =
1007+staticDirectoryHandlerHTTPHeaders pSdhhttphAddtional_ =
1010 StaticDirectoryHandlerHTTPHeaders
1008 StaticDirectoryHandlerHTTPHeaders
1011− { _sdhhttphProperties = pSdhhttphProperties_
1009+ { _sdhhttphAddtional = pSdhhttphAddtional_
1012 }
1010 }
1013
1011
1014−sdhhttphProperties :: Lens' StaticDirectoryHandlerHTTPHeaders (HashMap Text Text)
1012+sdhhttphAddtional :: Lens' StaticDirectoryHandlerHTTPHeaders (HashMap Text Text)
1015−sdhhttphProperties
1013+sdhhttphAddtional
1016− = lens _sdhhttphProperties
1014+ = lens _sdhhttphAddtional
1017− (\ s a -> s{_sdhhttphProperties = a})
1015+ (\ s a -> s{_sdhhttphAddtional = a})
1018
1016
1019instance FromJSON StaticDirectoryHandlerHTTPHeaders
1017instance FromJSON StaticDirectoryHandlerHTTPHeaders
1020 where
1018 where
@@ -1026,7 +1024,7 @@ instance FromJSON StaticDirectoryHandlerHTTPHeaders
1026
1024
1027instance ToJSON StaticDirectoryHandlerHTTPHeaders
1025instance ToJSON StaticDirectoryHandlerHTTPHeaders
1028 where
1026 where
1029− toJSON = toJSON . _sdhhttphProperties
1027+ toJSON = toJSON . _sdhhttphAddtional
1030
1028
1031-- | Response message for \`Versions.ListVersions\`.
1029-- | Response message for \`Versions.ListVersions\`.
1032--
1030--
@@ -1375,27 +1373,26 @@ instance ToJSON APIEndpointHandler where
1375--
1373--
1376-- /See:/ 'statusDetailsItem' smart constructor.
1374-- /See:/ 'statusDetailsItem' smart constructor.
1377newtype StatusDetailsItem = StatusDetailsItem
1375newtype StatusDetailsItem = StatusDetailsItem
1378− { _sdiProperties :: HashMap Text JSONValue
1376+ { _sdiAddtional :: HashMap Text JSONValue
1379 } deriving (Eq,Show,Data,Typeable,Generic)
1377 } deriving (Eq,Show,Data,Typeable,Generic)
1380
1378
1381-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
1379-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
1382--
1380--
1383-- Use one of the following lenses to modify other fields as desired:
1381-- Use one of the following lenses to modify other fields as desired:
1384--
1382--
1385−-- * 'sdiProperties'
1383+-- * 'sdiAddtional'
1386statusDetailsItem
1384statusDetailsItem
1387− :: HashMap Text JSONValue -- ^ 'properties'
1385+ :: HashMap Text JSONValue -- ^ 'addtional'
1388 -> StatusDetailsItem
1386 -> StatusDetailsItem
1389−statusDetailsItem pSdiProperties_ =
1387+statusDetailsItem pSdiAddtional_ =
1390 StatusDetailsItem
1388 StatusDetailsItem
1391− { _sdiProperties = pSdiProperties_
1389+ { _sdiAddtional = pSdiAddtional_
1392 }
1390 }
1393
1391
1394-- | Properties of the object. Contains field \'ype with type URL.
1392-- | Properties of the object. Contains field \'ype with type URL.
1395−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1393+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1396−sdiProperties
1394+sdiAddtional
1397− = lens _sdiProperties
1395+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
1398− (\ s a -> s{_sdiProperties = a})
1399
1396
1400instance FromJSON StatusDetailsItem where
1397instance FromJSON StatusDetailsItem where
1401 parseJSON
1398 parseJSON
@@ -1403,7 +1400,7 @@ instance FromJSON StatusDetailsItem where
1403 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
1400 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
1404
1401
1405instance ToJSON StatusDetailsItem where
1402instance ToJSON StatusDetailsItem where
1406− toJSON = toJSON . _sdiProperties
1403+ toJSON = toJSON . _sdiAddtional
1407
1404
1408-- | Used to specify extra network settings (for VM runtimes only).
1405-- | Used to specify extra network settings (for VM runtimes only).
1409--
1406--
@@ -1473,26 +1470,26 @@ instance ToJSON Network where
1473--
1470--
1474-- /See:/ 'staticFilesHandlerHTTPHeaders' smart constructor.
1471-- /See:/ 'staticFilesHandlerHTTPHeaders' smart constructor.
1475newtype StaticFilesHandlerHTTPHeaders = StaticFilesHandlerHTTPHeaders
1472newtype StaticFilesHandlerHTTPHeaders = StaticFilesHandlerHTTPHeaders
1476− { _sfhhttphProperties :: HashMap Text Text
1473+ { _sfhhttphAddtional :: HashMap Text Text
1477 } deriving (Eq,Show,Data,Typeable,Generic)
1474 } deriving (Eq,Show,Data,Typeable,Generic)
1478
1475
1479-- | Creates a value of 'StaticFilesHandlerHTTPHeaders' with the minimum fields required to make a request.
1476-- | Creates a value of 'StaticFilesHandlerHTTPHeaders' with the minimum fields required to make a request.
1480--
1477--
1481-- Use one of the following lenses to modify other fields as desired:
1478-- Use one of the following lenses to modify other fields as desired:
1482--
1479--
1483−-- * 'sfhhttphProperties'
1480+-- * 'sfhhttphAddtional'
1484staticFilesHandlerHTTPHeaders
1481staticFilesHandlerHTTPHeaders
1485− :: HashMap Text Text -- ^ 'properties'
1482+ :: HashMap Text Text -- ^ 'addtional'
1486 -> StaticFilesHandlerHTTPHeaders
1483 -> StaticFilesHandlerHTTPHeaders
1487−staticFilesHandlerHTTPHeaders pSfhhttphProperties_ =
1484+staticFilesHandlerHTTPHeaders pSfhhttphAddtional_ =
1488 StaticFilesHandlerHTTPHeaders
1485 StaticFilesHandlerHTTPHeaders
1489− { _sfhhttphProperties = pSfhhttphProperties_
1486+ { _sfhhttphAddtional = pSfhhttphAddtional_
1490 }
1487 }
1491
1488
1492−sfhhttphProperties :: Lens' StaticFilesHandlerHTTPHeaders (HashMap Text Text)
1489+sfhhttphAddtional :: Lens' StaticFilesHandlerHTTPHeaders (HashMap Text Text)
1493−sfhhttphProperties
1490+sfhhttphAddtional
1494− = lens _sfhhttphProperties
1491+ = lens _sfhhttphAddtional
1495− (\ s a -> s{_sfhhttphProperties = a})
1492+ (\ s a -> s{_sfhhttphAddtional = a})
1496
1493
1497instance FromJSON StaticFilesHandlerHTTPHeaders where
1494instance FromJSON StaticFilesHandlerHTTPHeaders where
1498 parseJSON
1495 parseJSON
@@ -1502,7 +1499,7 @@ instance FromJSON StaticFilesHandlerHTTPHeaders where
1502 (parseJSONObject o))
1499 (parseJSONObject o))
1503
1500
1504instance ToJSON StaticFilesHandlerHTTPHeaders where
1501instance ToJSON StaticFilesHandlerHTTPHeaders where
1505− toJSON = toJSON . _sfhhttphProperties
1502+ toJSON = toJSON . _sfhhttphAddtional
1506
1503
1507-- | Used to specify how many machine resources an app version needs.
1504-- | Used to specify how many machine resources an app version needs.
1508--
1505--
@@ -1565,25 +1562,25 @@ instance ToJSON Resources where
1565--
1562--
1566-- /See:/ 'deploymentFiles' smart constructor.
1563-- /See:/ 'deploymentFiles' smart constructor.
1567newtype DeploymentFiles = DeploymentFiles
1564newtype DeploymentFiles = DeploymentFiles
1568− { _dfProperties :: HashMap Text FileInfo
1565+ { _dfAddtional :: HashMap Text FileInfo
1569 } deriving (Eq,Show,Data,Typeable,Generic)
1566 } deriving (Eq,Show,Data,Typeable,Generic)
1570
1567
1571-- | Creates a value of 'DeploymentFiles' with the minimum fields required to make a request.
1568-- | Creates a value of 'DeploymentFiles' with the minimum fields required to make a request.
1572--
1569--
1573-- Use one of the following lenses to modify other fields as desired:
1570-- Use one of the following lenses to modify other fields as desired:
1574--
1571--
1575−-- * 'dfProperties'
1572+-- * 'dfAddtional'
1576deploymentFiles
1573deploymentFiles
1577− :: HashMap Text FileInfo -- ^ 'properties'
1574+ :: HashMap Text FileInfo -- ^ 'addtional'
1578 -> DeploymentFiles
1575 -> DeploymentFiles
1579−deploymentFiles pDfProperties_ =
1576+deploymentFiles pDfAddtional_ =
1580 DeploymentFiles
1577 DeploymentFiles
1581− { _dfProperties = pDfProperties_
1578+ { _dfAddtional = pDfAddtional_
1582 }
1579 }
1583
1580
1584−dfProperties :: Lens' DeploymentFiles (HashMap Text FileInfo)
1581+dfAddtional :: Lens' DeploymentFiles (HashMap Text FileInfo)
1585−dfProperties
1582+dfAddtional
1586− = lens _dfProperties (\ s a -> s{_dfProperties = a})
1583+ = lens _dfAddtional (\ s a -> s{_dfAddtional = a})
1587
1584
1588instance FromJSON DeploymentFiles where
1585instance FromJSON DeploymentFiles where
1589 parseJSON
1586 parseJSON
@@ -1591,7 +1588,7 @@ instance FromJSON DeploymentFiles where
1591 (\ o -> DeploymentFiles <$> (parseJSONObject o))
1588 (\ o -> DeploymentFiles <$> (parseJSONObject o))
1592
1589
1593instance ToJSON DeploymentFiles where
1590instance ToJSON DeploymentFiles where
1594− toJSON = toJSON . _dfProperties
1591+ toJSON = toJSON . _dfAddtional
1595
1592
1596-- | Target scaling by CPU usage.
1593-- | Target scaling by CPU usage.
1597--
1594--
@@ -1655,26 +1652,25 @@ instance ToJSON CPUUtilization where
1655--
1652--
1656-- /See:/ 'trafficSplitAllocations' smart constructor.
1653-- /See:/ 'trafficSplitAllocations' smart constructor.
1657newtype TrafficSplitAllocations = TrafficSplitAllocations
1654newtype TrafficSplitAllocations = TrafficSplitAllocations
1658− { _tsaProperties :: HashMap Text Double
1655+ { _tsaAddtional :: HashMap Text Double
1659 } deriving (Eq,Show,Data,Typeable,Generic)
1656 } deriving (Eq,Show,Data,Typeable,Generic)
1660
1657
1661-- | Creates a value of 'TrafficSplitAllocations' with the minimum fields required to make a request.
1658-- | Creates a value of 'TrafficSplitAllocations' with the minimum fields required to make a request.
1662--
1659--
1663-- Use one of the following lenses to modify other fields as desired:
1660-- Use one of the following lenses to modify other fields as desired:
1664--
1661--
1665−-- * 'tsaProperties'
1662+-- * 'tsaAddtional'
1666trafficSplitAllocations
1663trafficSplitAllocations
1667− :: HashMap Text Double -- ^ 'properties'
1664+ :: HashMap Text Double -- ^ 'addtional'
1668 -> TrafficSplitAllocations
1665 -> TrafficSplitAllocations
1669−trafficSplitAllocations pTsaProperties_ =
1666+trafficSplitAllocations pTsaAddtional_ =
1670 TrafficSplitAllocations
1667 TrafficSplitAllocations
1671− { _tsaProperties = pTsaProperties_
1668+ { _tsaAddtional = pTsaAddtional_
1672 }
1669 }
1673
1670
1674−tsaProperties :: Lens' TrafficSplitAllocations (HashMap Text Double)
1671+tsaAddtional :: Lens' TrafficSplitAllocations (HashMap Text Double)
1675−tsaProperties
1672+tsaAddtional
1676− = lens _tsaProperties
1673+ = lens _tsaAddtional (\ s a -> s{_tsaAddtional = a})
1677− (\ s a -> s{_tsaProperties = a})
1678
1674
1679instance FromJSON TrafficSplitAllocations where
1675instance FromJSON TrafficSplitAllocations where
1680 parseJSON
1676 parseJSON
@@ -1683,7 +1679,7 @@ instance FromJSON TrafficSplitAllocations where
1683 TrafficSplitAllocations <$> (parseJSONObject o))
1679 TrafficSplitAllocations <$> (parseJSONObject o))
1684
1680
1685instance ToJSON TrafficSplitAllocations where
1681instance ToJSON TrafficSplitAllocations where
1686− toJSON = toJSON . _tsaProperties
1682+ toJSON = toJSON . _tsaAddtional
1687
1683
1688-- | A module with manual scaling runs continuously, allowing you to perform
1684-- | A module with manual scaling runs continuously, allowing you to perform
1689-- complex initialization and rely on the state of its memory over time.
1685-- complex initialization and rely on the state of its memory over time.
@@ -2538,26 +2534,26 @@ instance ToJSON SourceReference where
2538--
2534--
2539-- /See:/ 'operationResponse' smart constructor.
2535-- /See:/ 'operationResponse' smart constructor.
2540newtype OperationResponse = OperationResponse
2536newtype OperationResponse = OperationResponse
2541− { _orProperties :: HashMap Text JSONValue
2537+ { _orAddtional :: HashMap Text JSONValue
2542 } deriving (Eq,Show,Data,Typeable,Generic)
2538 } deriving (Eq,Show,Data,Typeable,Generic)
2543
2539
2544-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
2540-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
2545--
2541--
2546-- Use one of the following lenses to modify other fields as desired:
2542-- Use one of the following lenses to modify other fields as desired:
2547--
2543--
2548−-- * 'orProperties'
2544+-- * 'orAddtional'
2549operationResponse
2545operationResponse
2550− :: HashMap Text JSONValue -- ^ 'properties'
2546+ :: HashMap Text JSONValue -- ^ 'addtional'
2551 -> OperationResponse
2547 -> OperationResponse
2552−operationResponse pOrProperties_ =
2548+operationResponse pOrAddtional_ =
2553 OperationResponse
2549 OperationResponse
2554− { _orProperties = pOrProperties_
2550+ { _orAddtional = pOrAddtional_
2555 }
2551 }
2556
2552
2557-- | Properties of the object. Contains field \'ype with type URL.
2553-- | Properties of the object. Contains field \'ype with type URL.
2558−orProperties :: Lens' OperationResponse (HashMap Text JSONValue)
2554+orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
2559−orProperties
2555+orAddtional
2560− = lens _orProperties (\ s a -> s{_orProperties = a})
2556+ = lens _orAddtional (\ s a -> s{_orAddtional = a})
2561
2557
2562instance FromJSON OperationResponse where
2558instance FromJSON OperationResponse where
2563 parseJSON
2559 parseJSON
@@ -2565,7 +2561,7 @@ instance FromJSON OperationResponse where
2565 (\ o -> OperationResponse <$> (parseJSONObject o))
2561 (\ o -> OperationResponse <$> (parseJSONObject o))
2566
2562
2567instance ToJSON OperationResponse where
2563instance ToJSON OperationResponse where
2568− toJSON = toJSON . _orProperties
2564+ toJSON = toJSON . _orAddtional
2569
2565
2570-- | A Docker (container) image which should be used to start the
2566-- | A Docker (container) image which should be used to start the
2571-- application.
2567-- application.
gogol-apps-calendar/gen/Network/Google/AppsCalendar.hs+8−8
@@ -213,7 +213,7 @@ module Network.Google.AppsCalendar
213 -- ** ColorsEvent
213 -- ** ColorsEvent
214 , ColorsEvent
214 , ColorsEvent
215 , colorsEvent
215 , colorsEvent
216− , ceProperties
216+ , ceAddtional
217
217
218 -- ** Settings
218 -- ** Settings
219 , Settings
219 , Settings
@@ -298,7 +298,7 @@ module Network.Google.AppsCalendar
298 -- ** FreeBusyResponseGroups
298 -- ** FreeBusyResponseGroups
299 , FreeBusyResponseGroups
299 , FreeBusyResponseGroups
300 , freeBusyResponseGroups
300 , freeBusyResponseGroups
301− , fbrgProperties
301+ , fbrgAddtional
302
302
303 -- ** EventReminders
303 -- ** EventReminders
304 , EventReminders
304 , EventReminders
@@ -309,7 +309,7 @@ module Network.Google.AppsCalendar
309 -- ** ColorsCalendar
309 -- ** ColorsCalendar
310 , ColorsCalendar
310 , ColorsCalendar
311 , colorsCalendar
311 , colorsCalendar
312− , ccProperties
312+ , ccAddtional
313
313
314 -- ** CalendarNotification
314 -- ** CalendarNotification
315 , CalendarNotification
315 , CalendarNotification
@@ -320,12 +320,12 @@ module Network.Google.AppsCalendar
320 -- ** EventExtendedPropertiesPrivate
320 -- ** EventExtendedPropertiesPrivate
321 , EventExtendedPropertiesPrivate
321 , EventExtendedPropertiesPrivate
322 , eventExtendedPropertiesPrivate
322 , eventExtendedPropertiesPrivate
323− , eeppProperties
323+ , eeppAddtional
324
324
325 -- ** ChannelParams
325 -- ** ChannelParams
326 , ChannelParams
326 , ChannelParams
327 , channelParams
327 , channelParams
328− , cpProperties
328+ , cpAddtional
329
329
330 -- ** Events
330 -- ** Events
331 , Events
331 , Events
@@ -430,7 +430,7 @@ module Network.Google.AppsCalendar
430 -- ** EventGadgetPreferences
430 -- ** EventGadgetPreferences
431 , EventGadgetPreferences
431 , EventGadgetPreferences
432 , eventGadgetPreferences
432 , eventGadgetPreferences
433− , egpProperties
433+ , egpAddtional
434
434
435 -- ** FreeBusyRequest
435 -- ** FreeBusyRequest
436 , FreeBusyRequest
436 , FreeBusyRequest
@@ -457,7 +457,7 @@ module Network.Google.AppsCalendar
457 -- ** EventExtendedPropertiesShared
457 -- ** EventExtendedPropertiesShared
458 , EventExtendedPropertiesShared
458 , EventExtendedPropertiesShared
459 , eventExtendedPropertiesShared
459 , eventExtendedPropertiesShared
460− , eepsProperties
460+ , eepsAddtional
461
461
462 -- ** CalendarListWatchMinAccessRole
462 -- ** CalendarListWatchMinAccessRole
463 , CalendarListWatchMinAccessRole (..)
463 , CalendarListWatchMinAccessRole (..)
@@ -465,7 +465,7 @@ module Network.Google.AppsCalendar
465 -- ** FreeBusyResponseCalendars
465 -- ** FreeBusyResponseCalendars
466 , FreeBusyResponseCalendars
466 , FreeBusyResponseCalendars
467 , freeBusyResponseCalendars
467 , freeBusyResponseCalendars
468− , fbrcProperties
468+ , fbrcAddtional
469
469
470 -- ** ACL
470 -- ** ACL
471 , ACL
471 , ACL
gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types.hs+8−8
@@ -95,7 +95,7 @@ module Network.Google.AppsCalendar.Types
95 -- * ColorsEvent
95 -- * ColorsEvent
96 , ColorsEvent
96 , ColorsEvent
97 , colorsEvent
97 , colorsEvent
98− , ceProperties
98+ , ceAddtional
99
99
100 -- * Settings
100 -- * Settings
101 , Settings
101 , Settings
@@ -180,7 +180,7 @@ module Network.Google.AppsCalendar.Types
180 -- * FreeBusyResponseGroups
180 -- * FreeBusyResponseGroups
181 , FreeBusyResponseGroups
181 , FreeBusyResponseGroups
182 , freeBusyResponseGroups
182 , freeBusyResponseGroups
183− , fbrgProperties
183+ , fbrgAddtional
184
184
185 -- * EventReminders
185 -- * EventReminders
186 , EventReminders
186 , EventReminders
@@ -191,7 +191,7 @@ module Network.Google.AppsCalendar.Types
191 -- * ColorsCalendar
191 -- * ColorsCalendar
192 , ColorsCalendar
192 , ColorsCalendar
193 , colorsCalendar
193 , colorsCalendar
194− , ccProperties
194+ , ccAddtional
195
195
196 -- * CalendarNotification
196 -- * CalendarNotification
197 , CalendarNotification
197 , CalendarNotification
@@ -202,12 +202,12 @@ module Network.Google.AppsCalendar.Types
202 -- * EventExtendedPropertiesPrivate
202 -- * EventExtendedPropertiesPrivate
203 , EventExtendedPropertiesPrivate
203 , EventExtendedPropertiesPrivate
204 , eventExtendedPropertiesPrivate
204 , eventExtendedPropertiesPrivate
205− , eeppProperties
205+ , eeppAddtional
206
206
207 -- * ChannelParams
207 -- * ChannelParams
208 , ChannelParams
208 , ChannelParams
209 , channelParams
209 , channelParams
210− , cpProperties
210+ , cpAddtional
211
211
212 -- * Events
212 -- * Events
213 , Events
213 , Events
@@ -312,7 +312,7 @@ module Network.Google.AppsCalendar.Types
312 -- * EventGadgetPreferences
312 -- * EventGadgetPreferences
313 , EventGadgetPreferences
313 , EventGadgetPreferences
314 , eventGadgetPreferences
314 , eventGadgetPreferences
315− , egpProperties
315+ , egpAddtional
316
316
317 -- * FreeBusyRequest
317 -- * FreeBusyRequest
318 , FreeBusyRequest
318 , FreeBusyRequest
@@ -339,7 +339,7 @@ module Network.Google.AppsCalendar.Types
339 -- * EventExtendedPropertiesShared
339 -- * EventExtendedPropertiesShared
340 , EventExtendedPropertiesShared
340 , EventExtendedPropertiesShared
341 , eventExtendedPropertiesShared
341 , eventExtendedPropertiesShared
342− , eepsProperties
342+ , eepsAddtional
343
343
344 -- * CalendarListWatchMinAccessRole
344 -- * CalendarListWatchMinAccessRole
345 , CalendarListWatchMinAccessRole (..)
345 , CalendarListWatchMinAccessRole (..)
@@ -347,7 +347,7 @@ module Network.Google.AppsCalendar.Types
347 -- * FreeBusyResponseCalendars
347 -- * FreeBusyResponseCalendars
348 , FreeBusyResponseCalendars
348 , FreeBusyResponseCalendars
349 , freeBusyResponseCalendars
349 , freeBusyResponseCalendars
350− , fbrcProperties
350+ , fbrcAddtional
351
351
352 -- * ACL
352 -- * ACL
353 , ACL
353 , ACL
gogol-apps-calendar/gen/Network/Google/AppsCalendar/Types/Product.hs+76−77
@@ -873,26 +873,26 @@ instance ToJSON ACLRuleScope where
873--
873--
874-- /See:/ 'colorsEvent' smart constructor.
874-- /See:/ 'colorsEvent' smart constructor.
875newtype ColorsEvent = ColorsEvent
875newtype ColorsEvent = ColorsEvent
876− { _ceProperties :: HashMap Text ColorDefinition
876+ { _ceAddtional :: HashMap Text ColorDefinition
877 } deriving (Eq,Show,Data,Typeable,Generic)
877 } deriving (Eq,Show,Data,Typeable,Generic)
878
878
879-- | Creates a value of 'ColorsEvent' with the minimum fields required to make a request.
879-- | Creates a value of 'ColorsEvent' with the minimum fields required to make a request.
880--
880--
881-- Use one of the following lenses to modify other fields as desired:
881-- Use one of the following lenses to modify other fields as desired:
882--
882--
883−-- * 'ceProperties'
883+-- * 'ceAddtional'
884colorsEvent
884colorsEvent
885− :: HashMap Text ColorDefinition -- ^ 'properties'
885+ :: HashMap Text ColorDefinition -- ^ 'addtional'
886 -> ColorsEvent
886 -> ColorsEvent
887−colorsEvent pCeProperties_ =
887+colorsEvent pCeAddtional_ =
888 ColorsEvent
888 ColorsEvent
889− { _ceProperties = pCeProperties_
889+ { _ceAddtional = pCeAddtional_
890 }
890 }
891
891
892-- | An event color definition.
892-- | An event color definition.
893−ceProperties :: Lens' ColorsEvent (HashMap Text ColorDefinition)
893+ceAddtional :: Lens' ColorsEvent (HashMap Text ColorDefinition)
894−ceProperties
894+ceAddtional
895− = lens _ceProperties (\ s a -> s{_ceProperties = a})
895+ = lens _ceAddtional (\ s a -> s{_ceAddtional = a})
896
896
897instance FromJSON ColorsEvent where
897instance FromJSON ColorsEvent where
898 parseJSON
898 parseJSON
@@ -900,7 +900,7 @@ instance FromJSON ColorsEvent where
900 (\ o -> ColorsEvent <$> (parseJSONObject o))
900 (\ o -> ColorsEvent <$> (parseJSONObject o))
901
901
902instance ToJSON ColorsEvent where
902instance ToJSON ColorsEvent where
903− toJSON = toJSON . _ceProperties
903+ toJSON = toJSON . _ceAddtional
904
904
905--
905--
906-- /See:/ 'settings' smart constructor.
906-- /See:/ 'settings' smart constructor.
@@ -1556,27 +1556,27 @@ instance ToJSON Setting where
1556--
1556--
1557-- /See:/ 'freeBusyResponseGroups' smart constructor.
1557-- /See:/ 'freeBusyResponseGroups' smart constructor.
1558newtype FreeBusyResponseGroups = FreeBusyResponseGroups
1558newtype FreeBusyResponseGroups = FreeBusyResponseGroups
1559− { _fbrgProperties :: HashMap Text FreeBusyGroup
1559+ { _fbrgAddtional :: HashMap Text FreeBusyGroup
1560 } deriving (Eq,Show,Data,Typeable,Generic)
1560 } deriving (Eq,Show,Data,Typeable,Generic)
1561
1561
1562-- | Creates a value of 'FreeBusyResponseGroups' with the minimum fields required to make a request.
1562-- | Creates a value of 'FreeBusyResponseGroups' with the minimum fields required to make a request.
1563--
1563--
1564-- Use one of the following lenses to modify other fields as desired:
1564-- Use one of the following lenses to modify other fields as desired:
1565--
1565--
1566−-- * 'fbrgProperties'
1566+-- * 'fbrgAddtional'
1567freeBusyResponseGroups
1567freeBusyResponseGroups
1568− :: HashMap Text FreeBusyGroup -- ^ 'properties'
1568+ :: HashMap Text FreeBusyGroup -- ^ 'addtional'
1569 -> FreeBusyResponseGroups
1569 -> FreeBusyResponseGroups
1570−freeBusyResponseGroups pFbrgProperties_ =
1570+freeBusyResponseGroups pFbrgAddtional_ =
1571 FreeBusyResponseGroups
1571 FreeBusyResponseGroups
1572− { _fbrgProperties = pFbrgProperties_
1572+ { _fbrgAddtional = pFbrgAddtional_
1573 }
1573 }
1574
1574
1575-- | List of calendars that are members of this group.
1575-- | List of calendars that are members of this group.
1576−fbrgProperties :: Lens' FreeBusyResponseGroups (HashMap Text FreeBusyGroup)
1576+fbrgAddtional :: Lens' FreeBusyResponseGroups (HashMap Text FreeBusyGroup)
1577−fbrgProperties
1577+fbrgAddtional
1578− = lens _fbrgProperties
1578+ = lens _fbrgAddtional
1579− (\ s a -> s{_fbrgProperties = a})
1579+ (\ s a -> s{_fbrgAddtional = a})
1580
1580
1581instance FromJSON FreeBusyResponseGroups where
1581instance FromJSON FreeBusyResponseGroups where
1582 parseJSON
1582 parseJSON
@@ -1585,7 +1585,7 @@ instance FromJSON FreeBusyResponseGroups where
1585 FreeBusyResponseGroups <$> (parseJSONObject o))
1585 FreeBusyResponseGroups <$> (parseJSONObject o))
1586
1586
1587instance ToJSON FreeBusyResponseGroups where
1587instance ToJSON FreeBusyResponseGroups where
1588− toJSON = toJSON . _fbrgProperties
1588+ toJSON = toJSON . _fbrgAddtional
1589
1589
1590-- | Information about the event\'s reminders for the authenticated user.
1590-- | Information about the event\'s reminders for the authenticated user.
1591--
1591--
@@ -1646,26 +1646,26 @@ instance ToJSON EventReminders where
1646--
1646--
1647-- /See:/ 'colorsCalendar' smart constructor.
1647-- /See:/ 'colorsCalendar' smart constructor.
1648newtype ColorsCalendar = ColorsCalendar
1648newtype ColorsCalendar = ColorsCalendar
1649− { _ccProperties :: HashMap Text ColorDefinition
1649+ { _ccAddtional :: HashMap Text ColorDefinition
1650 } deriving (Eq,Show,Data,Typeable,Generic)
1650 } deriving (Eq,Show,Data,Typeable,Generic)
1651
1651
1652-- | Creates a value of 'ColorsCalendar' with the minimum fields required to make a request.
1652-- | Creates a value of 'ColorsCalendar' with the minimum fields required to make a request.
1653--
1653--
1654-- Use one of the following lenses to modify other fields as desired:
1654-- Use one of the following lenses to modify other fields as desired:
1655--
1655--
1656−-- * 'ccProperties'
1656+-- * 'ccAddtional'
1657colorsCalendar
1657colorsCalendar
1658− :: HashMap Text ColorDefinition -- ^ 'properties'
1658+ :: HashMap Text ColorDefinition -- ^ 'addtional'
1659 -> ColorsCalendar
1659 -> ColorsCalendar
1660−colorsCalendar pCcProperties_ =
1660+colorsCalendar pCcAddtional_ =
1661 ColorsCalendar
1661 ColorsCalendar
1662− { _ccProperties = pCcProperties_
1662+ { _ccAddtional = pCcAddtional_
1663 }
1663 }
1664
1664
1665-- | A calendar color defintion.
1665-- | A calendar color defintion.
1666−ccProperties :: Lens' ColorsCalendar (HashMap Text ColorDefinition)
1666+ccAddtional :: Lens' ColorsCalendar (HashMap Text ColorDefinition)
1667−ccProperties
1667+ccAddtional
1668− = lens _ccProperties (\ s a -> s{_ccProperties = a})
1668+ = lens _ccAddtional (\ s a -> s{_ccAddtional = a})
1669
1669
1670instance FromJSON ColorsCalendar where
1670instance FromJSON ColorsCalendar where
1671 parseJSON
1671 parseJSON
@@ -1673,7 +1673,7 @@ instance FromJSON ColorsCalendar where
1673 (\ o -> ColorsCalendar <$> (parseJSONObject o))
1673 (\ o -> ColorsCalendar <$> (parseJSONObject o))
1674
1674
1675instance ToJSON ColorsCalendar where
1675instance ToJSON ColorsCalendar where
1676− toJSON = toJSON . _ccProperties
1676+ toJSON = toJSON . _ccAddtional
1677
1677
1678--
1678--
1679-- /See:/ 'calendarNotification' smart constructor.
1679-- /See:/ 'calendarNotification' smart constructor.
@@ -1734,27 +1734,27 @@ instance ToJSON CalendarNotification where
1734--
1734--
1735-- /See:/ 'eventExtendedPropertiesPrivate' smart constructor.
1735-- /See:/ 'eventExtendedPropertiesPrivate' smart constructor.
1736newtype EventExtendedPropertiesPrivate = EventExtendedPropertiesPrivate
1736newtype EventExtendedPropertiesPrivate = EventExtendedPropertiesPrivate
1737− { _eeppProperties :: HashMap Text Text
1737+ { _eeppAddtional :: HashMap Text Text
1738 } deriving (Eq,Show,Data,Typeable,Generic)
1738 } deriving (Eq,Show,Data,Typeable,Generic)
1739
1739
1740-- | Creates a value of 'EventExtendedPropertiesPrivate' with the minimum fields required to make a request.
1740-- | Creates a value of 'EventExtendedPropertiesPrivate' with the minimum fields required to make a request.
1741--
1741--
1742-- Use one of the following lenses to modify other fields as desired:
1742-- Use one of the following lenses to modify other fields as desired:
1743--
1743--
1744−-- * 'eeppProperties'
1744+-- * 'eeppAddtional'
1745eventExtendedPropertiesPrivate
1745eventExtendedPropertiesPrivate
1746− :: HashMap Text Text -- ^ 'properties'
1746+ :: HashMap Text Text -- ^ 'addtional'
1747 -> EventExtendedPropertiesPrivate
1747 -> EventExtendedPropertiesPrivate
1748−eventExtendedPropertiesPrivate pEeppProperties_ =
1748+eventExtendedPropertiesPrivate pEeppAddtional_ =
1749 EventExtendedPropertiesPrivate
1749 EventExtendedPropertiesPrivate
1750− { _eeppProperties = pEeppProperties_
1750+ { _eeppAddtional = pEeppAddtional_
1751 }
1751 }
1752
1752
1753-- | The name of the private property and the corresponding value.
1753-- | The name of the private property and the corresponding value.
1754−eeppProperties :: Lens' EventExtendedPropertiesPrivate (HashMap Text Text)
1754+eeppAddtional :: Lens' EventExtendedPropertiesPrivate (HashMap Text Text)
1755−eeppProperties
1755+eeppAddtional
1756− = lens _eeppProperties
1756+ = lens _eeppAddtional
1757− (\ s a -> s{_eeppProperties = a})
1757+ (\ s a -> s{_eeppAddtional = a})
1758
1758
1759instance FromJSON EventExtendedPropertiesPrivate
1759instance FromJSON EventExtendedPropertiesPrivate
1760 where
1760 where
@@ -1765,32 +1765,32 @@ instance FromJSON EventExtendedPropertiesPrivate
1765 (parseJSONObject o))
1765 (parseJSONObject o))
1766
1766
1767instance ToJSON EventExtendedPropertiesPrivate where
1767instance ToJSON EventExtendedPropertiesPrivate where
1768− toJSON = toJSON . _eeppProperties
1768+ toJSON = toJSON . _eeppAddtional
1769
1769
1770-- | Additional parameters controlling delivery channel behavior. Optional.
1770-- | Additional parameters controlling delivery channel behavior. Optional.
1771--
1771--
1772-- /See:/ 'channelParams' smart constructor.
1772-- /See:/ 'channelParams' smart constructor.
1773newtype ChannelParams = ChannelParams
1773newtype ChannelParams = ChannelParams
1774− { _cpProperties :: HashMap Text Text
1774+ { _cpAddtional :: HashMap Text Text
1775 } deriving (Eq,Show,Data,Typeable,Generic)
1775 } deriving (Eq,Show,Data,Typeable,Generic)
1776
1776
1777-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
1777-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
1778--
1778--
1779-- Use one of the following lenses to modify other fields as desired:
1779-- Use one of the following lenses to modify other fields as desired:
1780--
1780--
1781−-- * 'cpProperties'
1781+-- * 'cpAddtional'
1782channelParams
1782channelParams
1783− :: HashMap Text Text -- ^ 'properties'
1783+ :: HashMap Text Text -- ^ 'addtional'
1784 -> ChannelParams
1784 -> ChannelParams
1785−channelParams pCpProperties_ =
1785+channelParams pCpAddtional_ =
1786 ChannelParams
1786 ChannelParams
1787− { _cpProperties = pCpProperties_
1787+ { _cpAddtional = pCpAddtional_
1788 }
1788 }
1789
1789
1790-- | Declares a new parameter by name.
1790-- | Declares a new parameter by name.
1791−cpProperties :: Lens' ChannelParams (HashMap Text Text)
1791+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
1792−cpProperties
1792+cpAddtional
1793− = lens _cpProperties (\ s a -> s{_cpProperties = a})
1793+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
1794
1794
1795instance FromJSON ChannelParams where
1795instance FromJSON ChannelParams where
1796 parseJSON
1796 parseJSON
@@ -1798,7 +1798,7 @@ instance FromJSON ChannelParams where
1798 (\ o -> ChannelParams <$> (parseJSONObject o))
1798 (\ o -> ChannelParams <$> (parseJSONObject o))
1799
1799
1800instance ToJSON ChannelParams where
1800instance ToJSON ChannelParams where
1801− toJSON = toJSON . _cpProperties
1801+ toJSON = toJSON . _cpAddtional
1802
1802
1803--
1803--
1804-- /See:/ 'events' smart constructor.
1804-- /See:/ 'events' smart constructor.
@@ -2724,27 +2724,26 @@ instance ToJSON EventGadget where
2724--
2724--
2725-- /See:/ 'eventGadgetPreferences' smart constructor.
2725-- /See:/ 'eventGadgetPreferences' smart constructor.
2726newtype EventGadgetPreferences = EventGadgetPreferences
2726newtype EventGadgetPreferences = EventGadgetPreferences
2727− { _egpProperties :: HashMap Text Text
2727+ { _egpAddtional :: HashMap Text Text
2728 } deriving (Eq,Show,Data,Typeable,Generic)
2728 } deriving (Eq,Show,Data,Typeable,Generic)
2729
2729
2730-- | Creates a value of 'EventGadgetPreferences' with the minimum fields required to make a request.
2730-- | Creates a value of 'EventGadgetPreferences' with the minimum fields required to make a request.
2731--
2731--
2732-- Use one of the following lenses to modify other fields as desired:
2732-- Use one of the following lenses to modify other fields as desired:
2733--
2733--
2734−-- * 'egpProperties'
2734+-- * 'egpAddtional'
2735eventGadgetPreferences
2735eventGadgetPreferences
2736− :: HashMap Text Text -- ^ 'properties'
2736+ :: HashMap Text Text -- ^ 'addtional'
2737 -> EventGadgetPreferences
2737 -> EventGadgetPreferences
2738−eventGadgetPreferences pEgpProperties_ =
2738+eventGadgetPreferences pEgpAddtional_ =
2739 EventGadgetPreferences
2739 EventGadgetPreferences
2740− { _egpProperties = pEgpProperties_
2740+ { _egpAddtional = pEgpAddtional_
2741 }
2741 }
2742
2742
2743-- | The preference name and corresponding value.
2743-- | The preference name and corresponding value.
2744−egpProperties :: Lens' EventGadgetPreferences (HashMap Text Text)
2744+egpAddtional :: Lens' EventGadgetPreferences (HashMap Text Text)
2745−egpProperties
2745+egpAddtional
2746− = lens _egpProperties
2746+ = lens _egpAddtional (\ s a -> s{_egpAddtional = a})
2747− (\ s a -> s{_egpProperties = a})
2748
2747
2749instance FromJSON EventGadgetPreferences where
2748instance FromJSON EventGadgetPreferences where
2750 parseJSON
2749 parseJSON
@@ -2753,7 +2752,7 @@ instance FromJSON EventGadgetPreferences where
2753 EventGadgetPreferences <$> (parseJSONObject o))
2752 EventGadgetPreferences <$> (parseJSONObject o))
2754
2753
2755instance ToJSON EventGadgetPreferences where
2754instance ToJSON EventGadgetPreferences where
2756− toJSON = toJSON . _egpProperties
2755+ toJSON = toJSON . _egpAddtional
2757
2756
2758--
2757--
2759-- /See:/ 'freeBusyRequest' smart constructor.
2758-- /See:/ 'freeBusyRequest' smart constructor.
@@ -2940,27 +2939,27 @@ instance ToJSON ACLRule where
2940--
2939--
2941-- /See:/ 'eventExtendedPropertiesShared' smart constructor.
2940-- /See:/ 'eventExtendedPropertiesShared' smart constructor.
2942newtype EventExtendedPropertiesShared = EventExtendedPropertiesShared
2941newtype EventExtendedPropertiesShared = EventExtendedPropertiesShared
2943− { _eepsProperties :: HashMap Text Text
2942+ { _eepsAddtional :: HashMap Text Text
2944 } deriving (Eq,Show,Data,Typeable,Generic)
2943 } deriving (Eq,Show,Data,Typeable,Generic)
2945
2944
2946-- | Creates a value of 'EventExtendedPropertiesShared' with the minimum fields required to make a request.
2945-- | Creates a value of 'EventExtendedPropertiesShared' with the minimum fields required to make a request.
2947--
2946--
2948-- Use one of the following lenses to modify other fields as desired:
2947-- Use one of the following lenses to modify other fields as desired:
2949--
2948--
2950−-- * 'eepsProperties'
2949+-- * 'eepsAddtional'
2951eventExtendedPropertiesShared
2950eventExtendedPropertiesShared
2952− :: HashMap Text Text -- ^ 'properties'
2951+ :: HashMap Text Text -- ^ 'addtional'
2953 -> EventExtendedPropertiesShared
2952 -> EventExtendedPropertiesShared
2954−eventExtendedPropertiesShared pEepsProperties_ =
2953+eventExtendedPropertiesShared pEepsAddtional_ =
2955 EventExtendedPropertiesShared
2954 EventExtendedPropertiesShared
2956− { _eepsProperties = pEepsProperties_
2955+ { _eepsAddtional = pEepsAddtional_
2957 }
2956 }
2958
2957
2959-- | The name of the shared property and the corresponding value.
2958-- | The name of the shared property and the corresponding value.
2960−eepsProperties :: Lens' EventExtendedPropertiesShared (HashMap Text Text)
2959+eepsAddtional :: Lens' EventExtendedPropertiesShared (HashMap Text Text)
2961−eepsProperties
2960+eepsAddtional
2962− = lens _eepsProperties
2961+ = lens _eepsAddtional
2963− (\ s a -> s{_eepsProperties = a})
2962+ (\ s a -> s{_eepsAddtional = a})
2964
2963
2965instance FromJSON EventExtendedPropertiesShared where
2964instance FromJSON EventExtendedPropertiesShared where
2966 parseJSON
2965 parseJSON
@@ -2970,33 +2969,33 @@ instance FromJSON EventExtendedPropertiesShared where
2970 (parseJSONObject o))
2969 (parseJSONObject o))
2971
2970
2972instance ToJSON EventExtendedPropertiesShared where
2971instance ToJSON EventExtendedPropertiesShared where
2973− toJSON = toJSON . _eepsProperties
2972+ toJSON = toJSON . _eepsAddtional
2974
2973
2975-- | List of free\/busy information for calendars.
2974-- | List of free\/busy information for calendars.
2976--
2975--
2977-- /See:/ 'freeBusyResponseCalendars' smart constructor.
2976-- /See:/ 'freeBusyResponseCalendars' smart constructor.
2978newtype FreeBusyResponseCalendars = FreeBusyResponseCalendars
2977newtype FreeBusyResponseCalendars = FreeBusyResponseCalendars
2979− { _fbrcProperties :: HashMap Text FreeBusyCalendar
2978+ { _fbrcAddtional :: HashMap Text FreeBusyCalendar
2980 } deriving (Eq,Show,Data,Typeable,Generic)
2979 } deriving (Eq,Show,Data,Typeable,Generic)
2981
2980
2982-- | Creates a value of 'FreeBusyResponseCalendars' with the minimum fields required to make a request.
2981-- | Creates a value of 'FreeBusyResponseCalendars' with the minimum fields required to make a request.
2983--
2982--
2984-- Use one of the following lenses to modify other fields as desired:
2983-- Use one of the following lenses to modify other fields as desired:
2985--
2984--
2986−-- * 'fbrcProperties'
2985+-- * 'fbrcAddtional'
2987freeBusyResponseCalendars
2986freeBusyResponseCalendars
2988− :: HashMap Text FreeBusyCalendar -- ^ 'properties'
2987+ :: HashMap Text FreeBusyCalendar -- ^ 'addtional'
2989 -> FreeBusyResponseCalendars
2988 -> FreeBusyResponseCalendars
2990−freeBusyResponseCalendars pFbrcProperties_ =
2989+freeBusyResponseCalendars pFbrcAddtional_ =
2991 FreeBusyResponseCalendars
2990 FreeBusyResponseCalendars
2992− { _fbrcProperties = pFbrcProperties_
2991+ { _fbrcAddtional = pFbrcAddtional_
2993 }
2992 }
2994
2993
2995-- | Free\/busy expansions for a single calendar.
2994-- | Free\/busy expansions for a single calendar.
2996−fbrcProperties :: Lens' FreeBusyResponseCalendars (HashMap Text FreeBusyCalendar)
2995+fbrcAddtional :: Lens' FreeBusyResponseCalendars (HashMap Text FreeBusyCalendar)
2997−fbrcProperties
2996+fbrcAddtional
2998− = lens _fbrcProperties
2997+ = lens _fbrcAddtional
2999− (\ s a -> s{_fbrcProperties = a})
2998+ (\ s a -> s{_fbrcAddtional = a})
3000
2999
3001instance FromJSON FreeBusyResponseCalendars where
3000instance FromJSON FreeBusyResponseCalendars where
3002 parseJSON
3001 parseJSON
@@ -3005,7 +3004,7 @@ instance FromJSON FreeBusyResponseCalendars where
3005 FreeBusyResponseCalendars <$> (parseJSONObject o))
3004 FreeBusyResponseCalendars <$> (parseJSONObject o))
3006
3005
3007instance ToJSON FreeBusyResponseCalendars where
3006instance ToJSON FreeBusyResponseCalendars where
3008− toJSON = toJSON . _fbrcProperties
3007+ toJSON = toJSON . _fbrcAddtional
3009
3008
3010--
3009--
3011-- /See:/ 'acl' smart constructor.
3010-- /See:/ 'acl' smart constructor.
gogol-bigquery/gen/Network/Google/BigQuery.hs+2−2
@@ -383,7 +383,7 @@ module Network.Google.BigQuery
383 -- ** JSONObject
383 -- ** JSONObject
384 , JSONObject
384 , JSONObject
385 , jsonObject
385 , jsonObject
386− , joProperties
386+ , joAddtional
387
387
388 -- ** JobConfigurationQuery
388 -- ** JobConfigurationQuery
389 , JobConfigurationQuery
389 , JobConfigurationQuery
@@ -418,7 +418,7 @@ module Network.Google.BigQuery
418 -- ** JobConfigurationQueryTableDefinitions
418 -- ** JobConfigurationQueryTableDefinitions
419 , JobConfigurationQueryTableDefinitions
419 , JobConfigurationQueryTableDefinitions
420 , jobConfigurationQueryTableDefinitions
420 , jobConfigurationQueryTableDefinitions
421− , jcqtdProperties
421+ , jcqtdAddtional
422
422
423 -- ** TableCell
423 -- ** TableCell
424 , TableCell
424 , TableCell
gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+2−2
@@ -313,7 +313,7 @@ module Network.Google.BigQuery.Types
313 -- * JSONObject
313 -- * JSONObject
314 , JSONObject
314 , JSONObject
315 , jsonObject
315 , jsonObject
316− , joProperties
316+ , joAddtional
317
317
318 -- * JobConfigurationQuery
318 -- * JobConfigurationQuery
319 , JobConfigurationQuery
319 , JobConfigurationQuery
@@ -348,7 +348,7 @@ module Network.Google.BigQuery.Types
348 -- * JobConfigurationQueryTableDefinitions
348 -- * JobConfigurationQueryTableDefinitions
349 , JobConfigurationQueryTableDefinitions
349 , JobConfigurationQueryTableDefinitions
350 , jobConfigurationQueryTableDefinitions
350 , jobConfigurationQueryTableDefinitions
351− , jcqtdProperties
351+ , jcqtdAddtional
352
352
353 -- * TableCell
353 -- * TableCell
354 , TableCell
354 , TableCell
gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+19−19
@@ -2831,25 +2831,25 @@ instance ToJSON JobCancelResponse where
2831--
2831--
2832-- /See:/ 'jsonObject' smart constructor.
2832-- /See:/ 'jsonObject' smart constructor.
2833newtype JSONObject = JSONObject
2833newtype JSONObject = JSONObject
2834− { _joProperties :: HashMap Text JSONValue
2834+ { _joAddtional :: HashMap Text JSONValue
2835 } deriving (Eq,Show,Data,Typeable,Generic)
2835 } deriving (Eq,Show,Data,Typeable,Generic)
2836
2836
2837-- | Creates a value of 'JSONObject' with the minimum fields required to make a request.
2837-- | Creates a value of 'JSONObject' with the minimum fields required to make a request.
2838--
2838--
2839-- Use one of the following lenses to modify other fields as desired:
2839-- Use one of the following lenses to modify other fields as desired:
2840--
2840--
2841−-- * 'joProperties'
2841+-- * 'joAddtional'
2842jsonObject
2842jsonObject
2843− :: HashMap Text JSONValue -- ^ 'properties'
2843+ :: HashMap Text JSONValue -- ^ 'addtional'
2844 -> JSONObject
2844 -> JSONObject
2845−jsonObject pJoProperties_ =
2845+jsonObject pJoAddtional_ =
2846 JSONObject
2846 JSONObject
2847− { _joProperties = pJoProperties_
2847+ { _joAddtional = pJoAddtional_
2848 }
2848 }
2849
2849
2850−joProperties :: Lens' JSONObject (HashMap Text JSONValue)
2850+joAddtional :: Lens' JSONObject (HashMap Text JSONValue)
2851−joProperties
2851+joAddtional
2852− = lens _joProperties (\ s a -> s{_joProperties = a})
2852+ = lens _joAddtional (\ s a -> s{_joAddtional = a})
2853
2853
2854instance FromJSON JSONObject where
2854instance FromJSON JSONObject where
2855 parseJSON
2855 parseJSON
@@ -2857,7 +2857,7 @@ instance FromJSON JSONObject where
2857 (\ o -> JSONObject <$> (parseJSONObject o))
2857 (\ o -> JSONObject <$> (parseJSONObject o))
2858
2858
2859instance ToJSON JSONObject where
2859instance ToJSON JSONObject where
2860− toJSON = toJSON . _joProperties
2860+ toJSON = toJSON . _joAddtional
2861
2861
2862--
2862--
2863-- /See:/ 'jobConfigurationQuery' smart constructor.
2863-- /See:/ 'jobConfigurationQuery' smart constructor.
@@ -3180,26 +3180,26 @@ instance ToJSON JobList where
3180--
3180--
3181-- /See:/ 'jobConfigurationQueryTableDefinitions' smart constructor.
3181-- /See:/ 'jobConfigurationQueryTableDefinitions' smart constructor.
3182newtype JobConfigurationQueryTableDefinitions = JobConfigurationQueryTableDefinitions
3182newtype JobConfigurationQueryTableDefinitions = JobConfigurationQueryTableDefinitions
3183− { _jcqtdProperties :: HashMap Text ExternalDataConfiguration
3183+ { _jcqtdAddtional :: HashMap Text ExternalDataConfiguration
3184 } deriving (Eq,Show,Data,Typeable,Generic)
3184 } deriving (Eq,Show,Data,Typeable,Generic)
3185
3185
3186-- | Creates a value of 'JobConfigurationQueryTableDefinitions' with the minimum fields required to make a request.
3186-- | Creates a value of 'JobConfigurationQueryTableDefinitions' with the minimum fields required to make a request.
3187--
3187--
3188-- Use one of the following lenses to modify other fields as desired:
3188-- Use one of the following lenses to modify other fields as desired:
3189--
3189--
3190−-- * 'jcqtdProperties'
3190+-- * 'jcqtdAddtional'
3191jobConfigurationQueryTableDefinitions
3191jobConfigurationQueryTableDefinitions
3192− :: HashMap Text ExternalDataConfiguration -- ^ 'properties'
3192+ :: HashMap Text ExternalDataConfiguration -- ^ 'addtional'
3193 -> JobConfigurationQueryTableDefinitions
3193 -> JobConfigurationQueryTableDefinitions
3194−jobConfigurationQueryTableDefinitions pJcqtdProperties_ =
3194+jobConfigurationQueryTableDefinitions pJcqtdAddtional_ =
3195 JobConfigurationQueryTableDefinitions
3195 JobConfigurationQueryTableDefinitions
3196− { _jcqtdProperties = pJcqtdProperties_
3196+ { _jcqtdAddtional = pJcqtdAddtional_
3197 }
3197 }
3198
3198
3199−jcqtdProperties :: Lens' JobConfigurationQueryTableDefinitions (HashMap Text ExternalDataConfiguration)
3199+jcqtdAddtional :: Lens' JobConfigurationQueryTableDefinitions (HashMap Text ExternalDataConfiguration)
3200−jcqtdProperties
3200+jcqtdAddtional
3201− = lens _jcqtdProperties
3201+ = lens _jcqtdAddtional
3202− (\ s a -> s{_jcqtdProperties = a})
3202+ (\ s a -> s{_jcqtdAddtional = a})
3203
3203
3204instance FromJSON
3204instance FromJSON
3205 JobConfigurationQueryTableDefinitions where
3205 JobConfigurationQueryTableDefinitions where
@@ -3211,7 +3211,7 @@ instance FromJSON
3211
3211
3212instance ToJSON JobConfigurationQueryTableDefinitions
3212instance ToJSON JobConfigurationQueryTableDefinitions
3213 where
3213 where
3214− toJSON = toJSON . _jcqtdProperties
3214+ toJSON = toJSON . _jcqtdAddtional
3215
3215
3216--
3216--
3217-- /See:/ 'tableCell' smart constructor.
3217-- /See:/ 'tableCell' smart constructor.
gogol-civicinfo/gen/Network/Google/CivicInfo.hs+2−2
@@ -43,7 +43,7 @@ module Network.Google.CivicInfo
43 -- ** RepresentativeInfoResponseDivisions
43 -- ** RepresentativeInfoResponseDivisions
44 , RepresentativeInfoResponseDivisions
44 , RepresentativeInfoResponseDivisions
45 , representativeInfoResponseDivisions
45 , representativeInfoResponseDivisions
46− , rirdProperties
46+ , rirdAddtional
47
47
48 -- ** VoterInfoResponse
48 -- ** VoterInfoResponse
49 , VoterInfoResponse
49 , VoterInfoResponse
@@ -195,7 +195,7 @@ module Network.Google.CivicInfo
195 -- ** RepresentativeInfoDataDivisions
195 -- ** RepresentativeInfoDataDivisions
196 , RepresentativeInfoDataDivisions
196 , RepresentativeInfoDataDivisions
197 , representativeInfoDataDivisions
197 , representativeInfoDataDivisions
198− , riddProperties
198+ , riddAddtional
199
199
200 -- ** RepresentativesRepresentativeInfoByAddressRoles
200 -- ** RepresentativesRepresentativeInfoByAddressRoles
201 , RepresentativesRepresentativeInfoByAddressRoles (..)
201 , RepresentativesRepresentativeInfoByAddressRoles (..)
gogol-civicinfo/gen/Network/Google/CivicInfo/Types.hs+2−2
@@ -21,7 +21,7 @@ module Network.Google.CivicInfo.Types
21 -- * RepresentativeInfoResponseDivisions
21 -- * RepresentativeInfoResponseDivisions
22 , RepresentativeInfoResponseDivisions
22 , RepresentativeInfoResponseDivisions
23 , representativeInfoResponseDivisions
23 , representativeInfoResponseDivisions
24− , rirdProperties
24+ , rirdAddtional
25
25
26 -- * VoterInfoResponse
26 -- * VoterInfoResponse
27 , VoterInfoResponse
27 , VoterInfoResponse
@@ -173,7 +173,7 @@ module Network.Google.CivicInfo.Types
173 -- * RepresentativeInfoDataDivisions
173 -- * RepresentativeInfoDataDivisions
174 , RepresentativeInfoDataDivisions
174 , RepresentativeInfoDataDivisions
175 , representativeInfoDataDivisions
175 , representativeInfoDataDivisions
176− , riddProperties
176+ , riddAddtional
177
177
178 -- * RepresentativesRepresentativeInfoByAddressRoles
178 -- * RepresentativesRepresentativeInfoByAddressRoles
179 , RepresentativesRepresentativeInfoByAddressRoles (..)
179 , RepresentativesRepresentativeInfoByAddressRoles (..)
gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+20−20
@@ -24,27 +24,27 @@ import Network.Google.Prelude
24--
24--
25-- /See:/ 'representativeInfoResponseDivisions' smart constructor.
25-- /See:/ 'representativeInfoResponseDivisions' smart constructor.
26newtype RepresentativeInfoResponseDivisions = RepresentativeInfoResponseDivisions
26newtype RepresentativeInfoResponseDivisions = RepresentativeInfoResponseDivisions
27− { _rirdProperties :: HashMap Text GeographicDivision
27+ { _rirdAddtional :: HashMap Text GeographicDivision
28 } deriving (Eq,Show,Data,Typeable,Generic)
28 } deriving (Eq,Show,Data,Typeable,Generic)
29
29
30-- | Creates a value of 'RepresentativeInfoResponseDivisions' with the minimum fields required to make a request.
30-- | Creates a value of 'RepresentativeInfoResponseDivisions' with the minimum fields required to make a request.
31--
31--
32-- Use one of the following lenses to modify other fields as desired:
32-- Use one of the following lenses to modify other fields as desired:
33--
33--
34−-- * 'rirdProperties'
34+-- * 'rirdAddtional'
35representativeInfoResponseDivisions
35representativeInfoResponseDivisions
36− :: HashMap Text GeographicDivision -- ^ 'properties'
36+ :: HashMap Text GeographicDivision -- ^ 'addtional'
37 -> RepresentativeInfoResponseDivisions
37 -> RepresentativeInfoResponseDivisions
38−representativeInfoResponseDivisions pRirdProperties_ =
38+representativeInfoResponseDivisions pRirdAddtional_ =
39 RepresentativeInfoResponseDivisions
39 RepresentativeInfoResponseDivisions
40− { _rirdProperties = pRirdProperties_
40+ { _rirdAddtional = pRirdAddtional_
41 }
41 }
42
42
43-- | The unique Open Civic Data identifier for this division.
43-- | The unique Open Civic Data identifier for this division.
44−rirdProperties :: Lens' RepresentativeInfoResponseDivisions (HashMap Text GeographicDivision)
44+rirdAddtional :: Lens' RepresentativeInfoResponseDivisions (HashMap Text GeographicDivision)
45−rirdProperties
45+rirdAddtional
46− = lens _rirdProperties
46+ = lens _rirdAddtional
47− (\ s a -> s{_rirdProperties = a})
47+ (\ s a -> s{_rirdAddtional = a})
48
48
49instance FromJSON RepresentativeInfoResponseDivisions
49instance FromJSON RepresentativeInfoResponseDivisions
50 where
50 where
@@ -56,7 +56,7 @@ instance FromJSON RepresentativeInfoResponseDivisions
56
56
57instance ToJSON RepresentativeInfoResponseDivisions
57instance ToJSON RepresentativeInfoResponseDivisions
58 where
58 where
59− toJSON = toJSON . _rirdProperties
59+ toJSON = toJSON . _rirdAddtional
60
60
61-- | The result of a voter info lookup query.
61-- | The result of a voter info lookup query.
62--
62--
@@ -1520,27 +1520,27 @@ instance ToJSON DivisionSearchResponse where
1520--
1520--
1521-- /See:/ 'representativeInfoDataDivisions' smart constructor.
1521-- /See:/ 'representativeInfoDataDivisions' smart constructor.
1522newtype RepresentativeInfoDataDivisions = RepresentativeInfoDataDivisions
1522newtype RepresentativeInfoDataDivisions = RepresentativeInfoDataDivisions
1523− { _riddProperties :: HashMap Text GeographicDivision
1523+ { _riddAddtional :: HashMap Text GeographicDivision
1524 } deriving (Eq,Show,Data,Typeable,Generic)
1524 } deriving (Eq,Show,Data,Typeable,Generic)
1525
1525
1526-- | Creates a value of 'RepresentativeInfoDataDivisions' with the minimum fields required to make a request.
1526-- | Creates a value of 'RepresentativeInfoDataDivisions' with the minimum fields required to make a request.
1527--
1527--
1528-- Use one of the following lenses to modify other fields as desired:
1528-- Use one of the following lenses to modify other fields as desired:
1529--
1529--
1530−-- * 'riddProperties'
1530+-- * 'riddAddtional'
1531representativeInfoDataDivisions
1531representativeInfoDataDivisions
1532− :: HashMap Text GeographicDivision -- ^ 'properties'
1532+ :: HashMap Text GeographicDivision -- ^ 'addtional'
1533 -> RepresentativeInfoDataDivisions
1533 -> RepresentativeInfoDataDivisions
1534−representativeInfoDataDivisions pRiddProperties_ =
1534+representativeInfoDataDivisions pRiddAddtional_ =
1535 RepresentativeInfoDataDivisions
1535 RepresentativeInfoDataDivisions
1536− { _riddProperties = pRiddProperties_
1536+ { _riddAddtional = pRiddAddtional_
1537 }
1537 }
1538
1538
1539-- | The unique Open Civic Data identifier for this division.
1539-- | The unique Open Civic Data identifier for this division.
1540−riddProperties :: Lens' RepresentativeInfoDataDivisions (HashMap Text GeographicDivision)
1540+riddAddtional :: Lens' RepresentativeInfoDataDivisions (HashMap Text GeographicDivision)
1541−riddProperties
1541+riddAddtional
1542− = lens _riddProperties
1542+ = lens _riddAddtional
1543− (\ s a -> s{_riddProperties = a})
1543+ (\ s a -> s{_riddAddtional = a})
1544
1544
1545instance FromJSON RepresentativeInfoDataDivisions
1545instance FromJSON RepresentativeInfoDataDivisions
1546 where
1546 where
@@ -1551,7 +1551,7 @@ instance FromJSON RepresentativeInfoDataDivisions
1551 (parseJSONObject o))
1551 (parseJSONObject o))
1552
1552
1553instance ToJSON RepresentativeInfoDataDivisions where
1553instance ToJSON RepresentativeInfoDataDivisions where
1554− toJSON = toJSON . _riddProperties
1554+ toJSON = toJSON . _riddAddtional
1555
1555
1556-- | Information about individual election officials.
1556-- | Information about individual election officials.
1557--
1557--
gogol-compute/gen/Network/Google/Compute.hs+14−14
@@ -573,12 +573,12 @@ module Network.Google.Compute
573 -- ** MachineTypeAggregatedListItems
573 -- ** MachineTypeAggregatedListItems
574 , MachineTypeAggregatedListItems
574 , MachineTypeAggregatedListItems
575 , machineTypeAggregatedListItems
575 , machineTypeAggregatedListItems
576− , mtaliProperties
576+ , mtaliAddtional
577
577
578 -- ** DiskTypeAggregatedListItems
578 -- ** DiskTypeAggregatedListItems
579 , DiskTypeAggregatedListItems
579 , DiskTypeAggregatedListItems
580 , diskTypeAggregatedListItems
580 , diskTypeAggregatedListItems
581− , dtaliProperties
581+ , dtaliAddtional
582
582
583 -- ** FirewallList
583 -- ** FirewallList
584 , FirewallList
584 , FirewallList
@@ -608,7 +608,7 @@ module Network.Google.Compute
608 -- ** AutoscalerAggregatedListItems
608 -- ** AutoscalerAggregatedListItems
609 , AutoscalerAggregatedListItems
609 , AutoscalerAggregatedListItems
610 , autoscalerAggregatedListItems
610 , autoscalerAggregatedListItems
611− , aaliProperties
611+ , aaliAddtional
612
612
613 -- ** InstanceGroupManagersSetInstanceTemplateRequest
613 -- ** InstanceGroupManagersSetInstanceTemplateRequest
614 , InstanceGroupManagersSetInstanceTemplateRequest
614 , InstanceGroupManagersSetInstanceTemplateRequest
@@ -752,7 +752,7 @@ module Network.Google.Compute
752 -- ** InstanceGroupAggregatedListItems
752 -- ** InstanceGroupAggregatedListItems
753 , InstanceGroupAggregatedListItems
753 , InstanceGroupAggregatedListItems
754 , instanceGroupAggregatedListItems
754 , instanceGroupAggregatedListItems
755− , igaliProperties
755+ , igaliAddtional
756
756
757 -- ** TargetPoolList
757 -- ** TargetPoolList
758 , TargetPoolList
758 , TargetPoolList
@@ -1098,7 +1098,7 @@ module Network.Google.Compute
1098 -- ** InstanceAggregatedListItems
1098 -- ** InstanceAggregatedListItems
1099 , InstanceAggregatedListItems
1099 , InstanceAggregatedListItems
1100 , instanceAggregatedListItems
1100 , instanceAggregatedListItems
1101− , ialiProperties
1101+ , ialiAddtional
1102
1102
1103 -- ** AutoscalersScopedListWarning
1103 -- ** AutoscalersScopedListWarning
1104 , AutoscalersScopedListWarning
1104 , AutoscalersScopedListWarning
@@ -1343,7 +1343,7 @@ module Network.Google.Compute
1343 -- ** TargetInstanceAggregatedListItems
1343 -- ** TargetInstanceAggregatedListItems
1344 , TargetInstanceAggregatedListItems
1344 , TargetInstanceAggregatedListItems
1345 , targetInstanceAggregatedListItems
1345 , targetInstanceAggregatedListItems
1346− , tialiProperties
1346+ , tialiAddtional
1347
1347
1348 -- ** InstanceGroupAggregatedList
1348 -- ** InstanceGroupAggregatedList
1349 , InstanceGroupAggregatedList
1349 , InstanceGroupAggregatedList
@@ -1447,7 +1447,7 @@ module Network.Google.Compute
1447 -- ** DiskAggregatedListItems
1447 -- ** DiskAggregatedListItems
1448 , DiskAggregatedListItems
1448 , DiskAggregatedListItems
1449 , diskAggregatedListItems
1449 , diskAggregatedListItems
1450− , daliProperties
1450+ , daliAddtional
1451
1451
1452 -- ** UsageExportLocation
1452 -- ** UsageExportLocation
1453 , UsageExportLocation
1453 , UsageExportLocation
@@ -1479,7 +1479,7 @@ module Network.Google.Compute
1479 -- ** InstanceGroupManagerAggregatedListItems
1479 -- ** InstanceGroupManagerAggregatedListItems
1480 , InstanceGroupManagerAggregatedListItems
1480 , InstanceGroupManagerAggregatedListItems
1481 , instanceGroupManagerAggregatedListItems
1481 , instanceGroupManagerAggregatedListItems
1482− , igmaliProperties
1482+ , igmaliAddtional
1483
1483
1484 -- ** InstanceGroupManagersDeleteInstancesRequest
1484 -- ** InstanceGroupManagersDeleteInstancesRequest
1485 , InstanceGroupManagersDeleteInstancesRequest
1485 , InstanceGroupManagersDeleteInstancesRequest
@@ -1516,12 +1516,12 @@ module Network.Google.Compute
1516 -- ** ForwardingRuleAggregatedListItems
1516 -- ** ForwardingRuleAggregatedListItems
1517 , ForwardingRuleAggregatedListItems
1517 , ForwardingRuleAggregatedListItems
1518 , forwardingRuleAggregatedListItems
1518 , forwardingRuleAggregatedListItems
1519− , fraliProperties
1519+ , fraliAddtional
1520
1520
1521 -- ** OperationAggregatedListItems
1521 -- ** OperationAggregatedListItems
1522 , OperationAggregatedListItems
1522 , OperationAggregatedListItems
1523 , operationAggregatedListItems
1523 , operationAggregatedListItems
1524− , oaliProperties
1524+ , oaliAddtional
1525
1525
1526 -- ** InstanceGroupManagerActionsSummary
1526 -- ** InstanceGroupManagerActionsSummary
1527 , InstanceGroupManagerActionsSummary
1527 , InstanceGroupManagerActionsSummary
@@ -1563,7 +1563,7 @@ module Network.Google.Compute
1563 -- ** TargetPoolAggregatedListItems
1563 -- ** TargetPoolAggregatedListItems
1564 , TargetPoolAggregatedListItems
1564 , TargetPoolAggregatedListItems
1565 , targetPoolAggregatedListItems
1565 , targetPoolAggregatedListItems
1566− , tpaliProperties
1566+ , tpaliAddtional
1567
1567
1568 -- ** TargetInstancesScopedList
1568 -- ** TargetInstancesScopedList
1569 , TargetInstancesScopedList
1569 , TargetInstancesScopedList
@@ -1574,7 +1574,7 @@ module Network.Google.Compute
1574 -- ** AddressAggregatedListItems
1574 -- ** AddressAggregatedListItems
1575 , AddressAggregatedListItems
1575 , AddressAggregatedListItems
1576 , addressAggregatedListItems
1576 , addressAggregatedListItems
1577− , aaliProperties
1577+ , aAddtional
1578
1578
1579 -- ** AutoscalerList
1579 -- ** AutoscalerList
1580 , AutoscalerList
1580 , AutoscalerList
@@ -1894,7 +1894,7 @@ module Network.Google.Compute
1894 -- ** TargetVPNGatewayAggregatedListItems
1894 -- ** TargetVPNGatewayAggregatedListItems
1895 , TargetVPNGatewayAggregatedListItems
1895 , TargetVPNGatewayAggregatedListItems
1896 , targetVPNGatewayAggregatedListItems
1896 , targetVPNGatewayAggregatedListItems
1897− , tvgaliProperties
1897+ , tvgaliAddtional
1898
1898
1899 -- ** TargetPoolsScopedListWarning
1899 -- ** TargetPoolsScopedListWarning
1900 , TargetPoolsScopedListWarning
1900 , TargetPoolsScopedListWarning
@@ -2224,7 +2224,7 @@ module Network.Google.Compute
2224 -- ** VPNTunnelAggregatedListItems
2224 -- ** VPNTunnelAggregatedListItems
2225 , VPNTunnelAggregatedListItems
2225 , VPNTunnelAggregatedListItems
2226 , vpnTunnelAggregatedListItems
2226 , vpnTunnelAggregatedListItems
2227− , vtaliProperties
2227+ , vtaliAddtional
2228
2228
2229 -- ** Tags
2229 -- ** Tags
2230 , Tags
2230 , Tags
gogol-compute/gen/Network/Google/Compute/Types.hs+14−14
@@ -44,12 +44,12 @@ module Network.Google.Compute.Types
44 -- * MachineTypeAggregatedListItems
44 -- * MachineTypeAggregatedListItems
45 , MachineTypeAggregatedListItems
45 , MachineTypeAggregatedListItems
46 , machineTypeAggregatedListItems
46 , machineTypeAggregatedListItems
47− , mtaliProperties
47+ , mtaliAddtional
48
48
49 -- * DiskTypeAggregatedListItems
49 -- * DiskTypeAggregatedListItems
50 , DiskTypeAggregatedListItems
50 , DiskTypeAggregatedListItems
51 , diskTypeAggregatedListItems
51 , diskTypeAggregatedListItems
52− , dtaliProperties
52+ , dtaliAddtional
53
53
54 -- * FirewallList
54 -- * FirewallList
55 , FirewallList
55 , FirewallList
@@ -79,7 +79,7 @@ module Network.Google.Compute.Types
79 -- * AutoscalerAggregatedListItems
79 -- * AutoscalerAggregatedListItems
80 , AutoscalerAggregatedListItems
80 , AutoscalerAggregatedListItems
81 , autoscalerAggregatedListItems
81 , autoscalerAggregatedListItems
82− , aaliProperties
82+ , aaliAddtional
83
83
84 -- * InstanceGroupManagersSetInstanceTemplateRequest
84 -- * InstanceGroupManagersSetInstanceTemplateRequest
85 , InstanceGroupManagersSetInstanceTemplateRequest
85 , InstanceGroupManagersSetInstanceTemplateRequest
@@ -223,7 +223,7 @@ module Network.Google.Compute.Types
223 -- * InstanceGroupAggregatedListItems
223 -- * InstanceGroupAggregatedListItems
224 , InstanceGroupAggregatedListItems
224 , InstanceGroupAggregatedListItems
225 , instanceGroupAggregatedListItems
225 , instanceGroupAggregatedListItems
226− , igaliProperties
226+ , igaliAddtional
227
227
228 -- * TargetPoolList
228 -- * TargetPoolList
229 , TargetPoolList
229 , TargetPoolList
@@ -569,7 +569,7 @@ module Network.Google.Compute.Types
569 -- * InstanceAggregatedListItems
569 -- * InstanceAggregatedListItems
570 , InstanceAggregatedListItems
570 , InstanceAggregatedListItems
571 , instanceAggregatedListItems
571 , instanceAggregatedListItems
572− , ialiProperties
572+ , ialiAddtional
573
573
574 -- * AutoscalersScopedListWarning
574 -- * AutoscalersScopedListWarning
575 , AutoscalersScopedListWarning
575 , AutoscalersScopedListWarning
@@ -814,7 +814,7 @@ module Network.Google.Compute.Types
814 -- * TargetInstanceAggregatedListItems
814 -- * TargetInstanceAggregatedListItems
815 , TargetInstanceAggregatedListItems
815 , TargetInstanceAggregatedListItems
816 , targetInstanceAggregatedListItems
816 , targetInstanceAggregatedListItems
817− , tialiProperties
817+ , tialiAddtional
818
818
819 -- * InstanceGroupAggregatedList
819 -- * InstanceGroupAggregatedList
820 , InstanceGroupAggregatedList
820 , InstanceGroupAggregatedList
@@ -918,7 +918,7 @@ module Network.Google.Compute.Types
918 -- * DiskAggregatedListItems
918 -- * DiskAggregatedListItems
919 , DiskAggregatedListItems
919 , DiskAggregatedListItems
920 , diskAggregatedListItems
920 , diskAggregatedListItems
921− , daliProperties
921+ , daliAddtional
922
922
923 -- * UsageExportLocation
923 -- * UsageExportLocation
924 , UsageExportLocation
924 , UsageExportLocation
@@ -950,7 +950,7 @@ module Network.Google.Compute.Types
950 -- * InstanceGroupManagerAggregatedListItems
950 -- * InstanceGroupManagerAggregatedListItems
951 , InstanceGroupManagerAggregatedListItems
951 , InstanceGroupManagerAggregatedListItems
952 , instanceGroupManagerAggregatedListItems
952 , instanceGroupManagerAggregatedListItems
953− , igmaliProperties
953+ , igmaliAddtional
954
954
955 -- * InstanceGroupManagersDeleteInstancesRequest
955 -- * InstanceGroupManagersDeleteInstancesRequest
956 , InstanceGroupManagersDeleteInstancesRequest
956 , InstanceGroupManagersDeleteInstancesRequest
@@ -987,12 +987,12 @@ module Network.Google.Compute.Types
987 -- * ForwardingRuleAggregatedListItems
987 -- * ForwardingRuleAggregatedListItems
988 , ForwardingRuleAggregatedListItems
988 , ForwardingRuleAggregatedListItems
989 , forwardingRuleAggregatedListItems
989 , forwardingRuleAggregatedListItems
990− , fraliProperties
990+ , fraliAddtional
991
991
992 -- * OperationAggregatedListItems
992 -- * OperationAggregatedListItems
993 , OperationAggregatedListItems
993 , OperationAggregatedListItems
994 , operationAggregatedListItems
994 , operationAggregatedListItems
995− , oaliProperties
995+ , oaliAddtional
996
996
997 -- * InstanceGroupManagerActionsSummary
997 -- * InstanceGroupManagerActionsSummary
998 , InstanceGroupManagerActionsSummary
998 , InstanceGroupManagerActionsSummary
@@ -1034,7 +1034,7 @@ module Network.Google.Compute.Types
1034 -- * TargetPoolAggregatedListItems
1034 -- * TargetPoolAggregatedListItems
1035 , TargetPoolAggregatedListItems
1035 , TargetPoolAggregatedListItems
1036 , targetPoolAggregatedListItems
1036 , targetPoolAggregatedListItems
1037− , tpaliProperties
1037+ , tpaliAddtional
1038
1038
1039 -- * TargetInstancesScopedList
1039 -- * TargetInstancesScopedList
1040 , TargetInstancesScopedList
1040 , TargetInstancesScopedList
@@ -1045,7 +1045,7 @@ module Network.Google.Compute.Types
1045 -- * AddressAggregatedListItems
1045 -- * AddressAggregatedListItems
1046 , AddressAggregatedListItems
1046 , AddressAggregatedListItems
1047 , addressAggregatedListItems
1047 , addressAggregatedListItems
1048− , aaliProperties
1048+ , aAddtional
1049
1049
1050 -- * AutoscalerList
1050 -- * AutoscalerList
1051 , AutoscalerList
1051 , AutoscalerList
@@ -1365,7 +1365,7 @@ module Network.Google.Compute.Types
1365 -- * TargetVPNGatewayAggregatedListItems
1365 -- * TargetVPNGatewayAggregatedListItems
1366 , TargetVPNGatewayAggregatedListItems
1366 , TargetVPNGatewayAggregatedListItems
1367 , targetVPNGatewayAggregatedListItems
1367 , targetVPNGatewayAggregatedListItems
1368− , tvgaliProperties
1368+ , tvgaliAddtional
1369
1369
1370 -- * TargetPoolsScopedListWarning
1370 -- * TargetPoolsScopedListWarning
1371 , TargetPoolsScopedListWarning
1371 , TargetPoolsScopedListWarning
@@ -1695,7 +1695,7 @@ module Network.Google.Compute.Types
1695 -- * VPNTunnelAggregatedListItems
1695 -- * VPNTunnelAggregatedListItems
1696 , VPNTunnelAggregatedListItems
1696 , VPNTunnelAggregatedListItems
1697 , vpnTunnelAggregatedListItems
1697 , vpnTunnelAggregatedListItems
1698− , vtaliProperties
1698+ , vtaliAddtional
1699
1699
1700 -- * Tags
1700 -- * Tags
1701 , Tags
1701 , Tags
gogol-compute/gen/Network/Google/Compute/Types/Product.hs+139−140
@@ -160,27 +160,27 @@ instance ToJSON
160--
160--
161-- /See:/ 'machineTypeAggregatedListItems' smart constructor.
161-- /See:/ 'machineTypeAggregatedListItems' smart constructor.
162newtype MachineTypeAggregatedListItems = MachineTypeAggregatedListItems
162newtype MachineTypeAggregatedListItems = MachineTypeAggregatedListItems
163− { _mtaliProperties :: HashMap Text MachineTypesScopedList
163+ { _mtaliAddtional :: HashMap Text MachineTypesScopedList
164 } deriving (Eq,Show,Data,Typeable,Generic)
164 } deriving (Eq,Show,Data,Typeable,Generic)
165
165
166-- | Creates a value of 'MachineTypeAggregatedListItems' with the minimum fields required to make a request.
166-- | Creates a value of 'MachineTypeAggregatedListItems' with the minimum fields required to make a request.
167--
167--
168-- Use one of the following lenses to modify other fields as desired:
168-- Use one of the following lenses to modify other fields as desired:
169--
169--
170−-- * 'mtaliProperties'
170+-- * 'mtaliAddtional'
171machineTypeAggregatedListItems
171machineTypeAggregatedListItems
172− :: HashMap Text MachineTypesScopedList -- ^ 'properties'
172+ :: HashMap Text MachineTypesScopedList -- ^ 'addtional'
173 -> MachineTypeAggregatedListItems
173 -> MachineTypeAggregatedListItems
174−machineTypeAggregatedListItems pMtaliProperties_ =
174+machineTypeAggregatedListItems pMtaliAddtional_ =
175 MachineTypeAggregatedListItems
175 MachineTypeAggregatedListItems
176− { _mtaliProperties = pMtaliProperties_
176+ { _mtaliAddtional = pMtaliAddtional_
177 }
177 }
178
178
179-- | [Output Only] Name of the scope containing this set of machine types.
179-- | [Output Only] Name of the scope containing this set of machine types.
180−mtaliProperties :: Lens' MachineTypeAggregatedListItems (HashMap Text MachineTypesScopedList)
180+mtaliAddtional :: Lens' MachineTypeAggregatedListItems (HashMap Text MachineTypesScopedList)
181−mtaliProperties
181+mtaliAddtional
182− = lens _mtaliProperties
182+ = lens _mtaliAddtional
183− (\ s a -> s{_mtaliProperties = a})
183+ (\ s a -> s{_mtaliAddtional = a})
184
184
185instance FromJSON MachineTypeAggregatedListItems
185instance FromJSON MachineTypeAggregatedListItems
186 where
186 where
@@ -191,33 +191,33 @@ instance FromJSON MachineTypeAggregatedListItems
191 (parseJSONObject o))
191 (parseJSONObject o))
192
192
193instance ToJSON MachineTypeAggregatedListItems where
193instance ToJSON MachineTypeAggregatedListItems where
194− toJSON = toJSON . _mtaliProperties
194+ toJSON = toJSON . _mtaliAddtional
195
195
196-- | [Output Only] A map of scoped disk type lists.
196-- | [Output Only] A map of scoped disk type lists.
197--
197--
198-- /See:/ 'diskTypeAggregatedListItems' smart constructor.
198-- /See:/ 'diskTypeAggregatedListItems' smart constructor.
199newtype DiskTypeAggregatedListItems = DiskTypeAggregatedListItems
199newtype DiskTypeAggregatedListItems = DiskTypeAggregatedListItems
200− { _dtaliProperties :: HashMap Text DiskTypesScopedList
200+ { _dtaliAddtional :: HashMap Text DiskTypesScopedList
201 } deriving (Eq,Show,Data,Typeable,Generic)
201 } deriving (Eq,Show,Data,Typeable,Generic)
202
202
203-- | Creates a value of 'DiskTypeAggregatedListItems' with the minimum fields required to make a request.
203-- | Creates a value of 'DiskTypeAggregatedListItems' with the minimum fields required to make a request.
204--
204--
205-- Use one of the following lenses to modify other fields as desired:
205-- Use one of the following lenses to modify other fields as desired:
206--
206--
207−-- * 'dtaliProperties'
207+-- * 'dtaliAddtional'
208diskTypeAggregatedListItems
208diskTypeAggregatedListItems
209− :: HashMap Text DiskTypesScopedList -- ^ 'properties'
209+ :: HashMap Text DiskTypesScopedList -- ^ 'addtional'
210 -> DiskTypeAggregatedListItems
210 -> DiskTypeAggregatedListItems
211−diskTypeAggregatedListItems pDtaliProperties_ =
211+diskTypeAggregatedListItems pDtaliAddtional_ =
212 DiskTypeAggregatedListItems
212 DiskTypeAggregatedListItems
213− { _dtaliProperties = pDtaliProperties_
213+ { _dtaliAddtional = pDtaliAddtional_
214 }
214 }
215
215
216-- | [Output Only] Name of the scope containing this set of disk types.
216-- | [Output Only] Name of the scope containing this set of disk types.
217−dtaliProperties :: Lens' DiskTypeAggregatedListItems (HashMap Text DiskTypesScopedList)
217+dtaliAddtional :: Lens' DiskTypeAggregatedListItems (HashMap Text DiskTypesScopedList)
218−dtaliProperties
218+dtaliAddtional
219− = lens _dtaliProperties
219+ = lens _dtaliAddtional
220− (\ s a -> s{_dtaliProperties = a})
220+ (\ s a -> s{_dtaliAddtional = a})
221
221
222instance FromJSON DiskTypeAggregatedListItems where
222instance FromJSON DiskTypeAggregatedListItems where
223 parseJSON
223 parseJSON
@@ -226,7 +226,7 @@ instance FromJSON DiskTypeAggregatedListItems where
226 DiskTypeAggregatedListItems <$> (parseJSONObject o))
226 DiskTypeAggregatedListItems <$> (parseJSONObject o))
227
227
228instance ToJSON DiskTypeAggregatedListItems where
228instance ToJSON DiskTypeAggregatedListItems where
229− toJSON = toJSON . _dtaliProperties
229+ toJSON = toJSON . _dtaliAddtional
230
230
231-- | Contains a list of Firewall resources.
231-- | Contains a list of Firewall resources.
232--
232--
@@ -458,27 +458,27 @@ instance ToJSON InstanceGroupList where
458--
458--
459-- /See:/ 'autoscalerAggregatedListItems' smart constructor.
459-- /See:/ 'autoscalerAggregatedListItems' smart constructor.
460newtype AutoscalerAggregatedListItems = AutoscalerAggregatedListItems
460newtype AutoscalerAggregatedListItems = AutoscalerAggregatedListItems
461− { _aaliProperties :: HashMap Text AutoscalersScopedList
461+ { _aaliAddtional :: HashMap Text AutoscalersScopedList
462 } deriving (Eq,Show,Data,Typeable,Generic)
462 } deriving (Eq,Show,Data,Typeable,Generic)
463
463
464-- | Creates a value of 'AutoscalerAggregatedListItems' with the minimum fields required to make a request.
464-- | Creates a value of 'AutoscalerAggregatedListItems' with the minimum fields required to make a request.
465--
465--
466-- Use one of the following lenses to modify other fields as desired:
466-- Use one of the following lenses to modify other fields as desired:
467--
467--
468−-- * 'aaliProperties'
468+-- * 'aaliAddtional'
469autoscalerAggregatedListItems
469autoscalerAggregatedListItems
470− :: HashMap Text AutoscalersScopedList -- ^ 'properties'
470+ :: HashMap Text AutoscalersScopedList -- ^ 'addtional'
471 -> AutoscalerAggregatedListItems
471 -> AutoscalerAggregatedListItems
472−autoscalerAggregatedListItems pAaliProperties_ =
472+autoscalerAggregatedListItems pAaliAddtional_ =
473 AutoscalerAggregatedListItems
473 AutoscalerAggregatedListItems
474− { _aaliProperties = pAaliProperties_
474+ { _aaliAddtional = pAaliAddtional_
475 }
475 }
476
476
477-- | Name of the scope containing this set of autoscalers.
477-- | Name of the scope containing this set of autoscalers.
478−aaliProperties :: Lens' AutoscalerAggregatedListItems (HashMap Text AutoscalersScopedList)
478+aaliAddtional :: Lens' AutoscalerAggregatedListItems (HashMap Text AutoscalersScopedList)
479−aaliProperties
479+aaliAddtional
480− = lens _aaliProperties
480+ = lens _aaliAddtional
481− (\ s a -> s{_aaliProperties = a})
481+ (\ s a -> s{_aaliAddtional = a})
482
482
483instance FromJSON AutoscalerAggregatedListItems where
483instance FromJSON AutoscalerAggregatedListItems where
484 parseJSON
484 parseJSON
@@ -488,7 +488,7 @@ instance FromJSON AutoscalerAggregatedListItems where
488 (parseJSONObject o))
488 (parseJSONObject o))
489
489
490instance ToJSON AutoscalerAggregatedListItems where
490instance ToJSON AutoscalerAggregatedListItems where
491− toJSON = toJSON . _aaliProperties
491+ toJSON = toJSON . _aaliAddtional
492
492
493--
493--
494-- /See:/ 'instanceGroupManagersSetInstanceTemplateRequest' smart constructor.
494-- /See:/ 'instanceGroupManagersSetInstanceTemplateRequest' smart constructor.
@@ -1768,27 +1768,27 @@ instance ToJSON URLMap where
1768--
1768--
1769-- /See:/ 'instanceGroupAggregatedListItems' smart constructor.
1769-- /See:/ 'instanceGroupAggregatedListItems' smart constructor.
1770newtype InstanceGroupAggregatedListItems = InstanceGroupAggregatedListItems
1770newtype InstanceGroupAggregatedListItems = InstanceGroupAggregatedListItems
1771− { _igaliProperties :: HashMap Text InstanceGroupsScopedList
1771+ { _igaliAddtional :: HashMap Text InstanceGroupsScopedList
1772 } deriving (Eq,Show,Data,Typeable,Generic)
1772 } deriving (Eq,Show,Data,Typeable,Generic)
1773
1773
1774-- | Creates a value of 'InstanceGroupAggregatedListItems' with the minimum fields required to make a request.
1774-- | Creates a value of 'InstanceGroupAggregatedListItems' with the minimum fields required to make a request.
1775--
1775--
1776-- Use one of the following lenses to modify other fields as desired:
1776-- Use one of the following lenses to modify other fields as desired:
1777--
1777--
1778−-- * 'igaliProperties'
1778+-- * 'igaliAddtional'
1779instanceGroupAggregatedListItems
1779instanceGroupAggregatedListItems
1780− :: HashMap Text InstanceGroupsScopedList -- ^ 'properties'
1780+ :: HashMap Text InstanceGroupsScopedList -- ^ 'addtional'
1781 -> InstanceGroupAggregatedListItems
1781 -> InstanceGroupAggregatedListItems
1782−instanceGroupAggregatedListItems pIgaliProperties_ =
1782+instanceGroupAggregatedListItems pIgaliAddtional_ =
1783 InstanceGroupAggregatedListItems
1783 InstanceGroupAggregatedListItems
1784− { _igaliProperties = pIgaliProperties_
1784+ { _igaliAddtional = pIgaliAddtional_
1785 }
1785 }
1786
1786
1787-- | The name of the scope that contains this set of instance groups.
1787-- | The name of the scope that contains this set of instance groups.
1788−igaliProperties :: Lens' InstanceGroupAggregatedListItems (HashMap Text InstanceGroupsScopedList)
1788+igaliAddtional :: Lens' InstanceGroupAggregatedListItems (HashMap Text InstanceGroupsScopedList)
1789−igaliProperties
1789+igaliAddtional
1790− = lens _igaliProperties
1790+ = lens _igaliAddtional
1791− (\ s a -> s{_igaliProperties = a})
1791+ (\ s a -> s{_igaliAddtional = a})
1792
1792
1793instance FromJSON InstanceGroupAggregatedListItems
1793instance FromJSON InstanceGroupAggregatedListItems
1794 where
1794 where
@@ -1800,7 +1800,7 @@ instance FromJSON InstanceGroupAggregatedListItems
1800
1800
1801instance ToJSON InstanceGroupAggregatedListItems
1801instance ToJSON InstanceGroupAggregatedListItems
1802 where
1802 where
1803− toJSON = toJSON . _igaliProperties
1803+ toJSON = toJSON . _igaliAddtional
1804
1804
1805-- | Contains a list of TargetPool resources.
1805-- | Contains a list of TargetPool resources.
1806--
1806--
@@ -4796,27 +4796,27 @@ instance ToJSON RouteWarningsItemDataItem where
4796--
4796--
4797-- /See:/ 'instanceAggregatedListItems' smart constructor.
4797-- /See:/ 'instanceAggregatedListItems' smart constructor.
4798newtype InstanceAggregatedListItems = InstanceAggregatedListItems
4798newtype InstanceAggregatedListItems = InstanceAggregatedListItems
4799− { _ialiProperties :: HashMap Text InstancesScopedList
4799+ { _ialiAddtional :: HashMap Text InstancesScopedList
4800 } deriving (Eq,Show,Data,Typeable,Generic)
4800 } deriving (Eq,Show,Data,Typeable,Generic)
4801
4801
4802-- | Creates a value of 'InstanceAggregatedListItems' with the minimum fields required to make a request.
4802-- | Creates a value of 'InstanceAggregatedListItems' with the minimum fields required to make a request.
4803--
4803--
4804-- Use one of the following lenses to modify other fields as desired:
4804-- Use one of the following lenses to modify other fields as desired:
4805--
4805--
4806−-- * 'ialiProperties'
4806+-- * 'ialiAddtional'
4807instanceAggregatedListItems
4807instanceAggregatedListItems
4808− :: HashMap Text InstancesScopedList -- ^ 'properties'
4808+ :: HashMap Text InstancesScopedList -- ^ 'addtional'
4809 -> InstanceAggregatedListItems
4809 -> InstanceAggregatedListItems
4810−instanceAggregatedListItems pIaliProperties_ =
4810+instanceAggregatedListItems pIaliAddtional_ =
4811 InstanceAggregatedListItems
4811 InstanceAggregatedListItems
4812− { _ialiProperties = pIaliProperties_
4812+ { _ialiAddtional = pIaliAddtional_
4813 }
4813 }
4814
4814
4815-- | Name of the scope containing this set of instances.
4815-- | Name of the scope containing this set of instances.
4816−ialiProperties :: Lens' InstanceAggregatedListItems (HashMap Text InstancesScopedList)
4816+ialiAddtional :: Lens' InstanceAggregatedListItems (HashMap Text InstancesScopedList)
4817−ialiProperties
4817+ialiAddtional
4818− = lens _ialiProperties
4818+ = lens _ialiAddtional
4819− (\ s a -> s{_ialiProperties = a})
4819+ (\ s a -> s{_ialiAddtional = a})
4820
4820
4821instance FromJSON InstanceAggregatedListItems where
4821instance FromJSON InstanceAggregatedListItems where
4822 parseJSON
4822 parseJSON
@@ -4825,7 +4825,7 @@ instance FromJSON InstanceAggregatedListItems where
4825 InstanceAggregatedListItems <$> (parseJSONObject o))
4825 InstanceAggregatedListItems <$> (parseJSONObject o))
4826
4826
4827instance ToJSON InstanceAggregatedListItems where
4827instance ToJSON InstanceAggregatedListItems where
4828− toJSON = toJSON . _ialiProperties
4828+ toJSON = toJSON . _ialiAddtional
4829
4829
4830-- | Informational warning which replaces the list of autoscalers when the
4830-- | Informational warning which replaces the list of autoscalers when the
4831-- list is empty.
4831-- list is empty.
@@ -6818,27 +6818,27 @@ instance ToJSON HealthCheckReference where
6818--
6818--
6819-- /See:/ 'targetInstanceAggregatedListItems' smart constructor.
6819-- /See:/ 'targetInstanceAggregatedListItems' smart constructor.
6820newtype TargetInstanceAggregatedListItems = TargetInstanceAggregatedListItems
6820newtype TargetInstanceAggregatedListItems = TargetInstanceAggregatedListItems
6821− { _tialiProperties :: HashMap Text TargetInstancesScopedList
6821+ { _tialiAddtional :: HashMap Text TargetInstancesScopedList
6822 } deriving (Eq,Show,Data,Typeable,Generic)
6822 } deriving (Eq,Show,Data,Typeable,Generic)
6823
6823
6824-- | Creates a value of 'TargetInstanceAggregatedListItems' with the minimum fields required to make a request.
6824-- | Creates a value of 'TargetInstanceAggregatedListItems' with the minimum fields required to make a request.
6825--
6825--
6826-- Use one of the following lenses to modify other fields as desired:
6826-- Use one of the following lenses to modify other fields as desired:
6827--
6827--
6828−-- * 'tialiProperties'
6828+-- * 'tialiAddtional'
6829targetInstanceAggregatedListItems
6829targetInstanceAggregatedListItems
6830− :: HashMap Text TargetInstancesScopedList -- ^ 'properties'
6830+ :: HashMap Text TargetInstancesScopedList -- ^ 'addtional'
6831 -> TargetInstanceAggregatedListItems
6831 -> TargetInstanceAggregatedListItems
6832−targetInstanceAggregatedListItems pTialiProperties_ =
6832+targetInstanceAggregatedListItems pTialiAddtional_ =
6833 TargetInstanceAggregatedListItems
6833 TargetInstanceAggregatedListItems
6834− { _tialiProperties = pTialiProperties_
6834+ { _tialiAddtional = pTialiAddtional_
6835 }
6835 }
6836
6836
6837-- | Name of the scope containing this set of target instances.
6837-- | Name of the scope containing this set of target instances.
6838−tialiProperties :: Lens' TargetInstanceAggregatedListItems (HashMap Text TargetInstancesScopedList)
6838+tialiAddtional :: Lens' TargetInstanceAggregatedListItems (HashMap Text TargetInstancesScopedList)
6839−tialiProperties
6839+tialiAddtional
6840− = lens _tialiProperties
6840+ = lens _tialiAddtional
6841− (\ s a -> s{_tialiProperties = a})
6841+ (\ s a -> s{_tialiAddtional = a})
6842
6842
6843instance FromJSON TargetInstanceAggregatedListItems
6843instance FromJSON TargetInstanceAggregatedListItems
6844 where
6844 where
@@ -6850,7 +6850,7 @@ instance FromJSON TargetInstanceAggregatedListItems
6850
6850
6851instance ToJSON TargetInstanceAggregatedListItems
6851instance ToJSON TargetInstanceAggregatedListItems
6852 where
6852 where
6853− toJSON = toJSON . _tialiProperties
6853+ toJSON = toJSON . _tialiAddtional
6854
6854
6855--
6855--
6856-- /See:/ 'instanceGroupAggregatedList' smart constructor.
6856-- /See:/ 'instanceGroupAggregatedList' smart constructor.
@@ -7666,27 +7666,27 @@ instance ToJSON TargetPoolsAddHealthCheckRequest
7666--
7666--
7667-- /See:/ 'diskAggregatedListItems' smart constructor.
7667-- /See:/ 'diskAggregatedListItems' smart constructor.
7668newtype DiskAggregatedListItems = DiskAggregatedListItems
7668newtype DiskAggregatedListItems = DiskAggregatedListItems
7669− { _daliProperties :: HashMap Text DisksScopedList
7669+ { _daliAddtional :: HashMap Text DisksScopedList
7670 } deriving (Eq,Show,Data,Typeable,Generic)
7670 } deriving (Eq,Show,Data,Typeable,Generic)
7671
7671
7672-- | Creates a value of 'DiskAggregatedListItems' with the minimum fields required to make a request.
7672-- | Creates a value of 'DiskAggregatedListItems' with the minimum fields required to make a request.
7673--
7673--
7674-- Use one of the following lenses to modify other fields as desired:
7674-- Use one of the following lenses to modify other fields as desired:
7675--
7675--
7676−-- * 'daliProperties'
7676+-- * 'daliAddtional'
7677diskAggregatedListItems
7677diskAggregatedListItems
7678− :: HashMap Text DisksScopedList -- ^ 'properties'
7678+ :: HashMap Text DisksScopedList -- ^ 'addtional'
7679 -> DiskAggregatedListItems
7679 -> DiskAggregatedListItems
7680−diskAggregatedListItems pDaliProperties_ =
7680+diskAggregatedListItems pDaliAddtional_ =
7681 DiskAggregatedListItems
7681 DiskAggregatedListItems
7682− { _daliProperties = pDaliProperties_
7682+ { _daliAddtional = pDaliAddtional_
7683 }
7683 }
7684
7684
7685-- | [Output Only] Name of the scope containing this set of disks.
7685-- | [Output Only] Name of the scope containing this set of disks.
7686−daliProperties :: Lens' DiskAggregatedListItems (HashMap Text DisksScopedList)
7686+daliAddtional :: Lens' DiskAggregatedListItems (HashMap Text DisksScopedList)
7687−daliProperties
7687+daliAddtional
7688− = lens _daliProperties
7688+ = lens _daliAddtional
7689− (\ s a -> s{_daliProperties = a})
7689+ (\ s a -> s{_daliAddtional = a})
7690
7690
7691instance FromJSON DiskAggregatedListItems where
7691instance FromJSON DiskAggregatedListItems where
7692 parseJSON
7692 parseJSON
@@ -7695,7 +7695,7 @@ instance FromJSON DiskAggregatedListItems where
7695 DiskAggregatedListItems <$> (parseJSONObject o))
7695 DiskAggregatedListItems <$> (parseJSONObject o))
7696
7696
7697instance ToJSON DiskAggregatedListItems where
7697instance ToJSON DiskAggregatedListItems where
7698− toJSON = toJSON . _daliProperties
7698+ toJSON = toJSON . _daliAddtional
7699
7699
7700-- | The location in Cloud Storage and naming method of the daily usage
7700-- | The location in Cloud Storage and naming method of the daily usage
7701-- report. Contains bucket_name and report_name prefix.
7701-- report. Contains bucket_name and report_name prefix.
@@ -7921,27 +7921,27 @@ instance ToJSON ManagedInstance where
7921--
7921--
7922-- /See:/ 'instanceGroupManagerAggregatedListItems' smart constructor.
7922-- /See:/ 'instanceGroupManagerAggregatedListItems' smart constructor.
7923newtype InstanceGroupManagerAggregatedListItems = InstanceGroupManagerAggregatedListItems
7923newtype InstanceGroupManagerAggregatedListItems = InstanceGroupManagerAggregatedListItems
7924− { _igmaliProperties :: HashMap Text InstanceGroupManagersScopedList
7924+ { _igmaliAddtional :: HashMap Text InstanceGroupManagersScopedList
7925 } deriving (Eq,Show,Data,Typeable,Generic)
7925 } deriving (Eq,Show,Data,Typeable,Generic)
7926
7926
7927-- | Creates a value of 'InstanceGroupManagerAggregatedListItems' with the minimum fields required to make a request.
7927-- | Creates a value of 'InstanceGroupManagerAggregatedListItems' with the minimum fields required to make a request.
7928--
7928--
7929-- Use one of the following lenses to modify other fields as desired:
7929-- Use one of the following lenses to modify other fields as desired:
7930--
7930--
7931−-- * 'igmaliProperties'
7931+-- * 'igmaliAddtional'
7932instanceGroupManagerAggregatedListItems
7932instanceGroupManagerAggregatedListItems
7933− :: HashMap Text InstanceGroupManagersScopedList -- ^ 'properties'
7933+ :: HashMap Text InstanceGroupManagersScopedList -- ^ 'addtional'
7934 -> InstanceGroupManagerAggregatedListItems
7934 -> InstanceGroupManagerAggregatedListItems
7935−instanceGroupManagerAggregatedListItems pIgmaliProperties_ =
7935+instanceGroupManagerAggregatedListItems pIgmaliAddtional_ =
7936 InstanceGroupManagerAggregatedListItems
7936 InstanceGroupManagerAggregatedListItems
7937− { _igmaliProperties = pIgmaliProperties_
7937+ { _igmaliAddtional = pIgmaliAddtional_
7938 }
7938 }
7939
7939
7940-- | The name of the scope that contains this set of managed instance groups.
7940-- | The name of the scope that contains this set of managed instance groups.
7941−igmaliProperties :: Lens' InstanceGroupManagerAggregatedListItems (HashMap Text InstanceGroupManagersScopedList)
7941+igmaliAddtional :: Lens' InstanceGroupManagerAggregatedListItems (HashMap Text InstanceGroupManagersScopedList)
7942−igmaliProperties
7942+igmaliAddtional
7943− = lens _igmaliProperties
7943+ = lens _igmaliAddtional
7944− (\ s a -> s{_igmaliProperties = a})
7944+ (\ s a -> s{_igmaliAddtional = a})
7945
7945
7946instance FromJSON
7946instance FromJSON
7947 InstanceGroupManagerAggregatedListItems where
7947 InstanceGroupManagerAggregatedListItems where
@@ -7954,7 +7954,7 @@ instance FromJSON
7954
7954
7955instance ToJSON
7955instance ToJSON
7956 InstanceGroupManagerAggregatedListItems where
7956 InstanceGroupManagerAggregatedListItems where
7957− toJSON = toJSON . _igmaliProperties
7957+ toJSON = toJSON . _igmaliAddtional
7958
7958
7959--
7959--
7960-- /See:/ 'instanceGroupManagersDeleteInstancesRequest' smart constructor.
7960-- /See:/ 'instanceGroupManagersDeleteInstancesRequest' smart constructor.
@@ -8269,27 +8269,27 @@ instance ToJSON AddressList where
8269--
8269--
8270-- /See:/ 'forwardingRuleAggregatedListItems' smart constructor.
8270-- /See:/ 'forwardingRuleAggregatedListItems' smart constructor.
8271newtype ForwardingRuleAggregatedListItems = ForwardingRuleAggregatedListItems
8271newtype ForwardingRuleAggregatedListItems = ForwardingRuleAggregatedListItems
8272− { _fraliProperties :: HashMap Text ForwardingRulesScopedList
8272+ { _fraliAddtional :: HashMap Text ForwardingRulesScopedList
8273 } deriving (Eq,Show,Data,Typeable,Generic)
8273 } deriving (Eq,Show,Data,Typeable,Generic)
8274
8274
8275-- | Creates a value of 'ForwardingRuleAggregatedListItems' with the minimum fields required to make a request.
8275-- | Creates a value of 'ForwardingRuleAggregatedListItems' with the minimum fields required to make a request.
8276--
8276--
8277-- Use one of the following lenses to modify other fields as desired:
8277-- Use one of the following lenses to modify other fields as desired:
8278--
8278--
8279−-- * 'fraliProperties'
8279+-- * 'fraliAddtional'
8280forwardingRuleAggregatedListItems
8280forwardingRuleAggregatedListItems
8281− :: HashMap Text ForwardingRulesScopedList -- ^ 'properties'
8281+ :: HashMap Text ForwardingRulesScopedList -- ^ 'addtional'
8282 -> ForwardingRuleAggregatedListItems
8282 -> ForwardingRuleAggregatedListItems
8283−forwardingRuleAggregatedListItems pFraliProperties_ =
8283+forwardingRuleAggregatedListItems pFraliAddtional_ =
8284 ForwardingRuleAggregatedListItems
8284 ForwardingRuleAggregatedListItems
8285− { _fraliProperties = pFraliProperties_
8285+ { _fraliAddtional = pFraliAddtional_
8286 }
8286 }
8287
8287
8288-- | Name of the scope containing this set of addresses.
8288-- | Name of the scope containing this set of addresses.
8289−fraliProperties :: Lens' ForwardingRuleAggregatedListItems (HashMap Text ForwardingRulesScopedList)
8289+fraliAddtional :: Lens' ForwardingRuleAggregatedListItems (HashMap Text ForwardingRulesScopedList)
8290−fraliProperties
8290+fraliAddtional
8291− = lens _fraliProperties
8291+ = lens _fraliAddtional
8292− (\ s a -> s{_fraliProperties = a})
8292+ (\ s a -> s{_fraliAddtional = a})
8293
8293
8294instance FromJSON ForwardingRuleAggregatedListItems
8294instance FromJSON ForwardingRuleAggregatedListItems
8295 where
8295 where
@@ -8301,33 +8301,33 @@ instance FromJSON ForwardingRuleAggregatedListItems
8301
8301
8302instance ToJSON ForwardingRuleAggregatedListItems
8302instance ToJSON ForwardingRuleAggregatedListItems
8303 where
8303 where
8304− toJSON = toJSON . _fraliProperties
8304+ toJSON = toJSON . _fraliAddtional
8305
8305
8306-- | [Output Only] A map of scoped operation lists.
8306-- | [Output Only] A map of scoped operation lists.
8307--
8307--
8308-- /See:/ 'operationAggregatedListItems' smart constructor.
8308-- /See:/ 'operationAggregatedListItems' smart constructor.
8309newtype OperationAggregatedListItems = OperationAggregatedListItems
8309newtype OperationAggregatedListItems = OperationAggregatedListItems
8310− { _oaliProperties :: HashMap Text OperationsScopedList
8310+ { _oaliAddtional :: HashMap Text OperationsScopedList
8311 } deriving (Eq,Show,Data,Typeable,Generic)
8311 } deriving (Eq,Show,Data,Typeable,Generic)
8312
8312
8313-- | Creates a value of 'OperationAggregatedListItems' with the minimum fields required to make a request.
8313-- | Creates a value of 'OperationAggregatedListItems' with the minimum fields required to make a request.
8314--
8314--
8315-- Use one of the following lenses to modify other fields as desired:
8315-- Use one of the following lenses to modify other fields as desired:
8316--
8316--
8317−-- * 'oaliProperties'
8317+-- * 'oaliAddtional'
8318operationAggregatedListItems
8318operationAggregatedListItems
8319− :: HashMap Text OperationsScopedList -- ^ 'properties'
8319+ :: HashMap Text OperationsScopedList -- ^ 'addtional'
8320 -> OperationAggregatedListItems
8320 -> OperationAggregatedListItems
8321−operationAggregatedListItems pOaliProperties_ =
8321+operationAggregatedListItems pOaliAddtional_ =
8322 OperationAggregatedListItems
8322 OperationAggregatedListItems
8323− { _oaliProperties = pOaliProperties_
8323+ { _oaliAddtional = pOaliAddtional_
8324 }
8324 }
8325
8325
8326-- | [Output Only] Name of the scope containing this set of operations.
8326-- | [Output Only] Name of the scope containing this set of operations.
8327−oaliProperties :: Lens' OperationAggregatedListItems (HashMap Text OperationsScopedList)
8327+oaliAddtional :: Lens' OperationAggregatedListItems (HashMap Text OperationsScopedList)
8328−oaliProperties
8328+oaliAddtional
8329− = lens _oaliProperties
8329+ = lens _oaliAddtional
8330− (\ s a -> s{_oaliProperties = a})
8330+ (\ s a -> s{_oaliAddtional = a})
8331
8331
8332instance FromJSON OperationAggregatedListItems where
8332instance FromJSON OperationAggregatedListItems where
8333 parseJSON
8333 parseJSON
@@ -8336,7 +8336,7 @@ instance FromJSON OperationAggregatedListItems where
8336 OperationAggregatedListItems <$> (parseJSONObject o))
8336 OperationAggregatedListItems <$> (parseJSONObject o))
8337
8337
8338instance ToJSON OperationAggregatedListItems where
8338instance ToJSON OperationAggregatedListItems where
8339− toJSON = toJSON . _oaliProperties
8339+ toJSON = toJSON . _oaliAddtional
8340
8340
8341--
8341--
8342-- /See:/ 'instanceGroupManagerActionsSummary' smart constructor.
8342-- /See:/ 'instanceGroupManagerActionsSummary' smart constructor.
@@ -8634,27 +8634,27 @@ instance ToJSON InstanceGroupsListInstancesRequest
8634--
8634--
8635-- /See:/ 'targetPoolAggregatedListItems' smart constructor.
8635-- /See:/ 'targetPoolAggregatedListItems' smart constructor.
8636newtype TargetPoolAggregatedListItems = TargetPoolAggregatedListItems
8636newtype TargetPoolAggregatedListItems = TargetPoolAggregatedListItems
8637− { _tpaliProperties :: HashMap Text TargetPoolsScopedList
8637+ { _tpaliAddtional :: HashMap Text TargetPoolsScopedList
8638 } deriving (Eq,Show,Data,Typeable,Generic)
8638 } deriving (Eq,Show,Data,Typeable,Generic)
8639
8639
8640-- | Creates a value of 'TargetPoolAggregatedListItems' with the minimum fields required to make a request.
8640-- | Creates a value of 'TargetPoolAggregatedListItems' with the minimum fields required to make a request.
8641--
8641--
8642-- Use one of the following lenses to modify other fields as desired:
8642-- Use one of the following lenses to modify other fields as desired:
8643--
8643--
8644−-- * 'tpaliProperties'
8644+-- * 'tpaliAddtional'
8645targetPoolAggregatedListItems
8645targetPoolAggregatedListItems
8646− :: HashMap Text TargetPoolsScopedList -- ^ 'properties'
8646+ :: HashMap Text TargetPoolsScopedList -- ^ 'addtional'
8647 -> TargetPoolAggregatedListItems
8647 -> TargetPoolAggregatedListItems
8648−targetPoolAggregatedListItems pTpaliProperties_ =
8648+targetPoolAggregatedListItems pTpaliAddtional_ =
8649 TargetPoolAggregatedListItems
8649 TargetPoolAggregatedListItems
8650− { _tpaliProperties = pTpaliProperties_
8650+ { _tpaliAddtional = pTpaliAddtional_
8651 }
8651 }
8652
8652
8653-- | Name of the scope containing this set of target pools.
8653-- | Name of the scope containing this set of target pools.
8654−tpaliProperties :: Lens' TargetPoolAggregatedListItems (HashMap Text TargetPoolsScopedList)
8654+tpaliAddtional :: Lens' TargetPoolAggregatedListItems (HashMap Text TargetPoolsScopedList)
8655−tpaliProperties
8655+tpaliAddtional
8656− = lens _tpaliProperties
8656+ = lens _tpaliAddtional
8657− (\ s a -> s{_tpaliProperties = a})
8657+ (\ s a -> s{_tpaliAddtional = a})
8658
8658
8659instance FromJSON TargetPoolAggregatedListItems where
8659instance FromJSON TargetPoolAggregatedListItems where
8660 parseJSON
8660 parseJSON
@@ -8664,7 +8664,7 @@ instance FromJSON TargetPoolAggregatedListItems where
8664 (parseJSONObject o))
8664 (parseJSONObject o))
8665
8665
8666instance ToJSON TargetPoolAggregatedListItems where
8666instance ToJSON TargetPoolAggregatedListItems where
8667− toJSON = toJSON . _tpaliProperties
8667+ toJSON = toJSON . _tpaliAddtional
8668
8668
8669--
8669--
8670-- /See:/ 'targetInstancesScopedList' smart constructor.
8670-- /See:/ 'targetInstancesScopedList' smart constructor.
@@ -8721,27 +8721,26 @@ instance ToJSON TargetInstancesScopedList where
8721--
8721--
8722-- /See:/ 'addressAggregatedListItems' smart constructor.
8722-- /See:/ 'addressAggregatedListItems' smart constructor.
8723newtype AddressAggregatedListItems = AddressAggregatedListItems
8723newtype AddressAggregatedListItems = AddressAggregatedListItems
8724− { _aaliProperties :: HashMap Text AddressesScopedList
8724+ { _aAddtional :: HashMap Text AddressesScopedList
8725 } deriving (Eq,Show,Data,Typeable,Generic)
8725 } deriving (Eq,Show,Data,Typeable,Generic)
8726
8726
8727-- | Creates a value of 'AddressAggregatedListItems' with the minimum fields required to make a request.
8727-- | Creates a value of 'AddressAggregatedListItems' with the minimum fields required to make a request.
8728--
8728--
8729-- Use one of the following lenses to modify other fields as desired:
8729-- Use one of the following lenses to modify other fields as desired:
8730--
8730--
8731−-- * 'aaliProperties'
8731+-- * 'aAddtional'
8732addressAggregatedListItems
8732addressAggregatedListItems
8733− :: HashMap Text AddressesScopedList -- ^ 'properties'
8733+ :: HashMap Text AddressesScopedList -- ^ 'addtional'
8734 -> AddressAggregatedListItems
8734 -> AddressAggregatedListItems
8735−addressAggregatedListItems pAaliProperties_ =
8735+addressAggregatedListItems pAAddtional_ =
8736 AddressAggregatedListItems
8736 AddressAggregatedListItems
8737− { _aaliProperties = pAaliProperties_
8737+ { _aAddtional = pAAddtional_
8738 }
8738 }
8739
8739
8740-- | [Output Only] Name of the scope containing this set of addresses.
8740-- | [Output Only] Name of the scope containing this set of addresses.
8741−aaliProperties :: Lens' AddressAggregatedListItems (HashMap Text AddressesScopedList)
8741+aAddtional :: Lens' AddressAggregatedListItems (HashMap Text AddressesScopedList)
8742−aaliProperties
8742+aAddtional
8743− = lens _aaliProperties
8743+ = lens _aAddtional (\ s a -> s{_aAddtional = a})
8744− (\ s a -> s{_aaliProperties = a})
8745
8744
8746instance FromJSON AddressAggregatedListItems where
8745instance FromJSON AddressAggregatedListItems where
8747 parseJSON
8746 parseJSON
@@ -8750,7 +8749,7 @@ instance FromJSON AddressAggregatedListItems where
8750 AddressAggregatedListItems <$> (parseJSONObject o))
8749 AddressAggregatedListItems <$> (parseJSONObject o))
8751
8750
8752instance ToJSON AddressAggregatedListItems where
8751instance ToJSON AddressAggregatedListItems where
8753− toJSON = toJSON . _aaliProperties
8752+ toJSON = toJSON . _aAddtional
8754
8753
8755-- | Contains a list of persistent autoscaler resources.
8754-- | Contains a list of persistent autoscaler resources.
8756--
8755--
@@ -11432,28 +11431,28 @@ instance ToJSON DisksScopedListWarning where
11432--
11431--
11433-- /See:/ 'targetVPNGatewayAggregatedListItems' smart constructor.
11432-- /See:/ 'targetVPNGatewayAggregatedListItems' smart constructor.
11434newtype TargetVPNGatewayAggregatedListItems = TargetVPNGatewayAggregatedListItems
11433newtype TargetVPNGatewayAggregatedListItems = TargetVPNGatewayAggregatedListItems
11435− { _tvgaliProperties :: HashMap Text TargetVPNGatewaysScopedList
11434+ { _tvgaliAddtional :: HashMap Text TargetVPNGatewaysScopedList
11436 } deriving (Eq,Show,Data,Typeable,Generic)
11435 } deriving (Eq,Show,Data,Typeable,Generic)
11437
11436
11438-- | Creates a value of 'TargetVPNGatewayAggregatedListItems' with the minimum fields required to make a request.
11437-- | Creates a value of 'TargetVPNGatewayAggregatedListItems' with the minimum fields required to make a request.
11439--
11438--
11440-- Use one of the following lenses to modify other fields as desired:
11439-- Use one of the following lenses to modify other fields as desired:
11441--
11440--
11442−-- * 'tvgaliProperties'
11441+-- * 'tvgaliAddtional'
11443targetVPNGatewayAggregatedListItems
11442targetVPNGatewayAggregatedListItems
11444− :: HashMap Text TargetVPNGatewaysScopedList -- ^ 'properties'
11443+ :: HashMap Text TargetVPNGatewaysScopedList -- ^ 'addtional'
11445 -> TargetVPNGatewayAggregatedListItems
11444 -> TargetVPNGatewayAggregatedListItems
11446−targetVPNGatewayAggregatedListItems pTvgaliProperties_ =
11445+targetVPNGatewayAggregatedListItems pTvgaliAddtional_ =
11447 TargetVPNGatewayAggregatedListItems
11446 TargetVPNGatewayAggregatedListItems
11448− { _tvgaliProperties = pTvgaliProperties_
11447+ { _tvgaliAddtional = pTvgaliAddtional_
11449 }
11448 }
11450
11449
11451-- | [Output Only] Name of the scope containing this set of target vpn
11450-- | [Output Only] Name of the scope containing this set of target vpn
11452-- gateways.
11451-- gateways.
11453−tvgaliProperties :: Lens' TargetVPNGatewayAggregatedListItems (HashMap Text TargetVPNGatewaysScopedList)
11452+tvgaliAddtional :: Lens' TargetVPNGatewayAggregatedListItems (HashMap Text TargetVPNGatewaysScopedList)
11454−tvgaliProperties
11453+tvgaliAddtional
11455− = lens _tvgaliProperties
11454+ = lens _tvgaliAddtional
11456− (\ s a -> s{_tvgaliProperties = a})
11455+ (\ s a -> s{_tvgaliAddtional = a})
11457
11456
11458instance FromJSON TargetVPNGatewayAggregatedListItems
11457instance FromJSON TargetVPNGatewayAggregatedListItems
11459 where
11458 where
@@ -11465,7 +11464,7 @@ instance FromJSON TargetVPNGatewayAggregatedListItems
11465
11464
11466instance ToJSON TargetVPNGatewayAggregatedListItems
11465instance ToJSON TargetVPNGatewayAggregatedListItems
11467 where
11466 where
11468− toJSON = toJSON . _tvgaliProperties
11467+ toJSON = toJSON . _tvgaliAddtional
11469
11468
11470-- | Informational warning which replaces the list of addresses when the list
11469-- | Informational warning which replaces the list of addresses when the list
11471-- is empty.
11470-- is empty.
@@ -14298,27 +14297,27 @@ instance ToJSON InstanceGroupsScopedList where
14298--
14297--
14299-- /See:/ 'vpnTunnelAggregatedListItems' smart constructor.
14298-- /See:/ 'vpnTunnelAggregatedListItems' smart constructor.
14300newtype VPNTunnelAggregatedListItems = VPNTunnelAggregatedListItems
14299newtype VPNTunnelAggregatedListItems = VPNTunnelAggregatedListItems
14301− { _vtaliProperties :: HashMap Text VPNTunnelsScopedList
14300+ { _vtaliAddtional :: HashMap Text VPNTunnelsScopedList
14302 } deriving (Eq,Show,Data,Typeable,Generic)
14301 } deriving (Eq,Show,Data,Typeable,Generic)
14303
14302
14304-- | Creates a value of 'VPNTunnelAggregatedListItems' with the minimum fields required to make a request.
14303-- | Creates a value of 'VPNTunnelAggregatedListItems' with the minimum fields required to make a request.
14305--
14304--
14306-- Use one of the following lenses to modify other fields as desired:
14305-- Use one of the following lenses to modify other fields as desired:
14307--
14306--
14308−-- * 'vtaliProperties'
14307+-- * 'vtaliAddtional'
14309vpnTunnelAggregatedListItems
14308vpnTunnelAggregatedListItems
14310− :: HashMap Text VPNTunnelsScopedList -- ^ 'properties'
14309+ :: HashMap Text VPNTunnelsScopedList -- ^ 'addtional'
14311 -> VPNTunnelAggregatedListItems
14310 -> VPNTunnelAggregatedListItems
14312−vpnTunnelAggregatedListItems pVtaliProperties_ =
14311+vpnTunnelAggregatedListItems pVtaliAddtional_ =
14313 VPNTunnelAggregatedListItems
14312 VPNTunnelAggregatedListItems
14314− { _vtaliProperties = pVtaliProperties_
14313+ { _vtaliAddtional = pVtaliAddtional_
14315 }
14314 }
14316
14315
14317-- | Name of the scope containing this set of vpn tunnels.
14316-- | Name of the scope containing this set of vpn tunnels.
14318−vtaliProperties :: Lens' VPNTunnelAggregatedListItems (HashMap Text VPNTunnelsScopedList)
14317+vtaliAddtional :: Lens' VPNTunnelAggregatedListItems (HashMap Text VPNTunnelsScopedList)
14319−vtaliProperties
14318+vtaliAddtional
14320− = lens _vtaliProperties
14319+ = lens _vtaliAddtional
14321− (\ s a -> s{_vtaliProperties = a})
14320+ (\ s a -> s{_vtaliAddtional = a})
14322
14321
14323instance FromJSON VPNTunnelAggregatedListItems where
14322instance FromJSON VPNTunnelAggregatedListItems where
14324 parseJSON
14323 parseJSON
@@ -14327,7 +14326,7 @@ instance FromJSON VPNTunnelAggregatedListItems where
14327 VPNTunnelAggregatedListItems <$> (parseJSONObject o))
14326 VPNTunnelAggregatedListItems <$> (parseJSONObject o))
14328
14327
14329instance ToJSON VPNTunnelAggregatedListItems where
14328instance ToJSON VPNTunnelAggregatedListItems where
14330− toJSON = toJSON . _vtaliProperties
14329+ toJSON = toJSON . _vtaliAddtional
14331
14330
14332-- | A set of instance tags.
14331-- | A set of instance tags.
14333--
14332--
gogol-customsearch/gen/Network/Google/CustomSearch.hs+7−7
@@ -50,7 +50,12 @@ module Network.Google.CustomSearch
50 -- ** SearchQueries
50 -- ** SearchQueries
51 , SearchQueries
51 , SearchQueries
52 , searchQueries
52 , searchQueries
53− , sqProperties
53+ , sqAddtional
54+
55+ -- ** ResultPagemapAdditionalItem
56+ , ResultPagemapAdditionalItem
57+ , resultPagemapAdditionalItem
58+ , rpaiAddtional
54
59
55 -- ** SearchURL
60 -- ** SearchURL
56 , SearchURL
61 , SearchURL
@@ -84,7 +89,7 @@ module Network.Google.CustomSearch
84 -- ** ResultPagemap
89 -- ** ResultPagemap
85 , ResultPagemap
90 , ResultPagemap
86 , resultPagemap
91 , resultPagemap
87− , rpProperties
92+ , rpAddtional
88
93
89 -- ** CSEListImgColorType
94 -- ** CSEListImgColorType
90 , CSEListImgColorType (..)
95 , CSEListImgColorType (..)
@@ -167,11 +172,6 @@ module Network.Google.CustomSearch
167 , qHq
172 , qHq
168 , qHighRange
173 , qHighRange
169
174
170− -- ** ResultPagemapPropertiesItem
171− , ResultPagemapPropertiesItem
172− , resultPagemapPropertiesItem
173− , rppiProperties
174−
175 -- ** PromotionBodyLinesItem
175 -- ** PromotionBodyLinesItem
176 , PromotionBodyLinesItem
176 , PromotionBodyLinesItem
177 , promotionBodyLinesItem
177 , promotionBodyLinesItem
gogol-customsearch/gen/Network/Google/CustomSearch/Types.hs+7−7
@@ -40,7 +40,12 @@ module Network.Google.CustomSearch.Types
40 -- * SearchQueries
40 -- * SearchQueries
41 , SearchQueries
41 , SearchQueries
42 , searchQueries
42 , searchQueries
43− , sqProperties
43+ , sqAddtional
44+
45+ -- * ResultPagemapAdditionalItem
46+ , ResultPagemapAdditionalItem
47+ , resultPagemapAdditionalItem
48+ , rpaiAddtional
44
49
45 -- * SearchURL
50 -- * SearchURL
46 , SearchURL
51 , SearchURL
@@ -74,7 +79,7 @@ module Network.Google.CustomSearch.Types
74 -- * ResultPagemap
79 -- * ResultPagemap
75 , ResultPagemap
80 , ResultPagemap
76 , resultPagemap
81 , resultPagemap
77− , rpProperties
82+ , rpAddtional
78
83
79 -- * CSEListImgColorType
84 -- * CSEListImgColorType
80 , CSEListImgColorType (..)
85 , CSEListImgColorType (..)
@@ -157,11 +162,6 @@ module Network.Google.CustomSearch.Types
157 , qHq
162 , qHq
158 , qHighRange
163 , qHighRange
159
164
160− -- * ResultPagemapPropertiesItem
161− , ResultPagemapPropertiesItem
162− , resultPagemapPropertiesItem
163− , rppiProperties
164−
165 -- * PromotionBodyLinesItem
165 -- * PromotionBodyLinesItem
166 , PromotionBodyLinesItem
166 , PromotionBodyLinesItem
167 , promotionBodyLinesItem
167 , promotionBodyLinesItem
gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+51−51
@@ -118,25 +118,25 @@ instance ToJSON Context where
118--
118--
119-- /See:/ 'searchQueries' smart constructor.
119-- /See:/ 'searchQueries' smart constructor.
120newtype SearchQueries = SearchQueries
120newtype SearchQueries = SearchQueries
121− { _sqProperties :: HashMap Text [Query]
121+ { _sqAddtional :: HashMap Text [Query]
122 } deriving (Eq,Show,Data,Typeable,Generic)
122 } deriving (Eq,Show,Data,Typeable,Generic)
123
123
124-- | Creates a value of 'SearchQueries' with the minimum fields required to make a request.
124-- | Creates a value of 'SearchQueries' with the minimum fields required to make a request.
125--
125--
126-- Use one of the following lenses to modify other fields as desired:
126-- Use one of the following lenses to modify other fields as desired:
127--
127--
128−-- * 'sqProperties'
128+-- * 'sqAddtional'
129searchQueries
129searchQueries
130− :: HashMap Text [Query] -- ^ 'properties'
130+ :: HashMap Text [Query] -- ^ 'addtional'
131 -> SearchQueries
131 -> SearchQueries
132−searchQueries pSqProperties_ =
132+searchQueries pSqAddtional_ =
133 SearchQueries
133 SearchQueries
134− { _sqProperties = pSqProperties_
134+ { _sqAddtional = pSqAddtional_
135 }
135 }
136
136
137−sqProperties :: Lens' SearchQueries (HashMap Text [Query])
137+sqAddtional :: Lens' SearchQueries (HashMap Text [Query])
138−sqProperties
138+sqAddtional
139− = lens _sqProperties (\ s a -> s{_sqProperties = a})
139+ = lens _sqAddtional (\ s a -> s{_sqAddtional = a})
140
140
141instance FromJSON SearchQueries where
141instance FromJSON SearchQueries where
142 parseJSON
142 parseJSON
@@ -144,7 +144,40 @@ instance FromJSON SearchQueries where
144 (\ o -> SearchQueries <$> (parseJSONObject o))
144 (\ o -> SearchQueries <$> (parseJSONObject o))
145
145
146instance ToJSON SearchQueries where
146instance 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
148
181
149--
182--
150-- /See:/ 'searchURL' smart constructor.
183-- /See:/ 'searchURL' smart constructor.
@@ -337,25 +370,25 @@ instance ToJSON ResultImage where
337--
370--
338-- /See:/ 'resultPagemap' smart constructor.
371-- /See:/ 'resultPagemap' smart constructor.
339newtype ResultPagemap = ResultPagemap
372newtype ResultPagemap = ResultPagemap
340− { _rpProperties :: HashMap Text [ResultPagemapPropertiesItem]
373+ { _rpAddtional :: HashMap Text [ResultPagemapAdditionalItem]
341 } deriving (Eq,Show,Data,Typeable,Generic)
374 } deriving (Eq,Show,Data,Typeable,Generic)
342
375
343-- | Creates a value of 'ResultPagemap' with the minimum fields required to make a request.
376-- | Creates a value of 'ResultPagemap' with the minimum fields required to make a request.
344--
377--
345-- Use one of the following lenses to modify other fields as desired:
378-- Use one of the following lenses to modify other fields as desired:
346--
379--
347−-- * 'rpProperties'
380+-- * 'rpAddtional'
348resultPagemap
381resultPagemap
349− :: HashMap Text [ResultPagemapPropertiesItem] -- ^ 'properties'
382+ :: HashMap Text [ResultPagemapAdditionalItem] -- ^ 'addtional'
350 -> ResultPagemap
383 -> ResultPagemap
351−resultPagemap pRpProperties_ =
384+resultPagemap pRpAddtional_ =
352 ResultPagemap
385 ResultPagemap
353− { _rpProperties = pRpProperties_
386+ { _rpAddtional = pRpAddtional_
354 }
387 }
355
388
356−rpProperties :: Lens' ResultPagemap (HashMap Text [ResultPagemapPropertiesItem])
389+rpAddtional :: Lens' ResultPagemap (HashMap Text [ResultPagemapAdditionalItem])
357−rpProperties
390+rpAddtional
358− = lens _rpProperties (\ s a -> s{_rpProperties = a})
391+ = lens _rpAddtional (\ s a -> s{_rpAddtional = a})
359
392
360instance FromJSON ResultPagemap where
393instance FromJSON ResultPagemap where
361 parseJSON
394 parseJSON
@@ -363,7 +396,7 @@ instance FromJSON ResultPagemap where
363 (\ o -> ResultPagemap <$> (parseJSONObject o))
396 (\ o -> ResultPagemap <$> (parseJSONObject o))
364
397
365instance ToJSON ResultPagemap where
398instance ToJSON ResultPagemap where
366− toJSON = toJSON . _rpProperties
399+ toJSON = toJSON . _rpAddtional
367
400
368--
401--
369-- /See:/ 'result' smart constructor.
402-- /See:/ 'result' smart constructor.
@@ -1044,39 +1077,6 @@ instance ToJSON Query where
1044 ("hq" .=) <$> _qHq,
1077 ("hq" .=) <$> _qHq,
1045 ("highRange" .=) <$> _qHighRange])
1078 ("highRange" .=) <$> _qHighRange])
1046
1079
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−
1080--
1080--
1081-- /See:/ 'promotionBodyLinesItem' smart constructor.
1081-- /See:/ 'promotionBodyLinesItem' smart constructor.
1082data PromotionBodyLinesItem = PromotionBodyLinesItem
1082data PromotionBodyLinesItem = PromotionBodyLinesItem
gogol-dataflow/gen/Network/Google/Dataflow.hs+24−24
@@ -52,7 +52,7 @@ module Network.Google.Dataflow
52 -- ** JobExecutionInfoStages
52 -- ** JobExecutionInfoStages
53 , JobExecutionInfoStages
53 , JobExecutionInfoStages
54 , jobExecutionInfoStages
54 , jobExecutionInfoStages
55− , jeisProperties
55+ , jeisAddtional
56
56
57 -- ** ComputationTopology
57 -- ** ComputationTopology
58 , ComputationTopology
58 , ComputationTopology
@@ -106,7 +106,7 @@ module Network.Google.Dataflow
106 -- ** WorkerPoolMetadata
106 -- ** WorkerPoolMetadata
107 , WorkerPoolMetadata
107 , WorkerPoolMetadata
108 , workerPoolMetadata
108 , workerPoolMetadata
109− , wpmProperties
109+ , wpmAddtional
110
110
111 -- ** AutoscalingSettings
111 -- ** AutoscalingSettings
112 , AutoscalingSettings
112 , AutoscalingSettings
@@ -136,7 +136,7 @@ module Network.Google.Dataflow
136 -- ** EnvironmentVersion
136 -- ** EnvironmentVersion
137 , EnvironmentVersion
137 , EnvironmentVersion
138 , environmentVersion
138 , environmentVersion
139− , evProperties
139+ , evAddtional
140
140
141 -- ** Sink
141 -- ** Sink
142 , Sink
142 , Sink
@@ -160,7 +160,7 @@ module Network.Google.Dataflow
160 -- ** EnvironmentUserAgent
160 -- ** EnvironmentUserAgent
161 , EnvironmentUserAgent
161 , EnvironmentUserAgent
162 , environmentUserAgent
162 , environmentUserAgent
163− , euaProperties
163+ , euaAddtional
164
164
165 -- ** Disk
165 -- ** Disk
166 , Disk
166 , Disk
@@ -209,7 +209,7 @@ module Network.Google.Dataflow
209 -- ** MetricStructuredNameContext
209 -- ** MetricStructuredNameContext
210 , MetricStructuredNameContext
210 , MetricStructuredNameContext
211 , metricStructuredNameContext
211 , metricStructuredNameContext
212− , msncProperties
212+ , msncAddtional
213
213
214 -- ** StreamingStageLocation
214 -- ** StreamingStageLocation
215 , StreamingStageLocation
215 , StreamingStageLocation
@@ -251,12 +251,12 @@ module Network.Google.Dataflow
251 -- ** JobTransformNameMApping
251 -- ** JobTransformNameMApping
252 , JobTransformNameMApping
252 , JobTransformNameMApping
253 , jobTransformNameMApping
253 , jobTransformNameMApping
254− , jtnmaProperties
254+ , jtnmaAddtional
255
255
256 -- ** SourceSpec
256 -- ** SourceSpec
257 , SourceSpec
257 , SourceSpec
258 , sourceSpec
258 , sourceSpec
259− , ssProperties
259+ , ssAddtional
260
260
261 -- ** SourceMetadata
261 -- ** SourceMetadata
262 , SourceMetadata
262 , SourceMetadata
@@ -268,7 +268,7 @@ module Network.Google.Dataflow
268 -- ** EnvironmentInternalExperiments
268 -- ** EnvironmentInternalExperiments
269 , EnvironmentInternalExperiments
269 , EnvironmentInternalExperiments
270 , environmentInternalExperiments
270 , environmentInternalExperiments
271− , eieProperties
271+ , eieAddtional
272
272
273 -- ** TaskRunnerSettings
273 -- ** TaskRunnerSettings
274 , TaskRunnerSettings
274 , TaskRunnerSettings
@@ -296,7 +296,7 @@ module Network.Google.Dataflow
296 -- ** EnvironmentSdkPipelineOptions
296 -- ** EnvironmentSdkPipelineOptions
297 , EnvironmentSdkPipelineOptions
297 , EnvironmentSdkPipelineOptions
298 , environmentSdkPipelineOptions
298 , environmentSdkPipelineOptions
299− , espoProperties
299+ , espoAddtional
300
300
301 -- ** LeaseWorkItemRequest
301 -- ** LeaseWorkItemRequest
302 , LeaseWorkItemRequest
302 , LeaseWorkItemRequest
@@ -316,7 +316,7 @@ module Network.Google.Dataflow
316 -- ** TopologyConfigUserStageToComputationNameMap
316 -- ** TopologyConfigUserStageToComputationNameMap
317 , TopologyConfigUserStageToComputationNameMap
317 , TopologyConfigUserStageToComputationNameMap
318 , topologyConfigUserStageToComputationNameMap
318 , topologyConfigUserStageToComputationNameMap
319− , tcustcnmProperties
319+ , tcustcnmAddtional
320
320
321 -- ** ShellTask
321 -- ** ShellTask
322 , ShellTask
322 , ShellTask
@@ -327,12 +327,12 @@ module Network.Google.Dataflow
327 -- ** StatusDetailsItem
327 -- ** StatusDetailsItem
328 , StatusDetailsItem
328 , StatusDetailsItem
329 , statusDetailsItem
329 , statusDetailsItem
330− , sdiProperties
330+ , sdiAddtional
331
331
332 -- ** StepProperties
332 -- ** StepProperties
333 , StepProperties
333 , StepProperties
334 , stepProperties
334 , stepProperties
335− , spProperties
335+ , spAddtional
336
336
337 -- ** TopologyConfig
337 -- ** TopologyConfig
338 , TopologyConfig
338 , TopologyConfig
@@ -354,7 +354,7 @@ module Network.Google.Dataflow
354 -- ** WorkItemServiceStateHarnessData
354 -- ** WorkItemServiceStateHarnessData
355 , WorkItemServiceStateHarnessData
355 , WorkItemServiceStateHarnessData
356 , workItemServiceStateHarnessData
356 , workItemServiceStateHarnessData
357− , wisshdProperties
357+ , wisshdAddtional
358
358
359 -- ** DataDiskAssignment
359 -- ** DataDiskAssignment
360 , DataDiskAssignment
360 , DataDiskAssignment
@@ -382,7 +382,7 @@ module Network.Google.Dataflow
382 -- ** PartialGroupByKeyInstructionInputElementCodec
382 -- ** PartialGroupByKeyInstructionInputElementCodec
383 , PartialGroupByKeyInstructionInputElementCodec
383 , PartialGroupByKeyInstructionInputElementCodec
384 , partialGroupByKeyInstructionInputElementCodec
384 , partialGroupByKeyInstructionInputElementCodec
385− , pgbkiiecProperties
385+ , pgbkiiecAddtional
386
386
387 -- ** MapTask
387 -- ** MapTask
388 , MapTask
388 , MapTask
@@ -399,17 +399,17 @@ module Network.Google.Dataflow
399 -- ** SinkCodec
399 -- ** SinkCodec
400 , SinkCodec
400 , SinkCodec
401 , sinkCodec
401 , sinkCodec
402− , scProperties
402+ , scAddtional
403
403
404 -- ** ParDoInstructionUserFn
404 -- ** ParDoInstructionUserFn
405 , ParDoInstructionUserFn
405 , ParDoInstructionUserFn
406 , parDoInstructionUserFn
406 , parDoInstructionUserFn
407− , pdiufProperties
407+ , pdiufAddtional
408
408
409 -- ** InstructionOutputCodec
409 -- ** InstructionOutputCodec
410 , InstructionOutputCodec
410 , InstructionOutputCodec
411 , instructionOutputCodec
411 , instructionOutputCodec
412− , iocProperties
412+ , iocAddtional
413
413
414 -- ** StreamLocation
414 -- ** StreamLocation
415 , StreamLocation
415 , StreamLocation
@@ -422,7 +422,7 @@ module Network.Google.Dataflow
422 -- ** WorkerPoolPoolArgs
422 -- ** WorkerPoolPoolArgs
423 , WorkerPoolPoolArgs
423 , WorkerPoolPoolArgs
424 , workerPoolPoolArgs
424 , workerPoolPoolArgs
425− , wppaProperties
425+ , wppaAddtional
426
426
427 -- ** StreamingSideInputLocation
427 -- ** StreamingSideInputLocation
428 , StreamingSideInputLocation
428 , StreamingSideInputLocation
@@ -459,12 +459,12 @@ module Network.Google.Dataflow
459 -- ** SeqMapTaskUserFn
459 -- ** SeqMapTaskUserFn
460 , SeqMapTaskUserFn
460 , SeqMapTaskUserFn
461 , seqMapTaskUserFn
461 , seqMapTaskUserFn
462− , smtufProperties
462+ , smtufAddtional
463
463
464 -- ** PartialGroupByKeyInstructionValueCombiningFn
464 -- ** PartialGroupByKeyInstructionValueCombiningFn
465 , PartialGroupByKeyInstructionValueCombiningFn
465 , PartialGroupByKeyInstructionValueCombiningFn
466 , partialGroupByKeyInstructionValueCombiningFn
466 , partialGroupByKeyInstructionValueCombiningFn
467− , pgbkivcfProperties
467+ , pgbkivcfAddtional
468
468
469 -- ** Job
469 -- ** Job
470 , Job
470 , Job
@@ -493,7 +493,7 @@ module Network.Google.Dataflow
493 -- ** SinkSpec
493 -- ** SinkSpec
494 , SinkSpec
494 , SinkSpec
495 , sinkSpec
495 , sinkSpec
496− , ssProperties
496+ , sAddtional
497
497
498 -- ** WorkerPool
498 -- ** WorkerPool
499 , WorkerPool
499 , WorkerPool
@@ -614,7 +614,7 @@ module Network.Google.Dataflow
614 -- ** SourceBaseSpecsItem
614 -- ** SourceBaseSpecsItem
615 , SourceBaseSpecsItem
615 , SourceBaseSpecsItem
616 , sourceBaseSpecsItem
616 , sourceBaseSpecsItem
617− , sbsiProperties
617+ , sbsiAddtional
618
618
619 -- ** ParallelInstruction
619 -- ** ParallelInstruction
620 , ParallelInstruction
620 , ParallelInstruction
@@ -631,7 +631,7 @@ module Network.Google.Dataflow
631 -- ** SideInputInfoKind
631 -- ** SideInputInfoKind
632 , SideInputInfoKind
632 , SideInputInfoKind
633 , sideInputInfoKind
633 , sideInputInfoKind
634− , siikProperties
634+ , siikAddtional
635
635
636 -- ** SourceSplitShard
636 -- ** SourceSplitShard
637 , SourceSplitShard
637 , SourceSplitShard
@@ -654,7 +654,7 @@ module Network.Google.Dataflow
654 -- ** SourceCodec
654 -- ** SourceCodec
655 , SourceCodec
655 , SourceCodec
656 , sourceCodec
656 , sourceCodec
657− , scProperties
657+ , souAddtional
658
658
659 -- ** StateFamilyConfig
659 -- ** StateFamilyConfig
660 , StateFamilyConfig
660 , StateFamilyConfig
gogol-dataflow/gen/Network/Google/Dataflow/Types.hs+24−24
@@ -21,7 +21,7 @@ module Network.Google.Dataflow.Types
21 -- * JobExecutionInfoStages
21 -- * JobExecutionInfoStages
22 , JobExecutionInfoStages
22 , JobExecutionInfoStages
23 , jobExecutionInfoStages
23 , jobExecutionInfoStages
24− , jeisProperties
24+ , jeisAddtional
25
25
26 -- * ComputationTopology
26 -- * ComputationTopology
27 , ComputationTopology
27 , ComputationTopology
@@ -75,7 +75,7 @@ module Network.Google.Dataflow.Types
75 -- * WorkerPoolMetadata
75 -- * WorkerPoolMetadata
76 , WorkerPoolMetadata
76 , WorkerPoolMetadata
77 , workerPoolMetadata
77 , workerPoolMetadata
78− , wpmProperties
78+ , wpmAddtional
79
79
80 -- * AutoscalingSettings
80 -- * AutoscalingSettings
81 , AutoscalingSettings
81 , AutoscalingSettings
@@ -105,7 +105,7 @@ module Network.Google.Dataflow.Types
105 -- * EnvironmentVersion
105 -- * EnvironmentVersion
106 , EnvironmentVersion
106 , EnvironmentVersion
107 , environmentVersion
107 , environmentVersion
108− , evProperties
108+ , evAddtional
109
109
110 -- * Sink
110 -- * Sink
111 , Sink
111 , Sink
@@ -129,7 +129,7 @@ module Network.Google.Dataflow.Types
129 -- * EnvironmentUserAgent
129 -- * EnvironmentUserAgent
130 , EnvironmentUserAgent
130 , EnvironmentUserAgent
131 , environmentUserAgent
131 , environmentUserAgent
132− , euaProperties
132+ , euaAddtional
133
133
134 -- * Disk
134 -- * Disk
135 , Disk
135 , Disk
@@ -178,7 +178,7 @@ module Network.Google.Dataflow.Types
178 -- * MetricStructuredNameContext
178 -- * MetricStructuredNameContext
179 , MetricStructuredNameContext
179 , MetricStructuredNameContext
180 , metricStructuredNameContext
180 , metricStructuredNameContext
181− , msncProperties
181+ , msncAddtional
182
182
183 -- * StreamingStageLocation
183 -- * StreamingStageLocation
184 , StreamingStageLocation
184 , StreamingStageLocation
@@ -220,12 +220,12 @@ module Network.Google.Dataflow.Types
220 -- * JobTransformNameMApping
220 -- * JobTransformNameMApping
221 , JobTransformNameMApping
221 , JobTransformNameMApping
222 , jobTransformNameMApping
222 , jobTransformNameMApping
223− , jtnmaProperties
223+ , jtnmaAddtional
224
224
225 -- * SourceSpec
225 -- * SourceSpec
226 , SourceSpec
226 , SourceSpec
227 , sourceSpec
227 , sourceSpec
228− , ssProperties
228+ , ssAddtional
229
229
230 -- * SourceMetadata
230 -- * SourceMetadata
231 , SourceMetadata
231 , SourceMetadata
@@ -237,7 +237,7 @@ module Network.Google.Dataflow.Types
237 -- * EnvironmentInternalExperiments
237 -- * EnvironmentInternalExperiments
238 , EnvironmentInternalExperiments
238 , EnvironmentInternalExperiments
239 , environmentInternalExperiments
239 , environmentInternalExperiments
240− , eieProperties
240+ , eieAddtional
241
241
242 -- * TaskRunnerSettings
242 -- * TaskRunnerSettings
243 , TaskRunnerSettings
243 , TaskRunnerSettings
@@ -265,7 +265,7 @@ module Network.Google.Dataflow.Types
265 -- * EnvironmentSdkPipelineOptions
265 -- * EnvironmentSdkPipelineOptions
266 , EnvironmentSdkPipelineOptions
266 , EnvironmentSdkPipelineOptions
267 , environmentSdkPipelineOptions
267 , environmentSdkPipelineOptions
268− , espoProperties
268+ , espoAddtional
269
269
270 -- * LeaseWorkItemRequest
270 -- * LeaseWorkItemRequest
271 , LeaseWorkItemRequest
271 , LeaseWorkItemRequest
@@ -285,7 +285,7 @@ module Network.Google.Dataflow.Types
285 -- * TopologyConfigUserStageToComputationNameMap
285 -- * TopologyConfigUserStageToComputationNameMap
286 , TopologyConfigUserStageToComputationNameMap
286 , TopologyConfigUserStageToComputationNameMap
287 , topologyConfigUserStageToComputationNameMap
287 , topologyConfigUserStageToComputationNameMap
288− , tcustcnmProperties
288+ , tcustcnmAddtional
289
289
290 -- * ShellTask
290 -- * ShellTask
291 , ShellTask
291 , ShellTask
@@ -296,12 +296,12 @@ module Network.Google.Dataflow.Types
296 -- * StatusDetailsItem
296 -- * StatusDetailsItem
297 , StatusDetailsItem
297 , StatusDetailsItem
298 , statusDetailsItem
298 , statusDetailsItem
299− , sdiProperties
299+ , sdiAddtional
300
300
301 -- * StepProperties
301 -- * StepProperties
302 , StepProperties
302 , StepProperties
303 , stepProperties
303 , stepProperties
304− , spProperties
304+ , spAddtional
305
305
306 -- * TopologyConfig
306 -- * TopologyConfig
307 , TopologyConfig
307 , TopologyConfig
@@ -323,7 +323,7 @@ module Network.Google.Dataflow.Types
323 -- * WorkItemServiceStateHarnessData
323 -- * WorkItemServiceStateHarnessData
324 , WorkItemServiceStateHarnessData
324 , WorkItemServiceStateHarnessData
325 , workItemServiceStateHarnessData
325 , workItemServiceStateHarnessData
326− , wisshdProperties
326+ , wisshdAddtional
327
327
328 -- * DataDiskAssignment
328 -- * DataDiskAssignment
329 , DataDiskAssignment
329 , DataDiskAssignment
@@ -351,7 +351,7 @@ module Network.Google.Dataflow.Types
351 -- * PartialGroupByKeyInstructionInputElementCodec
351 -- * PartialGroupByKeyInstructionInputElementCodec
352 , PartialGroupByKeyInstructionInputElementCodec
352 , PartialGroupByKeyInstructionInputElementCodec
353 , partialGroupByKeyInstructionInputElementCodec
353 , partialGroupByKeyInstructionInputElementCodec
354− , pgbkiiecProperties
354+ , pgbkiiecAddtional
355
355
356 -- * MapTask
356 -- * MapTask
357 , MapTask
357 , MapTask
@@ -368,17 +368,17 @@ module Network.Google.Dataflow.Types
368 -- * SinkCodec
368 -- * SinkCodec
369 , SinkCodec
369 , SinkCodec
370 , sinkCodec
370 , sinkCodec
371− , scProperties
371+ , scAddtional
372
372
373 -- * ParDoInstructionUserFn
373 -- * ParDoInstructionUserFn
374 , ParDoInstructionUserFn
374 , ParDoInstructionUserFn
375 , parDoInstructionUserFn
375 , parDoInstructionUserFn
376− , pdiufProperties
376+ , pdiufAddtional
377
377
378 -- * InstructionOutputCodec
378 -- * InstructionOutputCodec
379 , InstructionOutputCodec
379 , InstructionOutputCodec
380 , instructionOutputCodec
380 , instructionOutputCodec
381− , iocProperties
381+ , iocAddtional
382
382
383 -- * StreamLocation
383 -- * StreamLocation
384 , StreamLocation
384 , StreamLocation
@@ -391,7 +391,7 @@ module Network.Google.Dataflow.Types
391 -- * WorkerPoolPoolArgs
391 -- * WorkerPoolPoolArgs
392 , WorkerPoolPoolArgs
392 , WorkerPoolPoolArgs
393 , workerPoolPoolArgs
393 , workerPoolPoolArgs
394− , wppaProperties
394+ , wppaAddtional
395
395
396 -- * StreamingSideInputLocation
396 -- * StreamingSideInputLocation
397 , StreamingSideInputLocation
397 , StreamingSideInputLocation
@@ -428,12 +428,12 @@ module Network.Google.Dataflow.Types
428 -- * SeqMapTaskUserFn
428 -- * SeqMapTaskUserFn
429 , SeqMapTaskUserFn
429 , SeqMapTaskUserFn
430 , seqMapTaskUserFn
430 , seqMapTaskUserFn
431− , smtufProperties
431+ , smtufAddtional
432
432
433 -- * PartialGroupByKeyInstructionValueCombiningFn
433 -- * PartialGroupByKeyInstructionValueCombiningFn
434 , PartialGroupByKeyInstructionValueCombiningFn
434 , PartialGroupByKeyInstructionValueCombiningFn
435 , partialGroupByKeyInstructionValueCombiningFn
435 , partialGroupByKeyInstructionValueCombiningFn
436− , pgbkivcfProperties
436+ , pgbkivcfAddtional
437
437
438 -- * Job
438 -- * Job
439 , Job
439 , Job
@@ -462,7 +462,7 @@ module Network.Google.Dataflow.Types
462 -- * SinkSpec
462 -- * SinkSpec
463 , SinkSpec
463 , SinkSpec
464 , sinkSpec
464 , sinkSpec
465− , ssProperties
465+ , sAddtional
466
466
467 -- * WorkerPool
467 -- * WorkerPool
468 , WorkerPool
468 , WorkerPool
@@ -583,7 +583,7 @@ module Network.Google.Dataflow.Types
583 -- * SourceBaseSpecsItem
583 -- * SourceBaseSpecsItem
584 , SourceBaseSpecsItem
584 , SourceBaseSpecsItem
585 , sourceBaseSpecsItem
585 , sourceBaseSpecsItem
586− , sbsiProperties
586+ , sbsiAddtional
587
587
588 -- * ParallelInstruction
588 -- * ParallelInstruction
589 , ParallelInstruction
589 , ParallelInstruction
@@ -600,7 +600,7 @@ module Network.Google.Dataflow.Types
600 -- * SideInputInfoKind
600 -- * SideInputInfoKind
601 , SideInputInfoKind
601 , SideInputInfoKind
602 , sideInputInfoKind
602 , sideInputInfoKind
603− , siikProperties
603+ , siikAddtional
604
604
605 -- * SourceSplitShard
605 -- * SourceSplitShard
606 , SourceSplitShard
606 , SourceSplitShard
@@ -623,7 +623,7 @@ module Network.Google.Dataflow.Types
623 -- * SourceCodec
623 -- * SourceCodec
624 , SourceCodec
624 , SourceCodec
625 , sourceCodec
625 , sourceCodec
626− , scProperties
626+ , souAddtional
627
627
628 -- * StateFamilyConfig
628 -- * StateFamilyConfig
629 , StateFamilyConfig
629 , StateFamilyConfig
gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+229−234
@@ -24,26 +24,26 @@ import Network.Google.Prelude
24--
24--
25-- /See:/ 'jobExecutionInfoStages' smart constructor.
25-- /See:/ 'jobExecutionInfoStages' smart constructor.
26newtype JobExecutionInfoStages = JobExecutionInfoStages
26newtype JobExecutionInfoStages = JobExecutionInfoStages
27− { _jeisProperties :: HashMap Text JobExecutionStageInfo
27+ { _jeisAddtional :: HashMap Text JobExecutionStageInfo
28 } deriving (Eq,Show,Data,Typeable,Generic)
28 } deriving (Eq,Show,Data,Typeable,Generic)
29
29
30-- | Creates a value of 'JobExecutionInfoStages' with the minimum fields required to make a request.
30-- | Creates a value of 'JobExecutionInfoStages' with the minimum fields required to make a request.
31--
31--
32-- Use one of the following lenses to modify other fields as desired:
32-- Use one of the following lenses to modify other fields as desired:
33--
33--
34−-- * 'jeisProperties'
34+-- * 'jeisAddtional'
35jobExecutionInfoStages
35jobExecutionInfoStages
36− :: HashMap Text JobExecutionStageInfo -- ^ 'properties'
36+ :: HashMap Text JobExecutionStageInfo -- ^ 'addtional'
37 -> JobExecutionInfoStages
37 -> JobExecutionInfoStages
38−jobExecutionInfoStages pJeisProperties_ =
38+jobExecutionInfoStages pJeisAddtional_ =
39 JobExecutionInfoStages
39 JobExecutionInfoStages
40− { _jeisProperties = pJeisProperties_
40+ { _jeisAddtional = pJeisAddtional_
41 }
41 }
42
42
43−jeisProperties :: Lens' JobExecutionInfoStages (HashMap Text JobExecutionStageInfo)
43+jeisAddtional :: Lens' JobExecutionInfoStages (HashMap Text JobExecutionStageInfo)
44−jeisProperties
44+jeisAddtional
45− = lens _jeisProperties
45+ = lens _jeisAddtional
46− (\ s a -> s{_jeisProperties = a})
46+ (\ s a -> s{_jeisAddtional = a})
47
47
48instance FromJSON JobExecutionInfoStages where
48instance FromJSON JobExecutionInfoStages where
49 parseJSON
49 parseJSON
@@ -52,7 +52,7 @@ instance FromJSON JobExecutionInfoStages where
52 JobExecutionInfoStages <$> (parseJSONObject o))
52 JobExecutionInfoStages <$> (parseJSONObject o))
53
53
54instance ToJSON JobExecutionInfoStages where
54instance ToJSON JobExecutionInfoStages where
55− toJSON = toJSON . _jeisProperties
55+ toJSON = toJSON . _jeisAddtional
56
56
57-- | All configuration data for a particular Computation.
57-- | All configuration data for a particular Computation.
58--
58--
@@ -583,26 +583,25 @@ instance ToJSON SourceSplitOptions where
583--
583--
584-- /See:/ 'workerPoolMetadata' smart constructor.
584-- /See:/ 'workerPoolMetadata' smart constructor.
585newtype WorkerPoolMetadata = WorkerPoolMetadata
585newtype WorkerPoolMetadata = WorkerPoolMetadata
586− { _wpmProperties :: HashMap Text Text
586+ { _wpmAddtional :: HashMap Text Text
587 } deriving (Eq,Show,Data,Typeable,Generic)
587 } deriving (Eq,Show,Data,Typeable,Generic)
588
588
589-- | Creates a value of 'WorkerPoolMetadata' with the minimum fields required to make a request.
589-- | Creates a value of 'WorkerPoolMetadata' with the minimum fields required to make a request.
590--
590--
591-- Use one of the following lenses to modify other fields as desired:
591-- Use one of the following lenses to modify other fields as desired:
592--
592--
593−-- * 'wpmProperties'
593+-- * 'wpmAddtional'
594workerPoolMetadata
594workerPoolMetadata
595− :: HashMap Text Text -- ^ 'properties'
595+ :: HashMap Text Text -- ^ 'addtional'
596 -> WorkerPoolMetadata
596 -> WorkerPoolMetadata
597−workerPoolMetadata pWpmProperties_ =
597+workerPoolMetadata pWpmAddtional_ =
598 WorkerPoolMetadata
598 WorkerPoolMetadata
599− { _wpmProperties = pWpmProperties_
599+ { _wpmAddtional = pWpmAddtional_
600 }
600 }
601
601
602−wpmProperties :: Lens' WorkerPoolMetadata (HashMap Text Text)
602+wpmAddtional :: Lens' WorkerPoolMetadata (HashMap Text Text)
603−wpmProperties
603+wpmAddtional
604− = lens _wpmProperties
604+ = lens _wpmAddtional (\ s a -> s{_wpmAddtional = a})
605− (\ s a -> s{_wpmProperties = a})
606
605
607instance FromJSON WorkerPoolMetadata where
606instance FromJSON WorkerPoolMetadata where
608 parseJSON
607 parseJSON
@@ -610,7 +609,7 @@ instance FromJSON WorkerPoolMetadata where
610 (\ o -> WorkerPoolMetadata <$> (parseJSONObject o))
609 (\ o -> WorkerPoolMetadata <$> (parseJSONObject o))
611
610
612instance ToJSON WorkerPoolMetadata where
611instance ToJSON WorkerPoolMetadata where
613− toJSON = toJSON . _wpmProperties
612+ toJSON = toJSON . _wpmAddtional
614
613
615-- | Settings for WorkerPool autoscaling.
614-- | Settings for WorkerPool autoscaling.
616--
615--
@@ -832,26 +831,26 @@ instance ToJSON ReportWorkItemStatusRequest where
832--
831--
833-- /See:/ 'environmentVersion' smart constructor.
832-- /See:/ 'environmentVersion' smart constructor.
834newtype EnvironmentVersion = EnvironmentVersion
833newtype EnvironmentVersion = EnvironmentVersion
835− { _evProperties :: HashMap Text JSONValue
834+ { _evAddtional :: HashMap Text JSONValue
836 } deriving (Eq,Show,Data,Typeable,Generic)
835 } deriving (Eq,Show,Data,Typeable,Generic)
837
836
838-- | Creates a value of 'EnvironmentVersion' with the minimum fields required to make a request.
837-- | Creates a value of 'EnvironmentVersion' with the minimum fields required to make a request.
839--
838--
840-- Use one of the following lenses to modify other fields as desired:
839-- Use one of the following lenses to modify other fields as desired:
841--
840--
842−-- * 'evProperties'
841+-- * 'evAddtional'
843environmentVersion
842environmentVersion
844− :: HashMap Text JSONValue -- ^ 'properties'
843+ :: HashMap Text JSONValue -- ^ 'addtional'
845 -> EnvironmentVersion
844 -> EnvironmentVersion
846−environmentVersion pEvProperties_ =
845+environmentVersion pEvAddtional_ =
847 EnvironmentVersion
846 EnvironmentVersion
848− { _evProperties = pEvProperties_
847+ { _evAddtional = pEvAddtional_
849 }
848 }
850
849
851-- | Properties of the object.
850-- | Properties of the object.
852−evProperties :: Lens' EnvironmentVersion (HashMap Text JSONValue)
851+evAddtional :: Lens' EnvironmentVersion (HashMap Text JSONValue)
853−evProperties
852+evAddtional
854− = lens _evProperties (\ s a -> s{_evProperties = a})
853+ = lens _evAddtional (\ s a -> s{_evAddtional = a})
855
854
856instance FromJSON EnvironmentVersion where
855instance FromJSON EnvironmentVersion where
857 parseJSON
856 parseJSON
@@ -859,7 +858,7 @@ instance FromJSON EnvironmentVersion where
859 (\ o -> EnvironmentVersion <$> (parseJSONObject o))
858 (\ o -> EnvironmentVersion <$> (parseJSONObject o))
860
859
861instance ToJSON EnvironmentVersion where
860instance ToJSON EnvironmentVersion where
862− toJSON = toJSON . _evProperties
861+ toJSON = toJSON . _evAddtional
863
862
864-- | A sink that records can be encoded and written to.
863-- | A sink that records can be encoded and written to.
865--
864--
@@ -1015,27 +1014,26 @@ instance ToJSON WriteInstruction where
1015--
1014--
1016-- /See:/ 'environmentUserAgent' smart constructor.
1015-- /See:/ 'environmentUserAgent' smart constructor.
1017newtype EnvironmentUserAgent = EnvironmentUserAgent
1016newtype EnvironmentUserAgent = EnvironmentUserAgent
1018− { _euaProperties :: HashMap Text JSONValue
1017+ { _euaAddtional :: HashMap Text JSONValue
1019 } deriving (Eq,Show,Data,Typeable,Generic)
1018 } deriving (Eq,Show,Data,Typeable,Generic)
1020
1019
1021-- | Creates a value of 'EnvironmentUserAgent' with the minimum fields required to make a request.
1020-- | Creates a value of 'EnvironmentUserAgent' with the minimum fields required to make a request.
1022--
1021--
1023-- Use one of the following lenses to modify other fields as desired:
1022-- Use one of the following lenses to modify other fields as desired:
1024--
1023--
1025−-- * 'euaProperties'
1024+-- * 'euaAddtional'
1026environmentUserAgent
1025environmentUserAgent
1027− :: HashMap Text JSONValue -- ^ 'properties'
1026+ :: HashMap Text JSONValue -- ^ 'addtional'
1028 -> EnvironmentUserAgent
1027 -> EnvironmentUserAgent
1029−environmentUserAgent pEuaProperties_ =
1028+environmentUserAgent pEuaAddtional_ =
1030 EnvironmentUserAgent
1029 EnvironmentUserAgent
1031− { _euaProperties = pEuaProperties_
1030+ { _euaAddtional = pEuaAddtional_
1032 }
1031 }
1033
1032
1034-- | Properties of the object.
1033-- | Properties of the object.
1035−euaProperties :: Lens' EnvironmentUserAgent (HashMap Text JSONValue)
1034+euaAddtional :: Lens' EnvironmentUserAgent (HashMap Text JSONValue)
1036−euaProperties
1035+euaAddtional
1037− = lens _euaProperties
1036+ = lens _euaAddtional (\ s a -> s{_euaAddtional = a})
1038− (\ s a -> s{_euaProperties = a})
1039
1037
1040instance FromJSON EnvironmentUserAgent where
1038instance FromJSON EnvironmentUserAgent where
1041 parseJSON
1039 parseJSON
@@ -1043,7 +1041,7 @@ instance FromJSON EnvironmentUserAgent where
1043 (\ o -> EnvironmentUserAgent <$> (parseJSONObject o))
1041 (\ o -> EnvironmentUserAgent <$> (parseJSONObject o))
1044
1042
1045instance ToJSON EnvironmentUserAgent where
1043instance ToJSON EnvironmentUserAgent where
1046− toJSON = toJSON . _euaProperties
1044+ toJSON = toJSON . _euaAddtional
1047
1045
1048-- | Describes the data disk used by a workflow job.
1046-- | Describes the data disk used by a workflow job.
1049--
1047--
@@ -1495,26 +1493,26 @@ instance ToJSON ConcatPosition where
1495--
1493--
1496-- /See:/ 'metricStructuredNameContext' smart constructor.
1494-- /See:/ 'metricStructuredNameContext' smart constructor.
1497newtype MetricStructuredNameContext = MetricStructuredNameContext
1495newtype MetricStructuredNameContext = MetricStructuredNameContext
1498− { _msncProperties :: HashMap Text Text
1496+ { _msncAddtional :: HashMap Text Text
1499 } deriving (Eq,Show,Data,Typeable,Generic)
1497 } deriving (Eq,Show,Data,Typeable,Generic)
1500
1498
1501-- | Creates a value of 'MetricStructuredNameContext' with the minimum fields required to make a request.
1499-- | Creates a value of 'MetricStructuredNameContext' with the minimum fields required to make a request.
1502--
1500--
1503-- Use one of the following lenses to modify other fields as desired:
1501-- Use one of the following lenses to modify other fields as desired:
1504--
1502--
1505−-- * 'msncProperties'
1503+-- * 'msncAddtional'
1506metricStructuredNameContext
1504metricStructuredNameContext
1507− :: HashMap Text Text -- ^ 'properties'
1505+ :: HashMap Text Text -- ^ 'addtional'
1508 -> MetricStructuredNameContext
1506 -> MetricStructuredNameContext
1509−metricStructuredNameContext pMsncProperties_ =
1507+metricStructuredNameContext pMsncAddtional_ =
1510 MetricStructuredNameContext
1508 MetricStructuredNameContext
1511− { _msncProperties = pMsncProperties_
1509+ { _msncAddtional = pMsncAddtional_
1512 }
1510 }
1513
1511
1514−msncProperties :: Lens' MetricStructuredNameContext (HashMap Text Text)
1512+msncAddtional :: Lens' MetricStructuredNameContext (HashMap Text Text)
1515−msncProperties
1513+msncAddtional
1516− = lens _msncProperties
1514+ = lens _msncAddtional
1517− (\ s a -> s{_msncProperties = a})
1515+ (\ s a -> s{_msncAddtional = a})
1518
1516
1519instance FromJSON MetricStructuredNameContext where
1517instance FromJSON MetricStructuredNameContext where
1520 parseJSON
1518 parseJSON
@@ -1523,7 +1521,7 @@ instance FromJSON MetricStructuredNameContext where
1523 MetricStructuredNameContext <$> (parseJSONObject o))
1521 MetricStructuredNameContext <$> (parseJSONObject o))
1524
1522
1525instance ToJSON MetricStructuredNameContext where
1523instance ToJSON MetricStructuredNameContext where
1526− toJSON = toJSON . _msncProperties
1524+ toJSON = toJSON . _msncAddtional
1527
1525
1528-- | Identifies the location of a streaming computation stage, for
1526-- | Identifies the location of a streaming computation stage, for
1529-- stage-to-stage communication.
1527-- stage-to-stage communication.
@@ -1903,26 +1901,26 @@ instance ToJSON FlattenInstruction where
1903--
1901--
1904-- /See:/ 'jobTransformNameMApping' smart constructor.
1902-- /See:/ 'jobTransformNameMApping' smart constructor.
1905newtype JobTransformNameMApping = JobTransformNameMApping
1903newtype JobTransformNameMApping = JobTransformNameMApping
1906− { _jtnmaProperties :: HashMap Text Text
1904+ { _jtnmaAddtional :: HashMap Text Text
1907 } deriving (Eq,Show,Data,Typeable,Generic)
1905 } deriving (Eq,Show,Data,Typeable,Generic)
1908
1906
1909-- | Creates a value of 'JobTransformNameMApping' with the minimum fields required to make a request.
1907-- | Creates a value of 'JobTransformNameMApping' with the minimum fields required to make a request.
1910--
1908--
1911-- Use one of the following lenses to modify other fields as desired:
1909-- Use one of the following lenses to modify other fields as desired:
1912--
1910--
1913−-- * 'jtnmaProperties'
1911+-- * 'jtnmaAddtional'
1914jobTransformNameMApping
1912jobTransformNameMApping
1915− :: HashMap Text Text -- ^ 'properties'
1913+ :: HashMap Text Text -- ^ 'addtional'
1916 -> JobTransformNameMApping
1914 -> JobTransformNameMApping
1917−jobTransformNameMApping pJtnmaProperties_ =
1915+jobTransformNameMApping pJtnmaAddtional_ =
1918 JobTransformNameMApping
1916 JobTransformNameMApping
1919− { _jtnmaProperties = pJtnmaProperties_
1917+ { _jtnmaAddtional = pJtnmaAddtional_
1920 }
1918 }
1921
1919
1922−jtnmaProperties :: Lens' JobTransformNameMApping (HashMap Text Text)
1920+jtnmaAddtional :: Lens' JobTransformNameMApping (HashMap Text Text)
1923−jtnmaProperties
1921+jtnmaAddtional
1924− = lens _jtnmaProperties
1922+ = lens _jtnmaAddtional
1925− (\ s a -> s{_jtnmaProperties = a})
1923+ (\ s a -> s{_jtnmaAddtional = a})
1926
1924
1927instance FromJSON JobTransformNameMApping where
1925instance FromJSON JobTransformNameMApping where
1928 parseJSON
1926 parseJSON
@@ -1931,32 +1929,32 @@ instance FromJSON JobTransformNameMApping where
1931 JobTransformNameMApping <$> (parseJSONObject o))
1929 JobTransformNameMApping <$> (parseJSONObject o))
1932
1930
1933instance ToJSON JobTransformNameMApping where
1931instance ToJSON JobTransformNameMApping where
1934− toJSON = toJSON . _jtnmaProperties
1932+ toJSON = toJSON . _jtnmaAddtional
1935
1933
1936-- | The source to read from, plus its parameters.
1934-- | The source to read from, plus its parameters.
1937--
1935--
1938-- /See:/ 'sourceSpec' smart constructor.
1936-- /See:/ 'sourceSpec' smart constructor.
1939newtype SourceSpec = SourceSpec
1937newtype SourceSpec = SourceSpec
1940− { _ssProperties :: HashMap Text JSONValue
1938+ { _ssAddtional :: HashMap Text JSONValue
1941 } deriving (Eq,Show,Data,Typeable,Generic)
1939 } deriving (Eq,Show,Data,Typeable,Generic)
1942
1940
1943-- | Creates a value of 'SourceSpec' with the minimum fields required to make a request.
1941-- | Creates a value of 'SourceSpec' with the minimum fields required to make a request.
1944--
1942--
1945-- Use one of the following lenses to modify other fields as desired:
1943-- Use one of the following lenses to modify other fields as desired:
1946--
1944--
1947−-- * 'ssProperties'
1945+-- * 'ssAddtional'
1948sourceSpec
1946sourceSpec
1949− :: HashMap Text JSONValue -- ^ 'properties'
1947+ :: HashMap Text JSONValue -- ^ 'addtional'
1950 -> SourceSpec
1948 -> SourceSpec
1951−sourceSpec pSsProperties_ =
1949+sourceSpec pSsAddtional_ =
1952 SourceSpec
1950 SourceSpec
1953− { _ssProperties = pSsProperties_
1951+ { _ssAddtional = pSsAddtional_
1954 }
1952 }
1955
1953
1956-- | Properties of the object.
1954-- | Properties of the object.
1957−ssProperties :: Lens' SourceSpec (HashMap Text JSONValue)
1955+ssAddtional :: Lens' SourceSpec (HashMap Text JSONValue)
1958−ssProperties
1956+ssAddtional
1959− = lens _ssProperties (\ s a -> s{_ssProperties = a})
1957+ = lens _ssAddtional (\ s a -> s{_ssAddtional = a})
1960
1958
1961instance FromJSON SourceSpec where
1959instance FromJSON SourceSpec where
1962 parseJSON
1960 parseJSON
@@ -1964,7 +1962,7 @@ instance FromJSON SourceSpec where
1964 (\ o -> SourceSpec <$> (parseJSONObject o))
1962 (\ o -> SourceSpec <$> (parseJSONObject o))
1965
1963
1966instance ToJSON SourceSpec where
1964instance ToJSON SourceSpec where
1967− toJSON = toJSON . _ssProperties
1965+ toJSON = toJSON . _ssAddtional
1968
1966
1969-- | Metadata about a Source useful for automatically optimizing and tuning
1967-- | Metadata about a Source useful for automatically optimizing and tuning
1970-- the pipeline, etc.
1968-- the pipeline, etc.
@@ -2036,27 +2034,26 @@ instance ToJSON SourceMetadata where
2036--
2034--
2037-- /See:/ 'environmentInternalExperiments' smart constructor.
2035-- /See:/ 'environmentInternalExperiments' smart constructor.
2038newtype EnvironmentInternalExperiments = EnvironmentInternalExperiments
2036newtype EnvironmentInternalExperiments = EnvironmentInternalExperiments
2039− { _eieProperties :: HashMap Text JSONValue
2037+ { _eieAddtional :: HashMap Text JSONValue
2040 } deriving (Eq,Show,Data,Typeable,Generic)
2038 } deriving (Eq,Show,Data,Typeable,Generic)
2041
2039
2042-- | Creates a value of 'EnvironmentInternalExperiments' with the minimum fields required to make a request.
2040-- | Creates a value of 'EnvironmentInternalExperiments' with the minimum fields required to make a request.
2043--
2041--
2044-- Use one of the following lenses to modify other fields as desired:
2042-- Use one of the following lenses to modify other fields as desired:
2045--
2043--
2046−-- * 'eieProperties'
2044+-- * 'eieAddtional'
2047environmentInternalExperiments
2045environmentInternalExperiments
2048− :: HashMap Text JSONValue -- ^ 'properties'
2046+ :: HashMap Text JSONValue -- ^ 'addtional'
2049 -> EnvironmentInternalExperiments
2047 -> EnvironmentInternalExperiments
2050−environmentInternalExperiments pEieProperties_ =
2048+environmentInternalExperiments pEieAddtional_ =
2051 EnvironmentInternalExperiments
2049 EnvironmentInternalExperiments
2052− { _eieProperties = pEieProperties_
2050+ { _eieAddtional = pEieAddtional_
2053 }
2051 }
2054
2052
2055-- | Properties of the object. Contains field \'ype with type URL.
2053-- | Properties of the object. Contains field \'ype with type URL.
2056−eieProperties :: Lens' EnvironmentInternalExperiments (HashMap Text JSONValue)
2054+eieAddtional :: Lens' EnvironmentInternalExperiments (HashMap Text JSONValue)
2057−eieProperties
2055+eieAddtional
2058− = lens _eieProperties
2056+ = lens _eieAddtional (\ s a -> s{_eieAddtional = a})
2059− (\ s a -> s{_eieProperties = a})
2060
2057
2061instance FromJSON EnvironmentInternalExperiments
2058instance FromJSON EnvironmentInternalExperiments
2062 where
2059 where
@@ -2067,7 +2064,7 @@ instance FromJSON EnvironmentInternalExperiments
2067 (parseJSONObject o))
2064 (parseJSONObject o))
2068
2065
2069instance ToJSON EnvironmentInternalExperiments where
2066instance ToJSON EnvironmentInternalExperiments where
2070− toJSON = toJSON . _eieProperties
2067+ toJSON = toJSON . _eieAddtional
2071
2068
2072-- | Taskrunner configuration settings.
2069-- | Taskrunner configuration settings.
2073--
2070--
@@ -2344,27 +2341,27 @@ instance ToJSON TaskRunnerSettings where
2344--
2341--
2345-- /See:/ 'environmentSdkPipelineOptions' smart constructor.
2342-- /See:/ 'environmentSdkPipelineOptions' smart constructor.
2346newtype EnvironmentSdkPipelineOptions = EnvironmentSdkPipelineOptions
2343newtype EnvironmentSdkPipelineOptions = EnvironmentSdkPipelineOptions
2347− { _espoProperties :: HashMap Text JSONValue
2344+ { _espoAddtional :: HashMap Text JSONValue
2348 } deriving (Eq,Show,Data,Typeable,Generic)
2345 } deriving (Eq,Show,Data,Typeable,Generic)
2349
2346
2350-- | Creates a value of 'EnvironmentSdkPipelineOptions' with the minimum fields required to make a request.
2347-- | Creates a value of 'EnvironmentSdkPipelineOptions' with the minimum fields required to make a request.
2351--
2348--
2352-- Use one of the following lenses to modify other fields as desired:
2349-- Use one of the following lenses to modify other fields as desired:
2353--
2350--
2354−-- * 'espoProperties'
2351+-- * 'espoAddtional'
2355environmentSdkPipelineOptions
2352environmentSdkPipelineOptions
2356− :: HashMap Text JSONValue -- ^ 'properties'
2353+ :: HashMap Text JSONValue -- ^ 'addtional'
2357 -> EnvironmentSdkPipelineOptions
2354 -> EnvironmentSdkPipelineOptions
2358−environmentSdkPipelineOptions pEspoProperties_ =
2355+environmentSdkPipelineOptions pEspoAddtional_ =
2359 EnvironmentSdkPipelineOptions
2356 EnvironmentSdkPipelineOptions
2360− { _espoProperties = pEspoProperties_
2357+ { _espoAddtional = pEspoAddtional_
2361 }
2358 }
2362
2359
2363-- | Properties of the object.
2360-- | Properties of the object.
2364−espoProperties :: Lens' EnvironmentSdkPipelineOptions (HashMap Text JSONValue)
2361+espoAddtional :: Lens' EnvironmentSdkPipelineOptions (HashMap Text JSONValue)
2365−espoProperties
2362+espoAddtional
2366− = lens _espoProperties
2363+ = lens _espoAddtional
2367− (\ s a -> s{_espoProperties = a})
2364+ (\ s a -> s{_espoAddtional = a})
2368
2365
2369instance FromJSON EnvironmentSdkPipelineOptions where
2366instance FromJSON EnvironmentSdkPipelineOptions where
2370 parseJSON
2367 parseJSON
@@ -2374,7 +2371,7 @@ instance FromJSON EnvironmentSdkPipelineOptions where
2374 (parseJSONObject o))
2371 (parseJSONObject o))
2375
2372
2376instance ToJSON EnvironmentSdkPipelineOptions where
2373instance ToJSON EnvironmentSdkPipelineOptions where
2377− toJSON = toJSON . _espoProperties
2374+ toJSON = toJSON . _espoAddtional
2378
2375
2379-- | Request to lease WorkItems.
2376-- | Request to lease WorkItems.
2380--
2377--
@@ -2522,26 +2519,26 @@ instance ToJSON SourceOperationResponse where
2522--
2519--
2523-- /See:/ 'topologyConfigUserStageToComputationNameMap' smart constructor.
2520-- /See:/ 'topologyConfigUserStageToComputationNameMap' smart constructor.
2524newtype TopologyConfigUserStageToComputationNameMap = TopologyConfigUserStageToComputationNameMap
2521newtype TopologyConfigUserStageToComputationNameMap = TopologyConfigUserStageToComputationNameMap
2525− { _tcustcnmProperties :: HashMap Text Text
2522+ { _tcustcnmAddtional :: HashMap Text Text
2526 } deriving (Eq,Show,Data,Typeable,Generic)
2523 } deriving (Eq,Show,Data,Typeable,Generic)
2527
2524
2528-- | Creates a value of 'TopologyConfigUserStageToComputationNameMap' with the minimum fields required to make a request.
2525-- | Creates a value of 'TopologyConfigUserStageToComputationNameMap' with the minimum fields required to make a request.
2529--
2526--
2530-- Use one of the following lenses to modify other fields as desired:
2527-- Use one of the following lenses to modify other fields as desired:
2531--
2528--
2532−-- * 'tcustcnmProperties'
2529+-- * 'tcustcnmAddtional'
2533topologyConfigUserStageToComputationNameMap
2530topologyConfigUserStageToComputationNameMap
2534− :: HashMap Text Text -- ^ 'properties'
2531+ :: HashMap Text Text -- ^ 'addtional'
2535 -> TopologyConfigUserStageToComputationNameMap
2532 -> TopologyConfigUserStageToComputationNameMap
2536−topologyConfigUserStageToComputationNameMap pTcustcnmProperties_ =
2533+topologyConfigUserStageToComputationNameMap pTcustcnmAddtional_ =
2537 TopologyConfigUserStageToComputationNameMap
2534 TopologyConfigUserStageToComputationNameMap
2538− { _tcustcnmProperties = pTcustcnmProperties_
2535+ { _tcustcnmAddtional = pTcustcnmAddtional_
2539 }
2536 }
2540
2537
2541−tcustcnmProperties :: Lens' TopologyConfigUserStageToComputationNameMap (HashMap Text Text)
2538+tcustcnmAddtional :: Lens' TopologyConfigUserStageToComputationNameMap (HashMap Text Text)
2542−tcustcnmProperties
2539+tcustcnmAddtional
2543− = lens _tcustcnmProperties
2540+ = lens _tcustcnmAddtional
2544− (\ s a -> s{_tcustcnmProperties = a})
2541+ (\ s a -> s{_tcustcnmAddtional = a})
2545
2542
2546instance FromJSON
2543instance FromJSON
2547 TopologyConfigUserStageToComputationNameMap where
2544 TopologyConfigUserStageToComputationNameMap where
@@ -2554,7 +2551,7 @@ instance FromJSON
2554
2551
2555instance ToJSON
2552instance ToJSON
2556 TopologyConfigUserStageToComputationNameMap where
2553 TopologyConfigUserStageToComputationNameMap where
2557− toJSON = toJSON . _tcustcnmProperties
2554+ toJSON = toJSON . _tcustcnmAddtional
2558
2555
2559-- | A task which consists of a shell command for the worker to execute.
2556-- | A task which consists of a shell command for the worker to execute.
2560--
2557--
@@ -2606,27 +2603,26 @@ instance ToJSON ShellTask where
2606--
2603--
2607-- /See:/ 'statusDetailsItem' smart constructor.
2604-- /See:/ 'statusDetailsItem' smart constructor.
2608newtype StatusDetailsItem = StatusDetailsItem
2605newtype StatusDetailsItem = StatusDetailsItem
2609− { _sdiProperties :: HashMap Text JSONValue
2606+ { _sdiAddtional :: HashMap Text JSONValue
2610 } deriving (Eq,Show,Data,Typeable,Generic)
2607 } deriving (Eq,Show,Data,Typeable,Generic)
2611
2608
2612-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
2609-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
2613--
2610--
2614-- Use one of the following lenses to modify other fields as desired:
2611-- Use one of the following lenses to modify other fields as desired:
2615--
2612--
2616−-- * 'sdiProperties'
2613+-- * 'sdiAddtional'
2617statusDetailsItem
2614statusDetailsItem
2618− :: HashMap Text JSONValue -- ^ 'properties'
2615+ :: HashMap Text JSONValue -- ^ 'addtional'
2619 -> StatusDetailsItem
2616 -> StatusDetailsItem
2620−statusDetailsItem pSdiProperties_ =
2617+statusDetailsItem pSdiAddtional_ =
2621 StatusDetailsItem
2618 StatusDetailsItem
2622− { _sdiProperties = pSdiProperties_
2619+ { _sdiAddtional = pSdiAddtional_
2623 }
2620 }
2624
2621
2625-- | Properties of the object. Contains field \'ype with type URL.
2622-- | Properties of the object. Contains field \'ype with type URL.
2626−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
2623+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
2627−sdiProperties
2624+sdiAddtional
2628− = lens _sdiProperties
2625+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
2629− (\ s a -> s{_sdiProperties = a})
2630
2626
2631instance FromJSON StatusDetailsItem where
2627instance FromJSON StatusDetailsItem where
2632 parseJSON
2628 parseJSON
@@ -2634,33 +2630,33 @@ instance FromJSON StatusDetailsItem where
2634 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
2630 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
2635
2631
2636instance ToJSON StatusDetailsItem where
2632instance ToJSON StatusDetailsItem where
2637− toJSON = toJSON . _sdiProperties
2633+ toJSON = toJSON . _sdiAddtional
2638
2634
2639-- | Named properties associated with the step. Each kind of predefined step
2635-- | Named properties associated with the step. Each kind of predefined step
2640-- has its own required set of properties.
2636-- has its own required set of properties.
2641--
2637--
2642-- /See:/ 'stepProperties' smart constructor.
2638-- /See:/ 'stepProperties' smart constructor.
2643newtype StepProperties = StepProperties
2639newtype StepProperties = StepProperties
2644− { _spProperties :: HashMap Text JSONValue
2640+ { _spAddtional :: HashMap Text JSONValue
2645 } deriving (Eq,Show,Data,Typeable,Generic)
2641 } deriving (Eq,Show,Data,Typeable,Generic)
2646
2642
2647-- | Creates a value of 'StepProperties' with the minimum fields required to make a request.
2643-- | Creates a value of 'StepProperties' with the minimum fields required to make a request.
2648--
2644--
2649-- Use one of the following lenses to modify other fields as desired:
2645-- Use one of the following lenses to modify other fields as desired:
2650--
2646--
2651−-- * 'spProperties'
2647+-- * 'spAddtional'
2652stepProperties
2648stepProperties
2653− :: HashMap Text JSONValue -- ^ 'properties'
2649+ :: HashMap Text JSONValue -- ^ 'addtional'
2654 -> StepProperties
2650 -> StepProperties
2655−stepProperties pSpProperties_ =
2651+stepProperties pSpAddtional_ =
2656 StepProperties
2652 StepProperties
2657− { _spProperties = pSpProperties_
2653+ { _spAddtional = pSpAddtional_
2658 }
2654 }
2659
2655
2660-- | Properties of the object.
2656-- | Properties of the object.
2661−spProperties :: Lens' StepProperties (HashMap Text JSONValue)
2657+spAddtional :: Lens' StepProperties (HashMap Text JSONValue)
2662−spProperties
2658+spAddtional
2663− = lens _spProperties (\ s a -> s{_spProperties = a})
2659+ = lens _spAddtional (\ s a -> s{_spAddtional = a})
2664
2660
2665instance FromJSON StepProperties where
2661instance FromJSON StepProperties where
2666 parseJSON
2662 parseJSON
@@ -2668,7 +2664,7 @@ instance FromJSON StepProperties where
2668 (\ o -> StepProperties <$> (parseJSONObject o))
2664 (\ o -> StepProperties <$> (parseJSONObject o))
2669
2665
2670instance ToJSON StepProperties where
2666instance ToJSON StepProperties where
2671− toJSON = toJSON . _spProperties
2667+ toJSON = toJSON . _spAddtional
2672
2668
2673-- | Global topology of the streaming Dataflow job, including all
2669-- | Global topology of the streaming Dataflow job, including all
2674-- computations and their sharded locations.
2670-- computations and their sharded locations.
@@ -2849,27 +2845,27 @@ instance ToJSON WorkerSettings where
2849--
2845--
2850-- /See:/ 'workItemServiceStateHarnessData' smart constructor.
2846-- /See:/ 'workItemServiceStateHarnessData' smart constructor.
2851newtype WorkItemServiceStateHarnessData = WorkItemServiceStateHarnessData
2847newtype WorkItemServiceStateHarnessData = WorkItemServiceStateHarnessData
2852− { _wisshdProperties :: HashMap Text JSONValue
2848+ { _wisshdAddtional :: HashMap Text JSONValue
2853 } deriving (Eq,Show,Data,Typeable,Generic)
2849 } deriving (Eq,Show,Data,Typeable,Generic)
2854
2850
2855-- | Creates a value of 'WorkItemServiceStateHarnessData' with the minimum fields required to make a request.
2851-- | Creates a value of 'WorkItemServiceStateHarnessData' with the minimum fields required to make a request.
2856--
2852--
2857-- Use one of the following lenses to modify other fields as desired:
2853-- Use one of the following lenses to modify other fields as desired:
2858--
2854--
2859−-- * 'wisshdProperties'
2855+-- * 'wisshdAddtional'
2860workItemServiceStateHarnessData
2856workItemServiceStateHarnessData
2861− :: HashMap Text JSONValue -- ^ 'properties'
2857+ :: HashMap Text JSONValue -- ^ 'addtional'
2862 -> WorkItemServiceStateHarnessData
2858 -> WorkItemServiceStateHarnessData
2863−workItemServiceStateHarnessData pWisshdProperties_ =
2859+workItemServiceStateHarnessData pWisshdAddtional_ =
2864 WorkItemServiceStateHarnessData
2860 WorkItemServiceStateHarnessData
2865− { _wisshdProperties = pWisshdProperties_
2861+ { _wisshdAddtional = pWisshdAddtional_
2866 }
2862 }
2867
2863
2868-- | Properties of the object.
2864-- | Properties of the object.
2869−wisshdProperties :: Lens' WorkItemServiceStateHarnessData (HashMap Text JSONValue)
2865+wisshdAddtional :: Lens' WorkItemServiceStateHarnessData (HashMap Text JSONValue)
2870−wisshdProperties
2866+wisshdAddtional
2871− = lens _wisshdProperties
2867+ = lens _wisshdAddtional
2872− (\ s a -> s{_wisshdProperties = a})
2868+ (\ s a -> s{_wisshdAddtional = a})
2873
2869
2874instance FromJSON WorkItemServiceStateHarnessData
2870instance FromJSON WorkItemServiceStateHarnessData
2875 where
2871 where
@@ -2880,7 +2876,7 @@ instance FromJSON WorkItemServiceStateHarnessData
2880 (parseJSONObject o))
2876 (parseJSONObject o))
2881
2877
2882instance ToJSON WorkItemServiceStateHarnessData where
2878instance ToJSON WorkItemServiceStateHarnessData where
2883− toJSON = toJSON . _wisshdProperties
2879+ toJSON = toJSON . _wisshdAddtional
2884
2880
2885-- | Data disk assignment for a given VM instance.
2881-- | Data disk assignment for a given VM instance.
2886--
2882--
@@ -3112,27 +3108,27 @@ instance ToJSON StreamingSetupTask where
3112--
3108--
3113-- /See:/ 'partialGroupByKeyInstructionInputElementCodec' smart constructor.
3109-- /See:/ 'partialGroupByKeyInstructionInputElementCodec' smart constructor.
3114newtype PartialGroupByKeyInstructionInputElementCodec = PartialGroupByKeyInstructionInputElementCodec
3110newtype PartialGroupByKeyInstructionInputElementCodec = PartialGroupByKeyInstructionInputElementCodec
3115− { _pgbkiiecProperties :: HashMap Text JSONValue
3111+ { _pgbkiiecAddtional :: HashMap Text JSONValue
3116 } deriving (Eq,Show,Data,Typeable,Generic)
3112 } deriving (Eq,Show,Data,Typeable,Generic)
3117
3113
3118-- | Creates a value of 'PartialGroupByKeyInstructionInputElementCodec' with the minimum fields required to make a request.
3114-- | Creates a value of 'PartialGroupByKeyInstructionInputElementCodec' with the minimum fields required to make a request.
3119--
3115--
3120-- Use one of the following lenses to modify other fields as desired:
3116-- Use one of the following lenses to modify other fields as desired:
3121--
3117--
3122−-- * 'pgbkiiecProperties'
3118+-- * 'pgbkiiecAddtional'
3123partialGroupByKeyInstructionInputElementCodec
3119partialGroupByKeyInstructionInputElementCodec
3124− :: HashMap Text JSONValue -- ^ 'properties'
3120+ :: HashMap Text JSONValue -- ^ 'addtional'
3125 -> PartialGroupByKeyInstructionInputElementCodec
3121 -> PartialGroupByKeyInstructionInputElementCodec
3126−partialGroupByKeyInstructionInputElementCodec pPgbkiiecProperties_ =
3122+partialGroupByKeyInstructionInputElementCodec pPgbkiiecAddtional_ =
3127 PartialGroupByKeyInstructionInputElementCodec
3123 PartialGroupByKeyInstructionInputElementCodec
3128− { _pgbkiiecProperties = pPgbkiiecProperties_
3124+ { _pgbkiiecAddtional = pPgbkiiecAddtional_
3129 }
3125 }
3130
3126
3131-- | Properties of the object.
3127-- | Properties of the object.
3132−pgbkiiecProperties :: Lens' PartialGroupByKeyInstructionInputElementCodec (HashMap Text JSONValue)
3128+pgbkiiecAddtional :: Lens' PartialGroupByKeyInstructionInputElementCodec (HashMap Text JSONValue)
3133−pgbkiiecProperties
3129+pgbkiiecAddtional
3134− = lens _pgbkiiecProperties
3130+ = lens _pgbkiiecAddtional
3135− (\ s a -> s{_pgbkiiecProperties = a})
3131+ (\ s a -> s{_pgbkiiecAddtional = a})
3136
3132
3137instance FromJSON
3133instance FromJSON
3138 PartialGroupByKeyInstructionInputElementCodec where
3134 PartialGroupByKeyInstructionInputElementCodec where
@@ -3145,7 +3141,7 @@ instance FromJSON
3145
3141
3146instance ToJSON
3142instance ToJSON
3147 PartialGroupByKeyInstructionInputElementCodec where
3143 PartialGroupByKeyInstructionInputElementCodec where
3148− toJSON = toJSON . _pgbkiiecProperties
3144+ toJSON = toJSON . _pgbkiiecAddtional
3149
3145
3150-- | MapTask consists of an ordered set of instructions, each of which
3146-- | MapTask consists of an ordered set of instructions, each of which
3151-- describes one particular low-level operation for the worker to perform
3147-- describes one particular low-level operation for the worker to perform
@@ -3253,26 +3249,26 @@ instance ToJSON MountedDataDisk where
3253--
3249--
3254-- /See:/ 'sinkCodec' smart constructor.
3250-- /See:/ 'sinkCodec' smart constructor.
3255newtype SinkCodec = SinkCodec
3251newtype SinkCodec = SinkCodec
3256− { _scProperties :: HashMap Text JSONValue
3252+ { _scAddtional :: HashMap Text JSONValue
3257 } deriving (Eq,Show,Data,Typeable,Generic)
3253 } deriving (Eq,Show,Data,Typeable,Generic)
3258
3254
3259-- | Creates a value of 'SinkCodec' with the minimum fields required to make a request.
3255-- | Creates a value of 'SinkCodec' with the minimum fields required to make a request.
3260--
3256--
3261-- Use one of the following lenses to modify other fields as desired:
3257-- Use one of the following lenses to modify other fields as desired:
3262--
3258--
3263−-- * 'scProperties'
3259+-- * 'scAddtional'
3264sinkCodec
3260sinkCodec
3265− :: HashMap Text JSONValue -- ^ 'properties'
3261+ :: HashMap Text JSONValue -- ^ 'addtional'
3266 -> SinkCodec
3262 -> SinkCodec
3267−sinkCodec pScProperties_ =
3263+sinkCodec pScAddtional_ =
3268 SinkCodec
3264 SinkCodec
3269− { _scProperties = pScProperties_
3265+ { _scAddtional = pScAddtional_
3270 }
3266 }
3271
3267
3272-- | Properties of the object.
3268-- | Properties of the object.
3273−scProperties :: Lens' SinkCodec (HashMap Text JSONValue)
3269+scAddtional :: Lens' SinkCodec (HashMap Text JSONValue)
3274−scProperties
3270+scAddtional
3275− = lens _scProperties (\ s a -> s{_scProperties = a})
3271+ = lens _scAddtional (\ s a -> s{_scAddtional = a})
3276
3272
3277instance FromJSON SinkCodec where
3273instance FromJSON SinkCodec where
3278 parseJSON
3274 parseJSON
@@ -3280,33 +3276,33 @@ instance FromJSON SinkCodec where
3280 (\ o -> SinkCodec <$> (parseJSONObject o))
3276 (\ o -> SinkCodec <$> (parseJSONObject o))
3281
3277
3282instance ToJSON SinkCodec where
3278instance ToJSON SinkCodec where
3283− toJSON = toJSON . _scProperties
3279+ toJSON = toJSON . _scAddtional
3284
3280
3285-- | The user function to invoke.
3281-- | The user function to invoke.
3286--
3282--
3287-- /See:/ 'parDoInstructionUserFn' smart constructor.
3283-- /See:/ 'parDoInstructionUserFn' smart constructor.
3288newtype ParDoInstructionUserFn = ParDoInstructionUserFn
3284newtype ParDoInstructionUserFn = ParDoInstructionUserFn
3289− { _pdiufProperties :: HashMap Text JSONValue
3285+ { _pdiufAddtional :: HashMap Text JSONValue
3290 } deriving (Eq,Show,Data,Typeable,Generic)
3286 } deriving (Eq,Show,Data,Typeable,Generic)
3291
3287
3292-- | Creates a value of 'ParDoInstructionUserFn' with the minimum fields required to make a request.
3288-- | Creates a value of 'ParDoInstructionUserFn' with the minimum fields required to make a request.
3293--
3289--
3294-- Use one of the following lenses to modify other fields as desired:
3290-- Use one of the following lenses to modify other fields as desired:
3295--
3291--
3296−-- * 'pdiufProperties'
3292+-- * 'pdiufAddtional'
3297parDoInstructionUserFn
3293parDoInstructionUserFn
3298− :: HashMap Text JSONValue -- ^ 'properties'
3294+ :: HashMap Text JSONValue -- ^ 'addtional'
3299 -> ParDoInstructionUserFn
3295 -> ParDoInstructionUserFn
3300−parDoInstructionUserFn pPdiufProperties_ =
3296+parDoInstructionUserFn pPdiufAddtional_ =
3301 ParDoInstructionUserFn
3297 ParDoInstructionUserFn
3302− { _pdiufProperties = pPdiufProperties_
3298+ { _pdiufAddtional = pPdiufAddtional_
3303 }
3299 }
3304
3300
3305-- | Properties of the object.
3301-- | Properties of the object.
3306−pdiufProperties :: Lens' ParDoInstructionUserFn (HashMap Text JSONValue)
3302+pdiufAddtional :: Lens' ParDoInstructionUserFn (HashMap Text JSONValue)
3307−pdiufProperties
3303+pdiufAddtional
3308− = lens _pdiufProperties
3304+ = lens _pdiufAddtional
3309− (\ s a -> s{_pdiufProperties = a})
3305+ (\ s a -> s{_pdiufAddtional = a})
3310
3306
3311instance FromJSON ParDoInstructionUserFn where
3307instance FromJSON ParDoInstructionUserFn where
3312 parseJSON
3308 parseJSON
@@ -3315,33 +3311,32 @@ instance FromJSON ParDoInstructionUserFn where
3315 ParDoInstructionUserFn <$> (parseJSONObject o))
3311 ParDoInstructionUserFn <$> (parseJSONObject o))
3316
3312
3317instance ToJSON ParDoInstructionUserFn where
3313instance ToJSON ParDoInstructionUserFn where
3318− toJSON = toJSON . _pdiufProperties
3314+ toJSON = toJSON . _pdiufAddtional
3319
3315
3320-- | The codec to use to encode data being written via this output.
3316-- | The codec to use to encode data being written via this output.
3321--
3317--
3322-- /See:/ 'instructionOutputCodec' smart constructor.
3318-- /See:/ 'instructionOutputCodec' smart constructor.
3323newtype InstructionOutputCodec = InstructionOutputCodec
3319newtype InstructionOutputCodec = InstructionOutputCodec
3324− { _iocProperties :: HashMap Text JSONValue
3320+ { _iocAddtional :: HashMap Text JSONValue
3325 } deriving (Eq,Show,Data,Typeable,Generic)
3321 } deriving (Eq,Show,Data,Typeable,Generic)
3326
3322
3327-- | Creates a value of 'InstructionOutputCodec' with the minimum fields required to make a request.
3323-- | Creates a value of 'InstructionOutputCodec' with the minimum fields required to make a request.
3328--
3324--
3329-- Use one of the following lenses to modify other fields as desired:
3325-- Use one of the following lenses to modify other fields as desired:
3330--
3326--
3331−-- * 'iocProperties'
3327+-- * 'iocAddtional'
3332instructionOutputCodec
3328instructionOutputCodec
3333− :: HashMap Text JSONValue -- ^ 'properties'
3329+ :: HashMap Text JSONValue -- ^ 'addtional'
3334 -> InstructionOutputCodec
3330 -> InstructionOutputCodec
3335−instructionOutputCodec pIocProperties_ =
3331+instructionOutputCodec pIocAddtional_ =
3336 InstructionOutputCodec
3332 InstructionOutputCodec
3337− { _iocProperties = pIocProperties_
3333+ { _iocAddtional = pIocAddtional_
3338 }
3334 }
3339
3335
3340-- | Properties of the object.
3336-- | Properties of the object.
3341−iocProperties :: Lens' InstructionOutputCodec (HashMap Text JSONValue)
3337+iocAddtional :: Lens' InstructionOutputCodec (HashMap Text JSONValue)
3342−iocProperties
3338+iocAddtional
3343− = lens _iocProperties
3339+ = lens _iocAddtional (\ s a -> s{_iocAddtional = a})
3344− (\ s a -> s{_iocProperties = a})
3345
3340
3346instance FromJSON InstructionOutputCodec where
3341instance FromJSON InstructionOutputCodec where
3347 parseJSON
3342 parseJSON
@@ -3350,7 +3345,7 @@ instance FromJSON InstructionOutputCodec where
3350 InstructionOutputCodec <$> (parseJSONObject o))
3345 InstructionOutputCodec <$> (parseJSONObject o))
3351
3346
3352instance ToJSON InstructionOutputCodec where
3347instance ToJSON InstructionOutputCodec where
3353− toJSON = toJSON . _iocProperties
3348+ toJSON = toJSON . _iocAddtional
3354
3349
3355-- | Describes a stream of data, either as input to be processed or as output
3350-- | Describes a stream of data, either as input to be processed or as output
3356-- of a streaming Dataflow job.
3351-- of a streaming Dataflow job.
@@ -3434,27 +3429,27 @@ instance ToJSON StreamLocation where
3434--
3429--
3435-- /See:/ 'workerPoolPoolArgs' smart constructor.
3430-- /See:/ 'workerPoolPoolArgs' smart constructor.
3436newtype WorkerPoolPoolArgs = WorkerPoolPoolArgs
3431newtype WorkerPoolPoolArgs = WorkerPoolPoolArgs
3437− { _wppaProperties :: HashMap Text JSONValue
3432+ { _wppaAddtional :: HashMap Text JSONValue
3438 } deriving (Eq,Show,Data,Typeable,Generic)
3433 } deriving (Eq,Show,Data,Typeable,Generic)
3439
3434
3440-- | Creates a value of 'WorkerPoolPoolArgs' with the minimum fields required to make a request.
3435-- | Creates a value of 'WorkerPoolPoolArgs' with the minimum fields required to make a request.
3441--
3436--
3442-- Use one of the following lenses to modify other fields as desired:
3437-- Use one of the following lenses to modify other fields as desired:
3443--
3438--
3444−-- * 'wppaProperties'
3439+-- * 'wppaAddtional'
3445workerPoolPoolArgs
3440workerPoolPoolArgs
3446− :: HashMap Text JSONValue -- ^ 'properties'
3441+ :: HashMap Text JSONValue -- ^ 'addtional'
3447 -> WorkerPoolPoolArgs
3442 -> WorkerPoolPoolArgs
3448−workerPoolPoolArgs pWppaProperties_ =
3443+workerPoolPoolArgs pWppaAddtional_ =
3449 WorkerPoolPoolArgs
3444 WorkerPoolPoolArgs
3450− { _wppaProperties = pWppaProperties_
3445+ { _wppaAddtional = pWppaAddtional_
3451 }
3446 }
3452
3447
3453-- | Properties of the object. Contains field \'ype with type URL.
3448-- | Properties of the object. Contains field \'ype with type URL.
3454−wppaProperties :: Lens' WorkerPoolPoolArgs (HashMap Text JSONValue)
3449+wppaAddtional :: Lens' WorkerPoolPoolArgs (HashMap Text JSONValue)
3455−wppaProperties
3450+wppaAddtional
3456− = lens _wppaProperties
3451+ = lens _wppaAddtional
3457− (\ s a -> s{_wppaProperties = a})
3452+ (\ s a -> s{_wppaAddtional = a})
3458
3453
3459instance FromJSON WorkerPoolPoolArgs where
3454instance FromJSON WorkerPoolPoolArgs where
3460 parseJSON
3455 parseJSON
@@ -3462,7 +3457,7 @@ instance FromJSON WorkerPoolPoolArgs where
3462 (\ o -> WorkerPoolPoolArgs <$> (parseJSONObject o))
3457 (\ o -> WorkerPoolPoolArgs <$> (parseJSONObject o))
3463
3458
3464instance ToJSON WorkerPoolPoolArgs where
3459instance ToJSON WorkerPoolPoolArgs where
3465− toJSON = toJSON . _wppaProperties
3460+ toJSON = toJSON . _wppaAddtional
3466
3461
3467-- | Identifies the location of a streaming side input.
3462-- | Identifies the location of a streaming side input.
3468--
3463--
@@ -3729,27 +3724,27 @@ instance ToJSON SourceGetMetadataRequest where
3729--
3724--
3730-- /See:/ 'seqMapTaskUserFn' smart constructor.
3725-- /See:/ 'seqMapTaskUserFn' smart constructor.
3731newtype SeqMapTaskUserFn = SeqMapTaskUserFn
3726newtype SeqMapTaskUserFn = SeqMapTaskUserFn
3732− { _smtufProperties :: HashMap Text JSONValue
3727+ { _smtufAddtional :: HashMap Text JSONValue
3733 } deriving (Eq,Show,Data,Typeable,Generic)
3728 } deriving (Eq,Show,Data,Typeable,Generic)
3734
3729
3735-- | Creates a value of 'SeqMapTaskUserFn' with the minimum fields required to make a request.
3730-- | Creates a value of 'SeqMapTaskUserFn' with the minimum fields required to make a request.
3736--
3731--
3737-- Use one of the following lenses to modify other fields as desired:
3732-- Use one of the following lenses to modify other fields as desired:
3738--
3733--
3739−-- * 'smtufProperties'
3734+-- * 'smtufAddtional'
3740seqMapTaskUserFn
3735seqMapTaskUserFn
3741− :: HashMap Text JSONValue -- ^ 'properties'
3736+ :: HashMap Text JSONValue -- ^ 'addtional'
3742 -> SeqMapTaskUserFn
3737 -> SeqMapTaskUserFn
3743−seqMapTaskUserFn pSmtufProperties_ =
3738+seqMapTaskUserFn pSmtufAddtional_ =
3744 SeqMapTaskUserFn
3739 SeqMapTaskUserFn
3745− { _smtufProperties = pSmtufProperties_
3740+ { _smtufAddtional = pSmtufAddtional_
3746 }
3741 }
3747
3742
3748-- | Properties of the object.
3743-- | Properties of the object.
3749−smtufProperties :: Lens' SeqMapTaskUserFn (HashMap Text JSONValue)
3744+smtufAddtional :: Lens' SeqMapTaskUserFn (HashMap Text JSONValue)
3750−smtufProperties
3745+smtufAddtional
3751− = lens _smtufProperties
3746+ = lens _smtufAddtional
3752− (\ s a -> s{_smtufProperties = a})
3747+ (\ s a -> s{_smtufAddtional = a})
3753
3748
3754instance FromJSON SeqMapTaskUserFn where
3749instance FromJSON SeqMapTaskUserFn where
3755 parseJSON
3750 parseJSON
@@ -3757,33 +3752,33 @@ instance FromJSON SeqMapTaskUserFn where
3757 (\ o -> SeqMapTaskUserFn <$> (parseJSONObject o))
3752 (\ o -> SeqMapTaskUserFn <$> (parseJSONObject o))
3758
3753
3759instance ToJSON SeqMapTaskUserFn where
3754instance ToJSON SeqMapTaskUserFn where
3760− toJSON = toJSON . _smtufProperties
3755+ toJSON = toJSON . _smtufAddtional
3761
3756
3762-- | The value combining function to invoke.
3757-- | The value combining function to invoke.
3763--
3758--
3764-- /See:/ 'partialGroupByKeyInstructionValueCombiningFn' smart constructor.
3759-- /See:/ 'partialGroupByKeyInstructionValueCombiningFn' smart constructor.
3765newtype PartialGroupByKeyInstructionValueCombiningFn = PartialGroupByKeyInstructionValueCombiningFn
3760newtype PartialGroupByKeyInstructionValueCombiningFn = PartialGroupByKeyInstructionValueCombiningFn
3766− { _pgbkivcfProperties :: HashMap Text JSONValue
3761+ { _pgbkivcfAddtional :: HashMap Text JSONValue
3767 } deriving (Eq,Show,Data,Typeable,Generic)
3762 } deriving (Eq,Show,Data,Typeable,Generic)
3768
3763
3769-- | Creates a value of 'PartialGroupByKeyInstructionValueCombiningFn' with the minimum fields required to make a request.
3764-- | Creates a value of 'PartialGroupByKeyInstructionValueCombiningFn' with the minimum fields required to make a request.
3770--
3765--
3771-- Use one of the following lenses to modify other fields as desired:
3766-- Use one of the following lenses to modify other fields as desired:
3772--
3767--
3773−-- * 'pgbkivcfProperties'
3768+-- * 'pgbkivcfAddtional'
3774partialGroupByKeyInstructionValueCombiningFn
3769partialGroupByKeyInstructionValueCombiningFn
3775− :: HashMap Text JSONValue -- ^ 'properties'
3770+ :: HashMap Text JSONValue -- ^ 'addtional'
3776 -> PartialGroupByKeyInstructionValueCombiningFn
3771 -> PartialGroupByKeyInstructionValueCombiningFn
3777−partialGroupByKeyInstructionValueCombiningFn pPgbkivcfProperties_ =
3772+partialGroupByKeyInstructionValueCombiningFn pPgbkivcfAddtional_ =
3778 PartialGroupByKeyInstructionValueCombiningFn
3773 PartialGroupByKeyInstructionValueCombiningFn
3779− { _pgbkivcfProperties = pPgbkivcfProperties_
3774+ { _pgbkivcfAddtional = pPgbkivcfAddtional_
3780 }
3775 }
3781
3776
3782-- | Properties of the object.
3777-- | Properties of the object.
3783−pgbkivcfProperties :: Lens' PartialGroupByKeyInstructionValueCombiningFn (HashMap Text JSONValue)
3778+pgbkivcfAddtional :: Lens' PartialGroupByKeyInstructionValueCombiningFn (HashMap Text JSONValue)
3784−pgbkivcfProperties
3779+pgbkivcfAddtional
3785− = lens _pgbkivcfProperties
3780+ = lens _pgbkivcfAddtional
3786− (\ s a -> s{_pgbkivcfProperties = a})
3781+ (\ s a -> s{_pgbkivcfAddtional = a})
3787
3782
3788instance FromJSON
3783instance FromJSON
3789 PartialGroupByKeyInstructionValueCombiningFn where
3784 PartialGroupByKeyInstructionValueCombiningFn where
@@ -3796,7 +3791,7 @@ instance FromJSON
3796
3791
3797instance ToJSON
3792instance ToJSON
3798 PartialGroupByKeyInstructionValueCombiningFn where
3793 PartialGroupByKeyInstructionValueCombiningFn where
3799− toJSON = toJSON . _pgbkivcfProperties
3794+ toJSON = toJSON . _pgbkivcfAddtional
3800
3795
3801-- | Defines a job to be run by the Dataflow service.
3796-- | Defines a job to be run by the Dataflow service.
3802--
3797--
@@ -4055,26 +4050,26 @@ instance ToJSON ReadInstruction where
4055--
4050--
4056-- /See:/ 'sinkSpec' smart constructor.
4051-- /See:/ 'sinkSpec' smart constructor.
4057newtype SinkSpec = SinkSpec
4052newtype SinkSpec = SinkSpec
4058− { _ssProperties :: HashMap Text JSONValue
4053+ { _sAddtional :: HashMap Text JSONValue
4059 } deriving (Eq,Show,Data,Typeable,Generic)
4054 } deriving (Eq,Show,Data,Typeable,Generic)
4060
4055
4061-- | Creates a value of 'SinkSpec' with the minimum fields required to make a request.
4056-- | Creates a value of 'SinkSpec' with the minimum fields required to make a request.
4062--
4057--
4063-- Use one of the following lenses to modify other fields as desired:
4058-- Use one of the following lenses to modify other fields as desired:
4064--
4059--
4065−-- * 'ssProperties'
4060+-- * 'sAddtional'
4066sinkSpec
4061sinkSpec
4067− :: HashMap Text JSONValue -- ^ 'properties'
4062+ :: HashMap Text JSONValue -- ^ 'addtional'
4068 -> SinkSpec
4063 -> SinkSpec
4069−sinkSpec pSsProperties_ =
4064+sinkSpec pSAddtional_ =
4070 SinkSpec
4065 SinkSpec
4071− { _ssProperties = pSsProperties_
4066+ { _sAddtional = pSAddtional_
4072 }
4067 }
4073
4068
4074-- | Properties of the object.
4069-- | Properties of the object.
4075−ssProperties :: Lens' SinkSpec (HashMap Text JSONValue)
4070+sAddtional :: Lens' SinkSpec (HashMap Text JSONValue)
4076−ssProperties
4071+sAddtional
4077− = lens _ssProperties (\ s a -> s{_ssProperties = a})
4072+ = lens _sAddtional (\ s a -> s{_sAddtional = a})
4078
4073
4079instance FromJSON SinkSpec where
4074instance FromJSON SinkSpec where
4080 parseJSON
4075 parseJSON
@@ -4082,7 +4077,7 @@ instance FromJSON SinkSpec where
4082 (\ o -> SinkSpec <$> (parseJSONObject o))
4077 (\ o -> SinkSpec <$> (parseJSONObject o))
4083
4078
4084instance ToJSON SinkSpec where
4079instance ToJSON SinkSpec where
4085− toJSON = toJSON . _ssProperties
4080+ toJSON = toJSON . _sAddtional
4086
4081
4087-- | Describes one particular pool of Dataflow workers to be instantiated by
4082-- | Describes one particular pool of Dataflow workers to be instantiated by
4088-- the Dataflow service in order to perform the computations required by a
4083-- the Dataflow service in order to perform the computations required by a
@@ -5196,27 +5191,27 @@ instance ToJSON CustomSourceLocation where
5196--
5191--
5197-- /See:/ 'sourceBaseSpecsItem' smart constructor.
5192-- /See:/ 'sourceBaseSpecsItem' smart constructor.
5198newtype SourceBaseSpecsItem = SourceBaseSpecsItem
5193newtype SourceBaseSpecsItem = SourceBaseSpecsItem
5199− { _sbsiProperties :: HashMap Text JSONValue
5194+ { _sbsiAddtional :: HashMap Text JSONValue
5200 } deriving (Eq,Show,Data,Typeable,Generic)
5195 } deriving (Eq,Show,Data,Typeable,Generic)
5201
5196
5202-- | Creates a value of 'SourceBaseSpecsItem' with the minimum fields required to make a request.
5197-- | Creates a value of 'SourceBaseSpecsItem' with the minimum fields required to make a request.
5203--
5198--
5204-- Use one of the following lenses to modify other fields as desired:
5199-- Use one of the following lenses to modify other fields as desired:
5205--
5200--
5206−-- * 'sbsiProperties'
5201+-- * 'sbsiAddtional'
5207sourceBaseSpecsItem
5202sourceBaseSpecsItem
5208− :: HashMap Text JSONValue -- ^ 'properties'
5203+ :: HashMap Text JSONValue -- ^ 'addtional'
5209 -> SourceBaseSpecsItem
5204 -> SourceBaseSpecsItem
5210−sourceBaseSpecsItem pSbsiProperties_ =
5205+sourceBaseSpecsItem pSbsiAddtional_ =
5211 SourceBaseSpecsItem
5206 SourceBaseSpecsItem
5212− { _sbsiProperties = pSbsiProperties_
5207+ { _sbsiAddtional = pSbsiAddtional_
5213 }
5208 }
5214
5209
5215-- | Properties of the object.
5210-- | Properties of the object.
5216−sbsiProperties :: Lens' SourceBaseSpecsItem (HashMap Text JSONValue)
5211+sbsiAddtional :: Lens' SourceBaseSpecsItem (HashMap Text JSONValue)
5217−sbsiProperties
5212+sbsiAddtional
5218− = lens _sbsiProperties
5213+ = lens _sbsiAddtional
5219− (\ s a -> s{_sbsiProperties = a})
5214+ (\ s a -> s{_sbsiAddtional = a})
5220
5215
5221instance FromJSON SourceBaseSpecsItem where
5216instance FromJSON SourceBaseSpecsItem where
5222 parseJSON
5217 parseJSON
@@ -5224,7 +5219,7 @@ instance FromJSON SourceBaseSpecsItem where
5224 (\ o -> SourceBaseSpecsItem <$> (parseJSONObject o))
5219 (\ o -> SourceBaseSpecsItem <$> (parseJSONObject o))
5225
5220
5226instance ToJSON SourceBaseSpecsItem where
5221instance ToJSON SourceBaseSpecsItem where
5227− toJSON = toJSON . _sbsiProperties
5222+ toJSON = toJSON . _sbsiAddtional
5228
5223
5229-- | Describes a particular operation comprising a MapTask.
5224-- | Describes a particular operation comprising a MapTask.
5230--
5225--
@@ -5341,27 +5336,27 @@ instance ToJSON ParallelInstruction where
5341--
5336--
5342-- /See:/ 'sideInputInfoKind' smart constructor.
5337-- /See:/ 'sideInputInfoKind' smart constructor.
5343newtype SideInputInfoKind = SideInputInfoKind
5338newtype SideInputInfoKind = SideInputInfoKind
5344− { _siikProperties :: HashMap Text JSONValue
5339+ { _siikAddtional :: HashMap Text JSONValue
5345 } deriving (Eq,Show,Data,Typeable,Generic)
5340 } deriving (Eq,Show,Data,Typeable,Generic)
5346
5341
5347-- | Creates a value of 'SideInputInfoKind' with the minimum fields required to make a request.
5342-- | Creates a value of 'SideInputInfoKind' with the minimum fields required to make a request.
5348--
5343--
5349-- Use one of the following lenses to modify other fields as desired:
5344-- Use one of the following lenses to modify other fields as desired:
5350--
5345--
5351−-- * 'siikProperties'
5346+-- * 'siikAddtional'
5352sideInputInfoKind
5347sideInputInfoKind
5353− :: HashMap Text JSONValue -- ^ 'properties'
5348+ :: HashMap Text JSONValue -- ^ 'addtional'
5354 -> SideInputInfoKind
5349 -> SideInputInfoKind
5355−sideInputInfoKind pSiikProperties_ =
5350+sideInputInfoKind pSiikAddtional_ =
5356 SideInputInfoKind
5351 SideInputInfoKind
5357− { _siikProperties = pSiikProperties_
5352+ { _siikAddtional = pSiikAddtional_
5358 }
5353 }
5359
5354
5360-- | Properties of the object.
5355-- | Properties of the object.
5361−siikProperties :: Lens' SideInputInfoKind (HashMap Text JSONValue)
5356+siikAddtional :: Lens' SideInputInfoKind (HashMap Text JSONValue)
5362−siikProperties
5357+siikAddtional
5363− = lens _siikProperties
5358+ = lens _siikAddtional
5364− (\ s a -> s{_siikProperties = a})
5359+ (\ s a -> s{_siikAddtional = a})
5365
5360
5366instance FromJSON SideInputInfoKind where
5361instance FromJSON SideInputInfoKind where
5367 parseJSON
5362 parseJSON
@@ -5369,7 +5364,7 @@ instance FromJSON SideInputInfoKind where
5369 (\ o -> SideInputInfoKind <$> (parseJSONObject o))
5364 (\ o -> SideInputInfoKind <$> (parseJSONObject o))
5370
5365
5371instance ToJSON SideInputInfoKind where
5366instance ToJSON SideInputInfoKind where
5372− toJSON = toJSON . _siikProperties
5367+ toJSON = toJSON . _siikAddtional
5373
5368
5374-- | DEPRECATED in favor of DerivedSource.
5369-- | DEPRECATED in favor of DerivedSource.
5375--
5370--
@@ -5518,26 +5513,26 @@ instance ToJSON JobExecutionInfo where
5518--
5513--
5519-- /See:/ 'sourceCodec' smart constructor.
5514-- /See:/ 'sourceCodec' smart constructor.
5520newtype SourceCodec = SourceCodec
5515newtype SourceCodec = SourceCodec
5521− { _scProperties :: HashMap Text JSONValue
5516+ { _souAddtional :: HashMap Text JSONValue
5522 } deriving (Eq,Show,Data,Typeable,Generic)
5517 } deriving (Eq,Show,Data,Typeable,Generic)
5523
5518
5524-- | Creates a value of 'SourceCodec' with the minimum fields required to make a request.
5519-- | Creates a value of 'SourceCodec' with the minimum fields required to make a request.
5525--
5520--
5526-- Use one of the following lenses to modify other fields as desired:
5521-- Use one of the following lenses to modify other fields as desired:
5527--
5522--
5528−-- * 'scProperties'
5523+-- * 'souAddtional'
5529sourceCodec
5524sourceCodec
5530− :: HashMap Text JSONValue -- ^ 'properties'
5525+ :: HashMap Text JSONValue -- ^ 'addtional'
5531 -> SourceCodec
5526 -> SourceCodec
5532−sourceCodec pScProperties_ =
5527+sourceCodec pSouAddtional_ =
5533 SourceCodec
5528 SourceCodec
5534− { _scProperties = pScProperties_
5529+ { _souAddtional = pSouAddtional_
5535 }
5530 }
5536
5531
5537-- | Properties of the object.
5532-- | Properties of the object.
5538−scProperties :: Lens' SourceCodec (HashMap Text JSONValue)
5533+souAddtional :: Lens' SourceCodec (HashMap Text JSONValue)
5539−scProperties
5534+souAddtional
5540− = lens _scProperties (\ s a -> s{_scProperties = a})
5535+ = lens _souAddtional (\ s a -> s{_souAddtional = a})
5541
5536
5542instance FromJSON SourceCodec where
5537instance FromJSON SourceCodec where
5543 parseJSON
5538 parseJSON
@@ -5545,7 +5540,7 @@ instance FromJSON SourceCodec where
5545 (\ o -> SourceCodec <$> (parseJSONObject o))
5540 (\ o -> SourceCodec <$> (parseJSONObject o))
5546
5541
5547instance ToJSON SourceCodec where
5542instance ToJSON SourceCodec where
5548− toJSON = toJSON . _scProperties
5543+ toJSON = toJSON . _souAddtional
5549
5544
5550-- | State family configuration.
5545-- | State family configuration.
5551--
5546--
gogol-datastore/gen/Network/Google/Datastore.hs+1−1
@@ -85,7 +85,7 @@ module Network.Google.Datastore
85 -- ** EntityProperties
85 -- ** EntityProperties
86 , EntityProperties
86 , EntityProperties
87 , entityProperties
87 , entityProperties
88− , epProperties
88+ , epAddtional
89
89
90 -- ** BeginTransactionRequest
90 -- ** BeginTransactionRequest
91 , BeginTransactionRequest
91 , BeginTransactionRequest
gogol-datastore/gen/Network/Google/Datastore/Types.hs+1−1
@@ -60,7 +60,7 @@ module Network.Google.Datastore.Types
60 -- * EntityProperties
60 -- * EntityProperties
61 , EntityProperties
61 , EntityProperties
62 , entityProperties
62 , entityProperties
63− , epProperties
63+ , epAddtional
64
64
65 -- * BeginTransactionRequest
65 -- * BeginTransactionRequest
66 , BeginTransactionRequest
66 , BeginTransactionRequest
gogol-datastore/gen/Network/Google/Datastore/Types/Product.hs+9−9
@@ -371,29 +371,29 @@ instance ToJSON QueryResultBatch where
371--
371--
372-- /See:/ 'entityProperties' smart constructor.
372-- /See:/ 'entityProperties' smart constructor.
373newtype EntityProperties = EntityProperties
373newtype EntityProperties = EntityProperties
374− { _epProperties :: HashMap Text Property
374+ { _epAddtional :: HashMap Text Property
375 } deriving (Eq,Show,Data,Typeable,Generic)
375 } deriving (Eq,Show,Data,Typeable,Generic)
376
376
377-- | Creates a value of 'EntityProperties' with the minimum fields required to make a request.
377-- | Creates a value of 'EntityProperties' with the minimum fields required to make a request.
378--
378--
379-- Use one of the following lenses to modify other fields as desired:
379-- Use one of the following lenses to modify other fields as desired:
380--
380--
381−-- * 'epProperties'
381+-- * 'epAddtional'
382entityProperties
382entityProperties
383− :: HashMap Text Property -- ^ 'properties'
383+ :: HashMap Text Property -- ^ 'addtional'
384 -> EntityProperties
384 -> EntityProperties
385−entityProperties pEpProperties_ =
385+entityProperties pEpAddtional_ =
386 EntityProperties
386 EntityProperties
387− { _epProperties = pEpProperties_
387+ { _epAddtional = pEpAddtional_
388 }
388 }
389
389
390-- | The name of the property. A property name matching regex \"__.*__\" is
390-- | The name of the property. A property name matching regex \"__.*__\" is
391-- reserved. A reserved property name is forbidden in certain documented
391-- reserved. A reserved property name is forbidden in certain documented
392-- contexts. The name must not contain more than 500 characters. Cannot be
392-- contexts. The name must not contain more than 500 characters. Cannot be
393-- \"\".
393-- \"\".
394−epProperties :: Lens' EntityProperties (HashMap Text Property)
394+epAddtional :: Lens' EntityProperties (HashMap Text Property)
395−epProperties
395+epAddtional
396− = lens _epProperties (\ s a -> s{_epProperties = a})
396+ = lens _epAddtional (\ s a -> s{_epAddtional = a})
397
397
398instance FromJSON EntityProperties where
398instance FromJSON EntityProperties where
399 parseJSON
399 parseJSON
@@ -401,7 +401,7 @@ instance FromJSON EntityProperties where
401 (\ o -> EntityProperties <$> (parseJSONObject o))
401 (\ o -> EntityProperties <$> (parseJSONObject o))
402
402
403instance ToJSON EntityProperties where
403instance ToJSON EntityProperties where
404− toJSON = toJSON . _epProperties
404+ toJSON = toJSON . _epAddtional
405
405
406--
406--
407-- /See:/ 'beginTransactionRequest' smart constructor.
407-- /See:/ 'beginTransactionRequest' smart constructor.
gogol-debugger/gen/Network/Google/Debugger.hs+1−1
@@ -194,7 +194,7 @@ module Network.Google.Debugger
194 -- ** DebuggeeLabels
194 -- ** DebuggeeLabels
195 , DebuggeeLabels
195 , DebuggeeLabels
196 , debuggeeLabels
196 , debuggeeLabels
197− , dlProperties
197+ , dlAddtional
198
198
199 -- ** Debuggee
199 -- ** Debuggee
200 , Debuggee
200 , Debuggee
gogol-debugger/gen/Network/Google/Debugger/Types.hs+1−1
@@ -162,7 +162,7 @@ module Network.Google.Debugger.Types
162 -- * DebuggeeLabels
162 -- * DebuggeeLabels
163 , DebuggeeLabels
163 , DebuggeeLabels
164 , debuggeeLabels
164 , debuggeeLabels
165− , dlProperties
165+ , dlAddtional
166
166
167 -- * Debuggee
167 -- * Debuggee
168 , Debuggee
168 , Debuggee
gogol-debugger/gen/Network/Google/Debugger/Types/Product.hs+9−9
@@ -1301,25 +1301,25 @@ instance ToJSON CloudRepoSourceContext where
1301--
1301--
1302-- /See:/ 'debuggeeLabels' smart constructor.
1302-- /See:/ 'debuggeeLabels' smart constructor.
1303newtype DebuggeeLabels = DebuggeeLabels
1303newtype DebuggeeLabels = DebuggeeLabels
1304− { _dlProperties :: HashMap Text Text
1304+ { _dlAddtional :: HashMap Text Text
1305 } deriving (Eq,Show,Data,Typeable,Generic)
1305 } deriving (Eq,Show,Data,Typeable,Generic)
1306
1306
1307-- | Creates a value of 'DebuggeeLabels' with the minimum fields required to make a request.
1307-- | Creates a value of 'DebuggeeLabels' with the minimum fields required to make a request.
1308--
1308--
1309-- Use one of the following lenses to modify other fields as desired:
1309-- Use one of the following lenses to modify other fields as desired:
1310--
1310--
1311−-- * 'dlProperties'
1311+-- * 'dlAddtional'
1312debuggeeLabels
1312debuggeeLabels
1313− :: HashMap Text Text -- ^ 'properties'
1313+ :: HashMap Text Text -- ^ 'addtional'
1314 -> DebuggeeLabels
1314 -> DebuggeeLabels
1315−debuggeeLabels pDlProperties_ =
1315+debuggeeLabels pDlAddtional_ =
1316 DebuggeeLabels
1316 DebuggeeLabels
1317− { _dlProperties = pDlProperties_
1317+ { _dlAddtional = pDlAddtional_
1318 }
1318 }
1319
1319
1320−dlProperties :: Lens' DebuggeeLabels (HashMap Text Text)
1320+dlAddtional :: Lens' DebuggeeLabels (HashMap Text Text)
1321−dlProperties
1321+dlAddtional
1322− = lens _dlProperties (\ s a -> s{_dlProperties = a})
1322+ = lens _dlAddtional (\ s a -> s{_dlAddtional = a})
1323
1323
1324instance FromJSON DebuggeeLabels where
1324instance FromJSON DebuggeeLabels where
1325 parseJSON
1325 parseJSON
@@ -1327,7 +1327,7 @@ instance FromJSON DebuggeeLabels where
1327 (\ o -> DebuggeeLabels <$> (parseJSONObject o))
1327 (\ o -> DebuggeeLabels <$> (parseJSONObject o))
1328
1328
1329instance ToJSON DebuggeeLabels where
1329instance ToJSON DebuggeeLabels where
1330− toJSON = toJSON . _dlProperties
1330+ toJSON = toJSON . _dlAddtional
1331
1331
1332-- | Represents the application to debug. The application may include one or
1332-- | Represents the application to debug. The application may include one or
1333-- more replicated processes executing the same code. Each of these
1333-- 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
40 -- ** RestDescriptionParameters
40 -- ** RestDescriptionParameters
41 , RestDescriptionParameters
41 , RestDescriptionParameters
42 , restDescriptionParameters
42 , restDescriptionParameters
43− , rdpProperties
43+ , rdpAddtional
44
44
45 -- ** RestMethod
45 -- ** RestMethod
46 , RestMethod
46 , RestMethod
@@ -70,12 +70,12 @@ module Network.Google.Discovery
70 -- ** RestDescriptionAuthOAuth2Scopes
70 -- ** RestDescriptionAuthOAuth2Scopes
71 , RestDescriptionAuthOAuth2Scopes
71 , RestDescriptionAuthOAuth2Scopes
72 , restDescriptionAuthOAuth2Scopes
72 , restDescriptionAuthOAuth2Scopes
73− , rdaoasProperties
73+ , rdaoasAddtional
74
74
75 -- ** RestDescriptionMethods
75 -- ** RestDescriptionMethods
76 , RestDescriptionMethods
76 , RestDescriptionMethods
77 , restDescriptionMethods
77 , restDescriptionMethods
78− , rdmProperties
78+ , rdmAddtional
79
79
80 -- ** DirectoryListItemsItem
80 -- ** DirectoryListItemsItem
81 , DirectoryListItemsItem
81 , DirectoryListItemsItem
@@ -102,13 +102,18 @@ module Network.Google.Discovery
102 -- ** RestResourceResources
102 -- ** RestResourceResources
103 , RestResourceResources
103 , RestResourceResources
104 , restResourceResources
104 , restResourceResources
105− , rrrProperties
105+ , rrrAddtional
106
106
107 -- ** RestDescriptionAuthOAuth2
107 -- ** RestDescriptionAuthOAuth2
108 , RestDescriptionAuthOAuth2
108 , RestDescriptionAuthOAuth2
109 , restDescriptionAuthOAuth2
109 , restDescriptionAuthOAuth2
110 , rdaoaScopes
110 , rdaoaScopes
111
111
112+ -- ** RestDescriptionAuthOAuth2ScopesAdditional
113+ , RestDescriptionAuthOAuth2ScopesAdditional
114+ , restDescriptionAuthOAuth2ScopesAdditional
115+ , rdaoasaDescription
116+
112 -- ** RestMethodMediaUploadProtocolsSimple
117 -- ** RestMethodMediaUploadProtocolsSimple
113 , RestMethodMediaUploadProtocolsSimple
118 , RestMethodMediaUploadProtocolsSimple
114 , restMethodMediaUploadProtocolsSimple
119 , restMethodMediaUploadProtocolsSimple
@@ -130,7 +135,7 @@ module Network.Google.Discovery
130 -- ** RestResourceMethods
135 -- ** RestResourceMethods
131 , RestResourceMethods
136 , RestResourceMethods
132 , restResourceMethods
137 , restResourceMethods
133− , rrmProperties
138+ , rrmAddtional
134
139
135 -- ** RestDescriptionAuth
140 -- ** RestDescriptionAuth
136 , RestDescriptionAuth
141 , RestDescriptionAuth
@@ -197,7 +202,7 @@ module Network.Google.Discovery
197 -- ** RestDescriptionSchemas
202 -- ** RestDescriptionSchemas
198 , RestDescriptionSchemas
203 , RestDescriptionSchemas
199 , restDescriptionSchemas
204 , restDescriptionSchemas
200− , rdsProperties
205+ , rdsAddtional
201
206
202 -- ** JSONSchemaVariantMapItem
207 -- ** JSONSchemaVariantMapItem
203 , JSONSchemaVariantMapItem
208 , JSONSchemaVariantMapItem
@@ -208,7 +213,7 @@ module Network.Google.Discovery
208 -- ** RestDescriptionResources
213 -- ** RestDescriptionResources
209 , RestDescriptionResources
214 , RestDescriptionResources
210 , restDescriptionResources
215 , restDescriptionResources
211− , rdrProperties
216+ , rdrAddtional
212
217
213 -- ** RestMethodMediaUploadProtocols
218 -- ** RestMethodMediaUploadProtocols
214 , RestMethodMediaUploadProtocols
219 , RestMethodMediaUploadProtocols
@@ -224,7 +229,7 @@ module Network.Google.Discovery
224 -- ** RestMethodParameters
229 -- ** RestMethodParameters
225 , RestMethodParameters
230 , RestMethodParameters
226 , restMethodParameters
231 , restMethodParameters
227− , rmpProperties
232+ , rmpAddtional
228
233
229 -- ** RestMethodMediaUpload
234 -- ** RestMethodMediaUpload
230 , RestMethodMediaUpload
235 , RestMethodMediaUpload
@@ -236,12 +241,7 @@ module Network.Google.Discovery
236 -- ** JSONSchemaProperties
241 -- ** JSONSchemaProperties
237 , JSONSchemaProperties
242 , JSONSchemaProperties
238 , jsonSchemaProperties
243 , jsonSchemaProperties
239− , jspProperties
244+ , jspAddtional
240−
241− -- ** RestDescriptionAuthOAuth2ScopesProperties
242− , RestDescriptionAuthOAuth2ScopesProperties
243− , restDescriptionAuthOAuth2ScopesProperties
244− , rdaoaspDescription
245
245
246 -- ** RestMethodMediaUploadProtocolsResumable
246 -- ** RestMethodMediaUploadProtocolsResumable
247 , RestMethodMediaUploadProtocolsResumable
247 , RestMethodMediaUploadProtocolsResumable
gogol-discovery/gen/Network/Google/Discovery/Types.hs+14−14
@@ -26,7 +26,7 @@ module Network.Google.Discovery.Types
26 -- * RestDescriptionParameters
26 -- * RestDescriptionParameters
27 , RestDescriptionParameters
27 , RestDescriptionParameters
28 , restDescriptionParameters
28 , restDescriptionParameters
29− , rdpProperties
29+ , rdpAddtional
30
30
31 -- * RestMethod
31 -- * RestMethod
32 , RestMethod
32 , RestMethod
@@ -56,12 +56,12 @@ module Network.Google.Discovery.Types
56 -- * RestDescriptionAuthOAuth2Scopes
56 -- * RestDescriptionAuthOAuth2Scopes
57 , RestDescriptionAuthOAuth2Scopes
57 , RestDescriptionAuthOAuth2Scopes
58 , restDescriptionAuthOAuth2Scopes
58 , restDescriptionAuthOAuth2Scopes
59− , rdaoasProperties
59+ , rdaoasAddtional
60
60
61 -- * RestDescriptionMethods
61 -- * RestDescriptionMethods
62 , RestDescriptionMethods
62 , RestDescriptionMethods
63 , restDescriptionMethods
63 , restDescriptionMethods
64− , rdmProperties
64+ , rdmAddtional
65
65
66 -- * DirectoryListItemsItem
66 -- * DirectoryListItemsItem
67 , DirectoryListItemsItem
67 , DirectoryListItemsItem
@@ -88,13 +88,18 @@ module Network.Google.Discovery.Types
88 -- * RestResourceResources
88 -- * RestResourceResources
89 , RestResourceResources
89 , RestResourceResources
90 , restResourceResources
90 , restResourceResources
91− , rrrProperties
91+ , rrrAddtional
92
92
93 -- * RestDescriptionAuthOAuth2
93 -- * RestDescriptionAuthOAuth2
94 , RestDescriptionAuthOAuth2
94 , RestDescriptionAuthOAuth2
95 , restDescriptionAuthOAuth2
95 , restDescriptionAuthOAuth2
96 , rdaoaScopes
96 , rdaoaScopes
97
97
98+ -- * RestDescriptionAuthOAuth2ScopesAdditional
99+ , RestDescriptionAuthOAuth2ScopesAdditional
100+ , restDescriptionAuthOAuth2ScopesAdditional
101+ , rdaoasaDescription
102+
98 -- * RestMethodMediaUploadProtocolsSimple
103 -- * RestMethodMediaUploadProtocolsSimple
99 , RestMethodMediaUploadProtocolsSimple
104 , RestMethodMediaUploadProtocolsSimple
100 , restMethodMediaUploadProtocolsSimple
105 , restMethodMediaUploadProtocolsSimple
@@ -116,7 +121,7 @@ module Network.Google.Discovery.Types
116 -- * RestResourceMethods
121 -- * RestResourceMethods
117 , RestResourceMethods
122 , RestResourceMethods
118 , restResourceMethods
123 , restResourceMethods
119− , rrmProperties
124+ , rrmAddtional
120
125
121 -- * RestDescriptionAuth
126 -- * RestDescriptionAuth
122 , RestDescriptionAuth
127 , RestDescriptionAuth
@@ -183,7 +188,7 @@ module Network.Google.Discovery.Types
183 -- * RestDescriptionSchemas
188 -- * RestDescriptionSchemas
184 , RestDescriptionSchemas
189 , RestDescriptionSchemas
185 , restDescriptionSchemas
190 , restDescriptionSchemas
186− , rdsProperties
191+ , rdsAddtional
187
192
188 -- * JSONSchemaVariantMapItem
193 -- * JSONSchemaVariantMapItem
189 , JSONSchemaVariantMapItem
194 , JSONSchemaVariantMapItem
@@ -194,7 +199,7 @@ module Network.Google.Discovery.Types
194 -- * RestDescriptionResources
199 -- * RestDescriptionResources
195 , RestDescriptionResources
200 , RestDescriptionResources
196 , restDescriptionResources
201 , restDescriptionResources
197− , rdrProperties
202+ , rdrAddtional
198
203
199 -- * RestMethodMediaUploadProtocols
204 -- * RestMethodMediaUploadProtocols
200 , RestMethodMediaUploadProtocols
205 , RestMethodMediaUploadProtocols
@@ -210,7 +215,7 @@ module Network.Google.Discovery.Types
210 -- * RestMethodParameters
215 -- * RestMethodParameters
211 , RestMethodParameters
216 , RestMethodParameters
212 , restMethodParameters
217 , restMethodParameters
213− , rmpProperties
218+ , rmpAddtional
214
219
215 -- * RestMethodMediaUpload
220 -- * RestMethodMediaUpload
216 , RestMethodMediaUpload
221 , RestMethodMediaUpload
@@ -222,12 +227,7 @@ module Network.Google.Discovery.Types
222 -- * JSONSchemaProperties
227 -- * JSONSchemaProperties
223 , JSONSchemaProperties
228 , JSONSchemaProperties
224 , jsonSchemaProperties
229 , jsonSchemaProperties
225− , jspProperties
230+ , jspAddtional
226−
227− -- * RestDescriptionAuthOAuth2ScopesProperties
228− , RestDescriptionAuthOAuth2ScopesProperties
229− , restDescriptionAuthOAuth2ScopesProperties
230− , rdaoaspDescription
231
231
232 -- * RestMethodMediaUploadProtocolsResumable
232 -- * RestMethodMediaUploadProtocolsResumable
233 , RestMethodMediaUploadProtocolsResumable
233 , RestMethodMediaUploadProtocolsResumable
gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+123−131
@@ -56,27 +56,26 @@ instance ToJSON RestMethodResponse where
56--
56--
57-- /See:/ 'restDescriptionParameters' smart constructor.
57-- /See:/ 'restDescriptionParameters' smart constructor.
58newtype RestDescriptionParameters = RestDescriptionParameters
58newtype RestDescriptionParameters = RestDescriptionParameters
59− { _rdpProperties :: HashMap Text JSONSchema
59+ { _rdpAddtional :: HashMap Text JSONSchema
60 } deriving (Eq,Show,Data,Typeable,Generic)
60 } deriving (Eq,Show,Data,Typeable,Generic)
61
61
62-- | Creates a value of 'RestDescriptionParameters' with the minimum fields required to make a request.
62-- | Creates a value of 'RestDescriptionParameters' with the minimum fields required to make a request.
63--
63--
64-- Use one of the following lenses to modify other fields as desired:
64-- Use one of the following lenses to modify other fields as desired:
65--
65--
66−-- * 'rdpProperties'
66+-- * 'rdpAddtional'
67restDescriptionParameters
67restDescriptionParameters
68− :: HashMap Text JSONSchema -- ^ 'properties'
68+ :: HashMap Text JSONSchema -- ^ 'addtional'
69 -> RestDescriptionParameters
69 -> RestDescriptionParameters
70−restDescriptionParameters pRdpProperties_ =
70+restDescriptionParameters pRdpAddtional_ =
71 RestDescriptionParameters
71 RestDescriptionParameters
72− { _rdpProperties = pRdpProperties_
72+ { _rdpAddtional = pRdpAddtional_
73 }
73 }
74
74
75-- | Description of a single parameter.
75-- | Description of a single parameter.
76−rdpProperties :: Lens' RestDescriptionParameters (HashMap Text JSONSchema)
76+rdpAddtional :: Lens' RestDescriptionParameters (HashMap Text JSONSchema)
77−rdpProperties
77+rdpAddtional
78− = lens _rdpProperties
78+ = lens _rdpAddtional (\ s a -> s{_rdpAddtional = a})
79− (\ s a -> s{_rdpProperties = a})
80
79
81instance FromJSON RestDescriptionParameters where
80instance FromJSON RestDescriptionParameters where
82 parseJSON
81 parseJSON
@@ -85,7 +84,7 @@ instance FromJSON RestDescriptionParameters where
85 RestDescriptionParameters <$> (parseJSONObject o))
84 RestDescriptionParameters <$> (parseJSONObject o))
86
85
87instance ToJSON RestDescriptionParameters where
86instance ToJSON RestDescriptionParameters where
88− toJSON = toJSON . _rdpProperties
87+ toJSON = toJSON . _rdpAddtional
89
88
90--
89--
91-- /See:/ 'restMethod' smart constructor.
90-- /See:/ 'restMethod' smart constructor.
@@ -348,27 +347,27 @@ instance ToJSON RestResource where
348--
347--
349-- /See:/ 'restDescriptionAuthOAuth2Scopes' smart constructor.
348-- /See:/ 'restDescriptionAuthOAuth2Scopes' smart constructor.
350newtype RestDescriptionAuthOAuth2Scopes = RestDescriptionAuthOAuth2Scopes
349newtype RestDescriptionAuthOAuth2Scopes = RestDescriptionAuthOAuth2Scopes
351− { _rdaoasProperties :: HashMap Text RestDescriptionAuthOAuth2ScopesProperties
350+ { _rdaoasAddtional :: HashMap Text RestDescriptionAuthOAuth2ScopesAdditional
352 } deriving (Eq,Show,Data,Typeable,Generic)
351 } deriving (Eq,Show,Data,Typeable,Generic)
353
352
354-- | Creates a value of 'RestDescriptionAuthOAuth2Scopes' with the minimum fields required to make a request.
353-- | Creates a value of 'RestDescriptionAuthOAuth2Scopes' with the minimum fields required to make a request.
355--
354--
356-- Use one of the following lenses to modify other fields as desired:
355-- Use one of the following lenses to modify other fields as desired:
357--
356--
358−-- * 'rdaoasProperties'
357+-- * 'rdaoasAddtional'
359restDescriptionAuthOAuth2Scopes
358restDescriptionAuthOAuth2Scopes
360− :: HashMap Text RestDescriptionAuthOAuth2ScopesProperties -- ^ 'properties'
359+ :: HashMap Text RestDescriptionAuthOAuth2ScopesAdditional -- ^ 'addtional'
361 -> RestDescriptionAuthOAuth2Scopes
360 -> RestDescriptionAuthOAuth2Scopes
362−restDescriptionAuthOAuth2Scopes pRdaoasProperties_ =
361+restDescriptionAuthOAuth2Scopes pRdaoasAddtional_ =
363 RestDescriptionAuthOAuth2Scopes
362 RestDescriptionAuthOAuth2Scopes
364− { _rdaoasProperties = pRdaoasProperties_
363+ { _rdaoasAddtional = pRdaoasAddtional_
365 }
364 }
366
365
367-- | The scope value.
366-- | The scope value.
368−rdaoasProperties :: Lens' RestDescriptionAuthOAuth2Scopes (HashMap Text RestDescriptionAuthOAuth2ScopesProperties)
367+rdaoasAddtional :: Lens' RestDescriptionAuthOAuth2Scopes (HashMap Text RestDescriptionAuthOAuth2ScopesAdditional)
369−rdaoasProperties
368+rdaoasAddtional
370− = lens _rdaoasProperties
369+ = lens _rdaoasAddtional
371− (\ s a -> s{_rdaoasProperties = a})
370+ (\ s a -> s{_rdaoasAddtional = a})
372
371
373instance FromJSON RestDescriptionAuthOAuth2Scopes
372instance FromJSON RestDescriptionAuthOAuth2Scopes
374 where
373 where
@@ -379,33 +378,32 @@ instance FromJSON RestDescriptionAuthOAuth2Scopes
379 (parseJSONObject o))
378 (parseJSONObject o))
380
379
381instance ToJSON RestDescriptionAuthOAuth2Scopes where
380instance ToJSON RestDescriptionAuthOAuth2Scopes where
382− toJSON = toJSON . _rdaoasProperties
381+ toJSON = toJSON . _rdaoasAddtional
383
382
384-- | API-level methods for this API.
383-- | API-level methods for this API.
385--
384--
386-- /See:/ 'restDescriptionMethods' smart constructor.
385-- /See:/ 'restDescriptionMethods' smart constructor.
387newtype RestDescriptionMethods = RestDescriptionMethods
386newtype RestDescriptionMethods = RestDescriptionMethods
388− { _rdmProperties :: HashMap Text RestMethod
387+ { _rdmAddtional :: HashMap Text RestMethod
389 } deriving (Eq,Show,Data,Typeable,Generic)
388 } deriving (Eq,Show,Data,Typeable,Generic)
390
389
391-- | Creates a value of 'RestDescriptionMethods' with the minimum fields required to make a request.
390-- | Creates a value of 'RestDescriptionMethods' with the minimum fields required to make a request.
392--
391--
393-- Use one of the following lenses to modify other fields as desired:
392-- Use one of the following lenses to modify other fields as desired:
394--
393--
395−-- * 'rdmProperties'
394+-- * 'rdmAddtional'
396restDescriptionMethods
395restDescriptionMethods
397− :: HashMap Text RestMethod -- ^ 'properties'
396+ :: HashMap Text RestMethod -- ^ 'addtional'
398 -> RestDescriptionMethods
397 -> RestDescriptionMethods
399−restDescriptionMethods pRdmProperties_ =
398+restDescriptionMethods pRdmAddtional_ =
400 RestDescriptionMethods
399 RestDescriptionMethods
401− { _rdmProperties = pRdmProperties_
400+ { _rdmAddtional = pRdmAddtional_
402 }
401 }
403
402
404-- | An individual method description.
403-- | An individual method description.
405−rdmProperties :: Lens' RestDescriptionMethods (HashMap Text RestMethod)
404+rdmAddtional :: Lens' RestDescriptionMethods (HashMap Text RestMethod)
406−rdmProperties
405+rdmAddtional
407− = lens _rdmProperties
406+ = lens _rdmAddtional (\ s a -> s{_rdmAddtional = a})
408− (\ s a -> s{_rdmProperties = a})
409
407
410instance FromJSON RestDescriptionMethods where
408instance FromJSON RestDescriptionMethods where
411 parseJSON
409 parseJSON
@@ -414,7 +412,7 @@ instance FromJSON RestDescriptionMethods where
414 RestDescriptionMethods <$> (parseJSONObject o))
412 RestDescriptionMethods <$> (parseJSONObject o))
415
413
416instance ToJSON RestDescriptionMethods where
414instance ToJSON RestDescriptionMethods where
417− toJSON = toJSON . _rdmProperties
415+ toJSON = toJSON . _rdmAddtional
418
416
419--
417--
420-- /See:/ 'directoryListItemsItem' smart constructor.
418-- /See:/ 'directoryListItemsItem' smart constructor.
@@ -623,27 +621,26 @@ instance ToJSON DirectoryListItemsItemIcons where
623--
621--
624-- /See:/ 'restResourceResources' smart constructor.
622-- /See:/ 'restResourceResources' smart constructor.
625newtype RestResourceResources = RestResourceResources
623newtype RestResourceResources = RestResourceResources
626− { _rrrProperties :: HashMap Text RestResource
624+ { _rrrAddtional :: HashMap Text RestResource
627 } deriving (Eq,Show,Data,Typeable,Generic)
625 } deriving (Eq,Show,Data,Typeable,Generic)
628
626
629-- | Creates a value of 'RestResourceResources' with the minimum fields required to make a request.
627-- | Creates a value of 'RestResourceResources' with the minimum fields required to make a request.
630--
628--
631-- Use one of the following lenses to modify other fields as desired:
629-- Use one of the following lenses to modify other fields as desired:
632--
630--
633−-- * 'rrrProperties'
631+-- * 'rrrAddtional'
634restResourceResources
632restResourceResources
635− :: HashMap Text RestResource -- ^ 'properties'
633+ :: HashMap Text RestResource -- ^ 'addtional'
636 -> RestResourceResources
634 -> RestResourceResources
637−restResourceResources pRrrProperties_ =
635+restResourceResources pRrrAddtional_ =
638 RestResourceResources
636 RestResourceResources
639− { _rrrProperties = pRrrProperties_
637+ { _rrrAddtional = pRrrAddtional_
640 }
638 }
641
639
642-- | Description for any sub-resources on this resource.
640-- | Description for any sub-resources on this resource.
643−rrrProperties :: Lens' RestResourceResources (HashMap Text RestResource)
641+rrrAddtional :: Lens' RestResourceResources (HashMap Text RestResource)
644−rrrProperties
642+rrrAddtional
645− = lens _rrrProperties
643+ = lens _rrrAddtional (\ s a -> s{_rrrAddtional = a})
646− (\ s a -> s{_rrrProperties = a})
647
644
648instance FromJSON RestResourceResources where
645instance FromJSON RestResourceResources where
649 parseJSON
646 parseJSON
@@ -652,7 +649,7 @@ instance FromJSON RestResourceResources where
652 RestResourceResources <$> (parseJSONObject o))
649 RestResourceResources <$> (parseJSONObject o))
653
650
654instance ToJSON RestResourceResources where
651instance ToJSON RestResourceResources where
655− toJSON = toJSON . _rrrProperties
652+ toJSON = toJSON . _rrrAddtional
656
653
657-- | OAuth 2.0 authentication information.
654-- | OAuth 2.0 authentication information.
658--
655--
@@ -688,6 +685,47 @@ instance ToJSON RestDescriptionAuthOAuth2 where
688 toJSON RestDescriptionAuthOAuth2{..}
685 toJSON RestDescriptionAuthOAuth2{..}
689 = object (catMaybes [("scopes" .=) <$> _rdaoaScopes])
686 = object (catMaybes [("scopes" .=) <$> _rdaoaScopes])
690
687
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+
691-- | Supports uploading as a single HTTP request.
729-- | Supports uploading as a single HTTP request.
692--
730--
693-- /See:/ 'restMethodMediaUploadProtocolsSimple' smart constructor.
731-- /See:/ 'restMethodMediaUploadProtocolsSimple' smart constructor.
@@ -838,27 +876,26 @@ instance ToJSON JSONSchemaVariant where
838--
876--
839-- /See:/ 'restResourceMethods' smart constructor.
877-- /See:/ 'restResourceMethods' smart constructor.
840newtype RestResourceMethods = RestResourceMethods
878newtype RestResourceMethods = RestResourceMethods
841− { _rrmProperties :: HashMap Text RestMethod
879+ { _rrmAddtional :: HashMap Text RestMethod
842 } deriving (Eq,Show,Data,Typeable,Generic)
880 } deriving (Eq,Show,Data,Typeable,Generic)
843
881
844-- | Creates a value of 'RestResourceMethods' with the minimum fields required to make a request.
882-- | Creates a value of 'RestResourceMethods' with the minimum fields required to make a request.
845--
883--
846-- Use one of the following lenses to modify other fields as desired:
884-- Use one of the following lenses to modify other fields as desired:
847--
885--
848−-- * 'rrmProperties'
886+-- * 'rrmAddtional'
849restResourceMethods
887restResourceMethods
850− :: HashMap Text RestMethod -- ^ 'properties'
888+ :: HashMap Text RestMethod -- ^ 'addtional'
851 -> RestResourceMethods
889 -> RestResourceMethods
852−restResourceMethods pRrmProperties_ =
890+restResourceMethods pRrmAddtional_ =
853 RestResourceMethods
891 RestResourceMethods
854− { _rrmProperties = pRrmProperties_
892+ { _rrmAddtional = pRrmAddtional_
855 }
893 }
856
894
857-- | Description for any methods on this resource.
895-- | Description for any methods on this resource.
858−rrmProperties :: Lens' RestResourceMethods (HashMap Text RestMethod)
896+rrmAddtional :: Lens' RestResourceMethods (HashMap Text RestMethod)
859−rrmProperties
897+rrmAddtional
860− = lens _rrmProperties
898+ = lens _rrmAddtional (\ s a -> s{_rrmAddtional = a})
861− (\ s a -> s{_rrmProperties = a})
862
899
863instance FromJSON RestResourceMethods where
900instance FromJSON RestResourceMethods where
864 parseJSON
901 parseJSON
@@ -866,7 +903,7 @@ instance FromJSON RestResourceMethods where
866 (\ o -> RestResourceMethods <$> (parseJSONObject o))
903 (\ o -> RestResourceMethods <$> (parseJSONObject o))
867
904
868instance ToJSON RestResourceMethods where
905instance ToJSON RestResourceMethods where
869− toJSON = toJSON . _rrmProperties
906+ toJSON = toJSON . _rrmAddtional
870
907
871-- | Authentication information.
908-- | Authentication information.
872--
909--
@@ -1515,27 +1552,26 @@ instance ToJSON JSONSchema where
1515--
1552--
1516-- /See:/ 'restDescriptionSchemas' smart constructor.
1553-- /See:/ 'restDescriptionSchemas' smart constructor.
1517newtype RestDescriptionSchemas = RestDescriptionSchemas
1554newtype RestDescriptionSchemas = RestDescriptionSchemas
1518− { _rdsProperties :: HashMap Text JSONSchema
1555+ { _rdsAddtional :: HashMap Text JSONSchema
1519 } deriving (Eq,Show,Data,Typeable,Generic)
1556 } deriving (Eq,Show,Data,Typeable,Generic)
1520
1557
1521-- | Creates a value of 'RestDescriptionSchemas' with the minimum fields required to make a request.
1558-- | Creates a value of 'RestDescriptionSchemas' with the minimum fields required to make a request.
1522--
1559--
1523-- Use one of the following lenses to modify other fields as desired:
1560-- Use one of the following lenses to modify other fields as desired:
1524--
1561--
1525−-- * 'rdsProperties'
1562+-- * 'rdsAddtional'
1526restDescriptionSchemas
1563restDescriptionSchemas
1527− :: HashMap Text JSONSchema -- ^ 'properties'
1564+ :: HashMap Text JSONSchema -- ^ 'addtional'
1528 -> RestDescriptionSchemas
1565 -> RestDescriptionSchemas
1529−restDescriptionSchemas pRdsProperties_ =
1566+restDescriptionSchemas pRdsAddtional_ =
1530 RestDescriptionSchemas
1567 RestDescriptionSchemas
1531− { _rdsProperties = pRdsProperties_
1568+ { _rdsAddtional = pRdsAddtional_
1532 }
1569 }
1533
1570
1534-- | An individual schema description.
1571-- | An individual schema description.
1535−rdsProperties :: Lens' RestDescriptionSchemas (HashMap Text JSONSchema)
1572+rdsAddtional :: Lens' RestDescriptionSchemas (HashMap Text JSONSchema)
1536−rdsProperties
1573+rdsAddtional
1537− = lens _rdsProperties
1574+ = lens _rdsAddtional (\ s a -> s{_rdsAddtional = a})
1538− (\ s a -> s{_rdsProperties = a})
1539
1575
1540instance FromJSON RestDescriptionSchemas where
1576instance FromJSON RestDescriptionSchemas where
1541 parseJSON
1577 parseJSON
@@ -1544,7 +1580,7 @@ instance FromJSON RestDescriptionSchemas where
1544 RestDescriptionSchemas <$> (parseJSONObject o))
1580 RestDescriptionSchemas <$> (parseJSONObject o))
1545
1581
1546instance ToJSON RestDescriptionSchemas where
1582instance ToJSON RestDescriptionSchemas where
1547− toJSON = toJSON . _rdsProperties
1583+ toJSON = toJSON . _rdsAddtional
1548
1584
1549--
1585--
1550-- /See:/ 'jsonSchemaVariantMapItem' smart constructor.
1586-- /See:/ 'jsonSchemaVariantMapItem' smart constructor.
@@ -1594,28 +1630,27 @@ instance ToJSON JSONSchemaVariantMapItem where
1594--
1630--
1595-- /See:/ 'restDescriptionResources' smart constructor.
1631-- /See:/ 'restDescriptionResources' smart constructor.
1596newtype RestDescriptionResources = RestDescriptionResources
1632newtype RestDescriptionResources = RestDescriptionResources
1597− { _rdrProperties :: HashMap Text RestResource
1633+ { _rdrAddtional :: HashMap Text RestResource
1598 } deriving (Eq,Show,Data,Typeable,Generic)
1634 } deriving (Eq,Show,Data,Typeable,Generic)
1599
1635
1600-- | Creates a value of 'RestDescriptionResources' with the minimum fields required to make a request.
1636-- | Creates a value of 'RestDescriptionResources' with the minimum fields required to make a request.
1601--
1637--
1602-- Use one of the following lenses to modify other fields as desired:
1638-- Use one of the following lenses to modify other fields as desired:
1603--
1639--
1604−-- * 'rdrProperties'
1640+-- * 'rdrAddtional'
1605restDescriptionResources
1641restDescriptionResources
1606− :: HashMap Text RestResource -- ^ 'properties'
1642+ :: HashMap Text RestResource -- ^ 'addtional'
1607 -> RestDescriptionResources
1643 -> RestDescriptionResources
1608−restDescriptionResources pRdrProperties_ =
1644+restDescriptionResources pRdrAddtional_ =
1609 RestDescriptionResources
1645 RestDescriptionResources
1610− { _rdrProperties = pRdrProperties_
1646+ { _rdrAddtional = pRdrAddtional_
1611 }
1647 }
1612
1648
1613-- | An individual resource description. Contains methods and sub-resources
1649-- | An individual resource description. Contains methods and sub-resources
1614-- related to this resource.
1650-- related to this resource.
1615−rdrProperties :: Lens' RestDescriptionResources (HashMap Text RestResource)
1651+rdrAddtional :: Lens' RestDescriptionResources (HashMap Text RestResource)
1616−rdrProperties
1652+rdrAddtional
1617− = lens _rdrProperties
1653+ = lens _rdrAddtional (\ s a -> s{_rdrAddtional = a})
1618− (\ s a -> s{_rdrProperties = a})
1619
1654
1620instance FromJSON RestDescriptionResources where
1655instance FromJSON RestDescriptionResources where
1621 parseJSON
1656 parseJSON
@@ -1624,7 +1659,7 @@ instance FromJSON RestDescriptionResources where
1624 RestDescriptionResources <$> (parseJSONObject o))
1659 RestDescriptionResources <$> (parseJSONObject o))
1625
1660
1626instance ToJSON RestDescriptionResources where
1661instance ToJSON RestDescriptionResources where
1627− toJSON = toJSON . _rdrProperties
1662+ toJSON = toJSON . _rdrAddtional
1628
1663
1629-- | Supported upload protocols.
1664-- | Supported upload protocols.
1630--
1665--
@@ -1717,27 +1752,26 @@ instance ToJSON JSONSchemaAnnotations where
1717--
1752--
1718-- /See:/ 'restMethodParameters' smart constructor.
1753-- /See:/ 'restMethodParameters' smart constructor.
1719newtype RestMethodParameters = RestMethodParameters
1754newtype RestMethodParameters = RestMethodParameters
1720− { _rmpProperties :: HashMap Text JSONSchema
1755+ { _rmpAddtional :: HashMap Text JSONSchema
1721 } deriving (Eq,Show,Data,Typeable,Generic)
1756 } deriving (Eq,Show,Data,Typeable,Generic)
1722
1757
1723-- | Creates a value of 'RestMethodParameters' with the minimum fields required to make a request.
1758-- | Creates a value of 'RestMethodParameters' with the minimum fields required to make a request.
1724--
1759--
1725-- Use one of the following lenses to modify other fields as desired:
1760-- Use one of the following lenses to modify other fields as desired:
1726--
1761--
1727−-- * 'rmpProperties'
1762+-- * 'rmpAddtional'
1728restMethodParameters
1763restMethodParameters
1729− :: HashMap Text JSONSchema -- ^ 'properties'
1764+ :: HashMap Text JSONSchema -- ^ 'addtional'
1730 -> RestMethodParameters
1765 -> RestMethodParameters
1731−restMethodParameters pRmpProperties_ =
1766+restMethodParameters pRmpAddtional_ =
1732 RestMethodParameters
1767 RestMethodParameters
1733− { _rmpProperties = pRmpProperties_
1768+ { _rmpAddtional = pRmpAddtional_
1734 }
1769 }
1735
1770
1736-- | Details for a single parameter in this method.
1771-- | Details for a single parameter in this method.
1737−rmpProperties :: Lens' RestMethodParameters (HashMap Text JSONSchema)
1772+rmpAddtional :: Lens' RestMethodParameters (HashMap Text JSONSchema)
1738−rmpProperties
1773+rmpAddtional
1739− = lens _rmpProperties
1774+ = lens _rmpAddtional (\ s a -> s{_rmpAddtional = a})
1740− (\ s a -> s{_rmpProperties = a})
1741
1775
1742instance FromJSON RestMethodParameters where
1776instance FromJSON RestMethodParameters where
1743 parseJSON
1777 parseJSON
@@ -1745,7 +1779,7 @@ instance FromJSON RestMethodParameters where
1745 (\ o -> RestMethodParameters <$> (parseJSONObject o))
1779 (\ o -> RestMethodParameters <$> (parseJSONObject o))
1746
1780
1747instance ToJSON RestMethodParameters where
1781instance ToJSON RestMethodParameters where
1748− toJSON = toJSON . _rmpProperties
1782+ toJSON = toJSON . _rmpAddtional
1749
1783
1750-- | Media upload parameters.
1784-- | Media upload parameters.
1751--
1785--
@@ -1813,28 +1847,27 @@ instance ToJSON RestMethodMediaUpload where
1813--
1847--
1814-- /See:/ 'jsonSchemaProperties' smart constructor.
1848-- /See:/ 'jsonSchemaProperties' smart constructor.
1815newtype JSONSchemaProperties = JSONSchemaProperties
1849newtype JSONSchemaProperties = JSONSchemaProperties
1816− { _jspProperties :: HashMap Text JSONSchema
1850+ { _jspAddtional :: HashMap Text JSONSchema
1817 } deriving (Eq,Show,Data,Typeable,Generic)
1851 } deriving (Eq,Show,Data,Typeable,Generic)
1818
1852
1819-- | Creates a value of 'JSONSchemaProperties' with the minimum fields required to make a request.
1853-- | Creates a value of 'JSONSchemaProperties' with the minimum fields required to make a request.
1820--
1854--
1821-- Use one of the following lenses to modify other fields as desired:
1855-- Use one of the following lenses to modify other fields as desired:
1822--
1856--
1823−-- * 'jspProperties'
1857+-- * 'jspAddtional'
1824jsonSchemaProperties
1858jsonSchemaProperties
1825− :: HashMap Text JSONSchema -- ^ 'properties'
1859+ :: HashMap Text JSONSchema -- ^ 'addtional'
1826 -> JSONSchemaProperties
1860 -> JSONSchemaProperties
1827−jsonSchemaProperties pJspProperties_ =
1861+jsonSchemaProperties pJspAddtional_ =
1828 JSONSchemaProperties
1862 JSONSchemaProperties
1829− { _jspProperties = pJspProperties_
1863+ { _jspAddtional = pJspAddtional_
1830 }
1864 }
1831
1865
1832-- | A single property of this object. The value is itself a JSON Schema
1866-- | A single property of this object. The value is itself a JSON Schema
1833-- object describing this property.
1867-- object describing this property.
1834−jspProperties :: Lens' JSONSchemaProperties (HashMap Text JSONSchema)
1868+jspAddtional :: Lens' JSONSchemaProperties (HashMap Text JSONSchema)
1835−jspProperties
1869+jspAddtional
1836− = lens _jspProperties
1870+ = lens _jspAddtional (\ s a -> s{_jspAddtional = a})
1837− (\ s a -> s{_jspProperties = a})
1838
1871
1839instance FromJSON JSONSchemaProperties where
1872instance FromJSON JSONSchemaProperties where
1840 parseJSON
1873 parseJSON
@@ -1842,48 +1875,7 @@ instance FromJSON JSONSchemaProperties where
1842 (\ o -> JSONSchemaProperties <$> (parseJSONObject o))
1875 (\ o -> JSONSchemaProperties <$> (parseJSONObject o))
1843
1876
1844instance ToJSON JSONSchemaProperties where
1877instance ToJSON JSONSchemaProperties where
1845− toJSON = toJSON . _jspProperties
1878+ toJSON = toJSON . _jspAddtional
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])
1887
1879
1888-- | Supports the Resumable Media Upload protocol.
1880-- | Supports the Resumable Media Upload protocol.
1889--
1881--
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch.hs+1−1
@@ -59,7 +59,7 @@ module Network.Google.DoubleClickSearch
59 -- ** ReportRow
59 -- ** ReportRow
60 , ReportRow
60 , ReportRow
61 , reportRow
61 , reportRow
62− , rrProperties
62+ , rrAddtional
63
63
64 -- ** ReportRequest
64 -- ** ReportRequest
65 , ReportRequest
65 , ReportRequest
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types.hs+1−1
@@ -21,7 +21,7 @@ module Network.Google.DoubleClickSearch.Types
21 -- * ReportRow
21 -- * ReportRow
22 , ReportRow
22 , ReportRow
23 , reportRow
23 , reportRow
24− , rrProperties
24+ , rrAddtional
25
25
26 -- * ReportRequest
26 -- * ReportRequest
27 , ReportRequest
27 , ReportRequest
gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+9−9
@@ -24,27 +24,27 @@ import Network.Google.Prelude
24--
24--
25-- /See:/ 'reportRow' smart constructor.
25-- /See:/ 'reportRow' smart constructor.
26newtype ReportRow = ReportRow
26newtype ReportRow = ReportRow
27− { _rrProperties :: HashMap Text JSONValue
27+ { _rrAddtional :: HashMap Text JSONValue
28 } deriving (Eq,Show,Data,Typeable,Generic)
28 } deriving (Eq,Show,Data,Typeable,Generic)
29
29
30-- | Creates a value of 'ReportRow' with the minimum fields required to make a request.
30-- | Creates a value of 'ReportRow' with the minimum fields required to make a request.
31--
31--
32-- Use one of the following lenses to modify other fields as desired:
32-- Use one of the following lenses to modify other fields as desired:
33--
33--
34−-- * 'rrProperties'
34+-- * 'rrAddtional'
35reportRow
35reportRow
36− :: HashMap Text JSONValue -- ^ 'properties'
36+ :: HashMap Text JSONValue -- ^ 'addtional'
37 -> ReportRow
37 -> ReportRow
38−reportRow pRrProperties_ =
38+reportRow pRrAddtional_ =
39 ReportRow
39 ReportRow
40− { _rrProperties = pRrProperties_
40+ { _rrAddtional = pRrAddtional_
41 }
41 }
42
42
43-- | Indicates the columns that are represented in this row. That is, each
43-- | Indicates the columns that are represented in this row. That is, each
44-- key corresponds to a column with a non-empty cell in this row.
44-- key corresponds to a column with a non-empty cell in this row.
45−rrProperties :: Lens' ReportRow (HashMap Text JSONValue)
45+rrAddtional :: Lens' ReportRow (HashMap Text JSONValue)
46−rrProperties
46+rrAddtional
47− = lens _rrProperties (\ s a -> s{_rrProperties = a})
47+ = lens _rrAddtional (\ s a -> s{_rrAddtional = a})
48
48
49instance FromJSON ReportRow where
49instance FromJSON ReportRow where
50 parseJSON
50 parseJSON
@@ -52,7 +52,7 @@ instance FromJSON ReportRow where
52 (\ o -> ReportRow <$> (parseJSONObject o))
52 (\ o -> ReportRow <$> (parseJSONObject o))
53
53
54instance ToJSON ReportRow where
54instance ToJSON ReportRow where
55− toJSON = toJSON . _rrProperties
55+ toJSON = toJSON . _rrAddtional
56
56
57-- | A request object used to create a DoubleClick Search report.
57-- | A request object used to create a DoubleClick Search report.
58--
58--
gogol-drive/gen/Network/Google/Drive.hs+4−4
@@ -300,7 +300,7 @@ module Network.Google.Drive
300 -- ** FileOpenWithLinks
300 -- ** FileOpenWithLinks
301 , FileOpenWithLinks
301 , FileOpenWithLinks
302 , fileOpenWithLinks
302 , fileOpenWithLinks
303− , fowlProperties
303+ , fowlAddtional
304
304
305 -- ** AboutAdditionalRoleInfoItemRoleSetsItem
305 -- ** AboutAdditionalRoleInfoItemRoleSetsItem
306 , AboutAdditionalRoleInfoItemRoleSetsItem
306 , AboutAdditionalRoleInfoItemRoleSetsItem
@@ -443,7 +443,7 @@ module Network.Google.Drive
443 -- ** RevisionExportLinks
443 -- ** RevisionExportLinks
444 , RevisionExportLinks
444 , RevisionExportLinks
445 , revisionExportLinks
445 , revisionExportLinks
446− , relProperties
446+ , relAddtional
447
447
448 -- ** FileIndexableText
448 -- ** FileIndexableText
449 , FileIndexableText
449 , FileIndexableText
@@ -459,7 +459,7 @@ module Network.Google.Drive
459 -- ** ChannelParams
459 -- ** ChannelParams
460 , ChannelParams
460 , ChannelParams
461 , channelParams
461 , channelParams
462− , cpProperties
462+ , cpAddtional
463
463
464 -- ** FilesPatchModifiedDateBehavior
464 -- ** FilesPatchModifiedDateBehavior
465 , FilesPatchModifiedDateBehavior (..)
465 , FilesPatchModifiedDateBehavior (..)
@@ -694,7 +694,7 @@ module Network.Google.Drive
694 -- ** FileExportLinks
694 -- ** FileExportLinks
695 , FileExportLinks
695 , FileExportLinks
696 , fileExportLinks
696 , fileExportLinks
697− , felProperties
697+ , felAddtional
698
698
699 -- ** CommentList
699 -- ** CommentList
700 , CommentList
700 , CommentList
gogol-drive/gen/Network/Google/Drive/Types.hs+4−4
@@ -113,7 +113,7 @@ module Network.Google.Drive.Types
113 -- * FileOpenWithLinks
113 -- * FileOpenWithLinks
114 , FileOpenWithLinks
114 , FileOpenWithLinks
115 , fileOpenWithLinks
115 , fileOpenWithLinks
116− , fowlProperties
116+ , fowlAddtional
117
117
118 -- * AboutAdditionalRoleInfoItemRoleSetsItem
118 -- * AboutAdditionalRoleInfoItemRoleSetsItem
119 , AboutAdditionalRoleInfoItemRoleSetsItem
119 , AboutAdditionalRoleInfoItemRoleSetsItem
@@ -256,7 +256,7 @@ module Network.Google.Drive.Types
256 -- * RevisionExportLinks
256 -- * RevisionExportLinks
257 , RevisionExportLinks
257 , RevisionExportLinks
258 , revisionExportLinks
258 , revisionExportLinks
259− , relProperties
259+ , relAddtional
260
260
261 -- * FileIndexableText
261 -- * FileIndexableText
262 , FileIndexableText
262 , FileIndexableText
@@ -272,7 +272,7 @@ module Network.Google.Drive.Types
272 -- * ChannelParams
272 -- * ChannelParams
273 , ChannelParams
273 , ChannelParams
274 , channelParams
274 , channelParams
275− , cpProperties
275+ , cpAddtional
276
276
277 -- * FilesPatchModifiedDateBehavior
277 -- * FilesPatchModifiedDateBehavior
278 , FilesPatchModifiedDateBehavior (..)
278 , FilesPatchModifiedDateBehavior (..)
@@ -507,7 +507,7 @@ module Network.Google.Drive.Types
507 -- * FileExportLinks
507 -- * FileExportLinks
508 , FileExportLinks
508 , FileExportLinks
509 , fileExportLinks
509 , fileExportLinks
510− , felProperties
510+ , felAddtional
511
511
512 -- * CommentList
512 -- * CommentList
513 , CommentList
513 , CommentList
gogol-drive/gen/Network/Google/Drive/Types/Product.hs+37−39
@@ -710,26 +710,26 @@ instance ToJSON AppList where
710--
710--
711-- /See:/ 'fileOpenWithLinks' smart constructor.
711-- /See:/ 'fileOpenWithLinks' smart constructor.
712newtype FileOpenWithLinks = FileOpenWithLinks
712newtype FileOpenWithLinks = FileOpenWithLinks
713− { _fowlProperties :: HashMap Text Text
713+ { _fowlAddtional :: HashMap Text Text
714 } deriving (Eq,Show,Data,Typeable,Generic)
714 } deriving (Eq,Show,Data,Typeable,Generic)
715
715
716-- | Creates a value of 'FileOpenWithLinks' with the minimum fields required to make a request.
716-- | Creates a value of 'FileOpenWithLinks' with the minimum fields required to make a request.
717--
717--
718-- Use one of the following lenses to modify other fields as desired:
718-- Use one of the following lenses to modify other fields as desired:
719--
719--
720−-- * 'fowlProperties'
720+-- * 'fowlAddtional'
721fileOpenWithLinks
721fileOpenWithLinks
722− :: HashMap Text Text -- ^ 'properties'
722+ :: HashMap Text Text -- ^ 'addtional'
723 -> FileOpenWithLinks
723 -> FileOpenWithLinks
724−fileOpenWithLinks pFowlProperties_ =
724+fileOpenWithLinks pFowlAddtional_ =
725 FileOpenWithLinks
725 FileOpenWithLinks
726− { _fowlProperties = pFowlProperties_
726+ { _fowlAddtional = pFowlAddtional_
727 }
727 }
728
728
729−fowlProperties :: Lens' FileOpenWithLinks (HashMap Text Text)
729+fowlAddtional :: Lens' FileOpenWithLinks (HashMap Text Text)
730−fowlProperties
730+fowlAddtional
731− = lens _fowlProperties
731+ = lens _fowlAddtional
732− (\ s a -> s{_fowlProperties = a})
732+ (\ s a -> s{_fowlAddtional = a})
733
733
734instance FromJSON FileOpenWithLinks where
734instance FromJSON FileOpenWithLinks where
735 parseJSON
735 parseJSON
@@ -737,7 +737,7 @@ instance FromJSON FileOpenWithLinks where
737 (\ o -> FileOpenWithLinks <$> (parseJSONObject o))
737 (\ o -> FileOpenWithLinks <$> (parseJSONObject o))
738
738
739instance ToJSON FileOpenWithLinks where
739instance ToJSON FileOpenWithLinks where
740− toJSON = toJSON . _fowlProperties
740+ toJSON = toJSON . _fowlAddtional
741
741
742--
742--
743-- /See:/ 'aboutAdditionalRoleInfoItemRoleSetsItem' smart constructor.
743-- /See:/ 'aboutAdditionalRoleInfoItemRoleSetsItem' smart constructor.
@@ -2037,27 +2037,26 @@ instance ToJSON ChangeList where
2037--
2037--
2038-- /See:/ 'revisionExportLinks' smart constructor.
2038-- /See:/ 'revisionExportLinks' smart constructor.
2039newtype RevisionExportLinks = RevisionExportLinks
2039newtype RevisionExportLinks = RevisionExportLinks
2040− { _relProperties :: HashMap Text Text
2040+ { _relAddtional :: HashMap Text Text
2041 } deriving (Eq,Show,Data,Typeable,Generic)
2041 } deriving (Eq,Show,Data,Typeable,Generic)
2042
2042
2043-- | Creates a value of 'RevisionExportLinks' with the minimum fields required to make a request.
2043-- | Creates a value of 'RevisionExportLinks' with the minimum fields required to make a request.
2044--
2044--
2045-- Use one of the following lenses to modify other fields as desired:
2045-- Use one of the following lenses to modify other fields as desired:
2046--
2046--
2047−-- * 'relProperties'
2047+-- * 'relAddtional'
2048revisionExportLinks
2048revisionExportLinks
2049− :: HashMap Text Text -- ^ 'properties'
2049+ :: HashMap Text Text -- ^ 'addtional'
2050 -> RevisionExportLinks
2050 -> RevisionExportLinks
2051−revisionExportLinks pRelProperties_ =
2051+revisionExportLinks pRelAddtional_ =
2052 RevisionExportLinks
2052 RevisionExportLinks
2053− { _relProperties = pRelProperties_
2053+ { _relAddtional = pRelAddtional_
2054 }
2054 }
2055
2055
2056-- | A mapping from export format to URL
2056-- | A mapping from export format to URL
2057−relProperties :: Lens' RevisionExportLinks (HashMap Text Text)
2057+relAddtional :: Lens' RevisionExportLinks (HashMap Text Text)
2058−relProperties
2058+relAddtional
2059− = lens _relProperties
2059+ = lens _relAddtional (\ s a -> s{_relAddtional = a})
2060− (\ s a -> s{_relProperties = a})
2061
2060
2062instance FromJSON RevisionExportLinks where
2061instance FromJSON RevisionExportLinks where
2063 parseJSON
2062 parseJSON
@@ -2065,7 +2064,7 @@ instance FromJSON RevisionExportLinks where
2065 (\ o -> RevisionExportLinks <$> (parseJSONObject o))
2064 (\ o -> RevisionExportLinks <$> (parseJSONObject o))
2066
2065
2067instance ToJSON RevisionExportLinks where
2066instance ToJSON RevisionExportLinks where
2068− toJSON = toJSON . _relProperties
2067+ toJSON = toJSON . _relAddtional
2069
2068
2070-- | Indexable text attributes for the file (can only be written)
2069-- | Indexable text attributes for the file (can only be written)
2071--
2070--
@@ -2151,26 +2150,26 @@ instance ToJSON AboutFeaturesItem where
2151--
2150--
2152-- /See:/ 'channelParams' smart constructor.
2151-- /See:/ 'channelParams' smart constructor.
2153newtype ChannelParams = ChannelParams
2152newtype ChannelParams = ChannelParams
2154− { _cpProperties :: HashMap Text Text
2153+ { _cpAddtional :: HashMap Text Text
2155 } deriving (Eq,Show,Data,Typeable,Generic)
2154 } deriving (Eq,Show,Data,Typeable,Generic)
2156
2155
2157-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
2156-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
2158--
2157--
2159-- Use one of the following lenses to modify other fields as desired:
2158-- Use one of the following lenses to modify other fields as desired:
2160--
2159--
2161−-- * 'cpProperties'
2160+-- * 'cpAddtional'
2162channelParams
2161channelParams
2163− :: HashMap Text Text -- ^ 'properties'
2162+ :: HashMap Text Text -- ^ 'addtional'
2164 -> ChannelParams
2163 -> ChannelParams
2165−channelParams pCpProperties_ =
2164+channelParams pCpAddtional_ =
2166 ChannelParams
2165 ChannelParams
2167− { _cpProperties = pCpProperties_
2166+ { _cpAddtional = pCpAddtional_
2168 }
2167 }
2169
2168
2170-- | Declares a new parameter by name.
2169-- | Declares a new parameter by name.
2171−cpProperties :: Lens' ChannelParams (HashMap Text Text)
2170+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
2172−cpProperties
2171+cpAddtional
2173− = lens _cpProperties (\ s a -> s{_cpProperties = a})
2172+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
2174
2173
2175instance FromJSON ChannelParams where
2174instance FromJSON ChannelParams where
2176 parseJSON
2175 parseJSON
@@ -2178,7 +2177,7 @@ instance FromJSON ChannelParams where
2178 (\ o -> ChannelParams <$> (parseJSONObject o))
2177 (\ o -> ChannelParams <$> (parseJSONObject o))
2179
2178
2180instance ToJSON ChannelParams where
2179instance ToJSON ChannelParams where
2181− toJSON = toJSON . _cpProperties
2180+ toJSON = toJSON . _cpAddtional
2182
2181
2183-- | An item with user information and settings.
2182-- | An item with user information and settings.
2184--
2183--
@@ -4542,27 +4541,26 @@ instance ToJSON GeneratedIds where
4542--
4541--
4543-- /See:/ 'fileExportLinks' smart constructor.
4542-- /See:/ 'fileExportLinks' smart constructor.
4544newtype FileExportLinks = FileExportLinks
4543newtype FileExportLinks = FileExportLinks
4545− { _felProperties :: HashMap Text Text
4544+ { _felAddtional :: HashMap Text Text
4546 } deriving (Eq,Show,Data,Typeable,Generic)
4545 } deriving (Eq,Show,Data,Typeable,Generic)
4547
4546
4548-- | Creates a value of 'FileExportLinks' with the minimum fields required to make a request.
4547-- | Creates a value of 'FileExportLinks' with the minimum fields required to make a request.
4549--
4548--
4550-- Use one of the following lenses to modify other fields as desired:
4549-- Use one of the following lenses to modify other fields as desired:
4551--
4550--
4552−-- * 'felProperties'
4551+-- * 'felAddtional'
4553fileExportLinks
4552fileExportLinks
4554− :: HashMap Text Text -- ^ 'properties'
4553+ :: HashMap Text Text -- ^ 'addtional'
4555 -> FileExportLinks
4554 -> FileExportLinks
4556−fileExportLinks pFelProperties_ =
4555+fileExportLinks pFelAddtional_ =
4557 FileExportLinks
4556 FileExportLinks
4558− { _felProperties = pFelProperties_
4557+ { _felAddtional = pFelAddtional_
4559 }
4558 }
4560
4559
4561-- | A mapping from export format to URL
4560-- | A mapping from export format to URL
4562−felProperties :: Lens' FileExportLinks (HashMap Text Text)
4561+felAddtional :: Lens' FileExportLinks (HashMap Text Text)
4563−felProperties
4562+felAddtional
4564− = lens _felProperties
4563+ = lens _felAddtional (\ s a -> s{_felAddtional = a})
4565− (\ s a -> s{_felProperties = a})
4566
4564
4567instance FromJSON FileExportLinks where
4565instance FromJSON FileExportLinks where
4568 parseJSON
4566 parseJSON
@@ -4570,7 +4568,7 @@ instance FromJSON FileExportLinks where
4570 (\ o -> FileExportLinks <$> (parseJSONObject o))
4568 (\ o -> FileExportLinks <$> (parseJSONObject o))
4571
4569
4572instance ToJSON FileExportLinks where
4570instance ToJSON FileExportLinks where
4573− toJSON = toJSON . _felProperties
4571+ toJSON = toJSON . _felAddtional
4574
4572
4575-- | A JSON representation of a list of comments on a file in Google Drive.
4573-- | A JSON representation of a list of comments on a file in Google Drive.
4576--
4574--
gogol-fonts/gen/Network/Google/Fonts.hs+1−1
@@ -52,7 +52,7 @@ module Network.Google.Fonts
52 -- ** WebfontFiles
52 -- ** WebfontFiles
53 , WebfontFiles
53 , WebfontFiles
54 , webfontFiles
54 , webfontFiles
55− , wfProperties
55+ , wfAddtional
56 ) where
56 ) where
57
57
58import Network.Google.Fonts.Types
58import Network.Google.Fonts.Types
gogol-fonts/gen/Network/Google/Fonts/Types.hs+1−1
@@ -42,7 +42,7 @@ module Network.Google.Fonts.Types
42 -- * WebfontFiles
42 -- * WebfontFiles
43 , WebfontFiles
43 , WebfontFiles
44 , webfontFiles
44 , webfontFiles
45− , wfProperties
45+ , wfAddtional
46 ) where
46 ) where
47
47
48import Network.Google.Fonts.Types.Product
48import Network.Google.Fonts.Types.Product
gogol-fonts/gen/Network/Google/Fonts/Types/Product.hs+9−9
@@ -189,26 +189,26 @@ instance ToJSON WebfontList where
189--
189--
190-- /See:/ 'webfontFiles' smart constructor.
190-- /See:/ 'webfontFiles' smart constructor.
191newtype WebfontFiles = WebfontFiles
191newtype WebfontFiles = WebfontFiles
192− { _wfProperties :: HashMap Text Text
192+ { _wfAddtional :: HashMap Text Text
193 } deriving (Eq,Show,Data,Typeable,Generic)
193 } deriving (Eq,Show,Data,Typeable,Generic)
194
194
195-- | Creates a value of 'WebfontFiles' with the minimum fields required to make a request.
195-- | Creates a value of 'WebfontFiles' with the minimum fields required to make a request.
196--
196--
197-- Use one of the following lenses to modify other fields as desired:
197-- Use one of the following lenses to modify other fields as desired:
198--
198--
199−-- * 'wfProperties'
199+-- * 'wfAddtional'
200webfontFiles
200webfontFiles
201− :: HashMap Text Text -- ^ 'properties'
201+ :: HashMap Text Text -- ^ 'addtional'
202 -> WebfontFiles
202 -> WebfontFiles
203−webfontFiles pWfProperties_ =
203+webfontFiles pWfAddtional_ =
204 WebfontFiles
204 WebfontFiles
205− { _wfProperties = pWfProperties_
205+ { _wfAddtional = pWfAddtional_
206 }
206 }
207
207
208-- | The font file URL (value) for an specific variant (key).
208-- | The font file URL (value) for an specific variant (key).
209−wfProperties :: Lens' WebfontFiles (HashMap Text Text)
209+wfAddtional :: Lens' WebfontFiles (HashMap Text Text)
210−wfProperties
210+wfAddtional
211− = lens _wfProperties (\ s a -> s{_wfProperties = a})
211+ = lens _wfAddtional (\ s a -> s{_wfAddtional = a})
212
212
213instance FromJSON WebfontFiles where
213instance FromJSON WebfontFiles where
214 parseJSON
214 parseJSON
@@ -216,4 +216,4 @@ instance FromJSON WebfontFiles where
216 (\ o -> WebfontFiles <$> (parseJSONObject o))
216 (\ o -> WebfontFiles <$> (parseJSONObject o))
217
217
218instance ToJSON WebfontFiles where
218instance 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
158 -- ** ReadInfo
158 -- ** ReadInfo
159 , ReadInfo
159 , ReadInfo
160 , readInfo
160 , readInfo
161− , riProperties
161+ , riAddtional
162
162
163 -- ** Status
163 -- ** Status
164 , Status
164 , Status
@@ -170,7 +170,7 @@ module Network.Google.Genomics
170 -- ** OperationSchema
170 -- ** OperationSchema
171 , OperationSchema
171 , OperationSchema
172 , operationSchema
172 , operationSchema
173− , osProperties
173+ , osAddtional
174
174
175 -- ** Variant
175 -- ** Variant
176 , Variant
176 , Variant
@@ -340,17 +340,17 @@ module Network.Google.Genomics
340 -- ** VariantCallInfo
340 -- ** VariantCallInfo
341 , VariantCallInfo
341 , VariantCallInfo
342 , variantCallInfo
342 , variantCallInfo
343− , vciProperties
343+ , vciAddtional
344
344
345 -- ** ReadGroupInfo
345 -- ** ReadGroupInfo
346 , ReadGroupInfo
346 , ReadGroupInfo
347 , readGroupInfo
347 , readGroupInfo
348− , rgiProperties
348+ , rgiAddtional
349
349
350 -- ** StatusDetailsItem
350 -- ** StatusDetailsItem
351 , StatusDetailsItem
351 , StatusDetailsItem
352 , statusDetailsItem
352 , statusDetailsItem
353− , sdiProperties
353+ , sdiAddtional
354
354
355 -- ** SearchCallSetsResponse
355 -- ** SearchCallSetsResponse
356 , SearchCallSetsResponse
356 , SearchCallSetsResponse
@@ -377,12 +377,12 @@ module Network.Google.Genomics
377 -- ** OperationMetadataRequest
377 -- ** OperationMetadataRequest
378 , OperationMetadataRequest
378 , OperationMetadataRequest
379 , operationMetadataRequest
379 , operationMetadataRequest
380− , omrProperties
380+ , omrAddtional
381
381
382 -- ** VariantInfo
382 -- ** VariantInfo
383 , VariantInfo
383 , VariantInfo
384 , variantInfo
384 , variantInfo
385− , viProperties
385+ , viAddtional
386
386
387 -- ** Experiment
387 -- ** Experiment
388 , Experiment
388 , Experiment
@@ -585,17 +585,17 @@ module Network.Google.Genomics
585 -- ** CallSetInfo
585 -- ** CallSetInfo
586 , CallSetInfo
586 , CallSetInfo
587 , callSetInfo
587 , callSetInfo
588− , csiProperties
588+ , csiAddtional
589
589
590 -- ** VariantSetMetadataInfo
590 -- ** VariantSetMetadataInfo
591 , VariantSetMetadataInfo
591 , VariantSetMetadataInfo
592 , variantSetMetadataInfo
592 , variantSetMetadataInfo
593− , vsmiProperties
593+ , vsmiAddtional
594
594
595 -- ** OperationResponse
595 -- ** OperationResponse
596 , OperationResponse
596 , OperationResponse
597 , operationResponse
597 , operationResponse
598− , orProperties
598+ , orAddtional
599
599
600 -- ** OperationEvent
600 -- ** OperationEvent
601 , OperationEvent
601 , OperationEvent
@@ -634,7 +634,7 @@ module Network.Google.Genomics
634 -- ** ReadGroupSetInfo
634 -- ** ReadGroupSetInfo
635 , ReadGroupSetInfo
635 , ReadGroupSetInfo
636 , readGroupSetInfo
636 , readGroupSetInfo
637− , rgsiProperties
637+ , rgsiAddtional
638
638
639 -- ** ReferenceSet
639 -- ** ReferenceSet
640 , ReferenceSet
640 , ReferenceSet
gogol-genomics/gen/Network/Google/Genomics/Types.hs+11−11
@@ -21,7 +21,7 @@ module Network.Google.Genomics.Types
21 -- * ReadInfo
21 -- * ReadInfo
22 , ReadInfo
22 , ReadInfo
23 , readInfo
23 , readInfo
24− , riProperties
24+ , riAddtional
25
25
26 -- * Status
26 -- * Status
27 , Status
27 , Status
@@ -33,7 +33,7 @@ module Network.Google.Genomics.Types
33 -- * OperationSchema
33 -- * OperationSchema
34 , OperationSchema
34 , OperationSchema
35 , operationSchema
35 , operationSchema
36− , osProperties
36+ , osAddtional
37
37
38 -- * Variant
38 -- * Variant
39 , Variant
39 , Variant
@@ -203,17 +203,17 @@ module Network.Google.Genomics.Types
203 -- * VariantCallInfo
203 -- * VariantCallInfo
204 , VariantCallInfo
204 , VariantCallInfo
205 , variantCallInfo
205 , variantCallInfo
206− , vciProperties
206+ , vciAddtional
207
207
208 -- * ReadGroupInfo
208 -- * ReadGroupInfo
209 , ReadGroupInfo
209 , ReadGroupInfo
210 , readGroupInfo
210 , readGroupInfo
211− , rgiProperties
211+ , rgiAddtional
212
212
213 -- * StatusDetailsItem
213 -- * StatusDetailsItem
214 , StatusDetailsItem
214 , StatusDetailsItem
215 , statusDetailsItem
215 , statusDetailsItem
216− , sdiProperties
216+ , sdiAddtional
217
217
218 -- * SearchCallSetsResponse
218 -- * SearchCallSetsResponse
219 , SearchCallSetsResponse
219 , SearchCallSetsResponse
@@ -240,12 +240,12 @@ module Network.Google.Genomics.Types
240 -- * OperationMetadataRequest
240 -- * OperationMetadataRequest
241 , OperationMetadataRequest
241 , OperationMetadataRequest
242 , operationMetadataRequest
242 , operationMetadataRequest
243− , omrProperties
243+ , omrAddtional
244
244
245 -- * VariantInfo
245 -- * VariantInfo
246 , VariantInfo
246 , VariantInfo
247 , variantInfo
247 , variantInfo
248− , viProperties
248+ , viAddtional
249
249
250 -- * Experiment
250 -- * Experiment
251 , Experiment
251 , Experiment
@@ -448,17 +448,17 @@ module Network.Google.Genomics.Types
448 -- * CallSetInfo
448 -- * CallSetInfo
449 , CallSetInfo
449 , CallSetInfo
450 , callSetInfo
450 , callSetInfo
451− , csiProperties
451+ , csiAddtional
452
452
453 -- * VariantSetMetadataInfo
453 -- * VariantSetMetadataInfo
454 , VariantSetMetadataInfo
454 , VariantSetMetadataInfo
455 , variantSetMetadataInfo
455 , variantSetMetadataInfo
456− , vsmiProperties
456+ , vsmiAddtional
457
457
458 -- * OperationResponse
458 -- * OperationResponse
459 , OperationResponse
459 , OperationResponse
460 , operationResponse
460 , operationResponse
461− , orProperties
461+ , orAddtional
462
462
463 -- * OperationEvent
463 -- * OperationEvent
464 , OperationEvent
464 , OperationEvent
@@ -497,7 +497,7 @@ module Network.Google.Genomics.Types
497 -- * ReadGroupSetInfo
497 -- * ReadGroupSetInfo
498 , ReadGroupSetInfo
498 , ReadGroupSetInfo
499 , readGroupSetInfo
499 , readGroupSetInfo
500− , rgsiProperties
500+ , rgsiAddtional
501
501
502 -- * ReferenceSet
502 -- * ReferenceSet
503 , ReferenceSet
503 , ReferenceSet
gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+101−106
@@ -25,25 +25,25 @@ import Network.Google.Prelude
25--
25--
26-- /See:/ 'readInfo' smart constructor.
26-- /See:/ 'readInfo' smart constructor.
27newtype ReadInfo = ReadInfo
27newtype ReadInfo = ReadInfo
28− { _riProperties :: HashMap Text [JSONValue]
28+ { _riAddtional :: HashMap Text [JSONValue]
29 } deriving (Eq,Show,Data,Typeable,Generic)
29 } deriving (Eq,Show,Data,Typeable,Generic)
30
30
31-- | Creates a value of 'ReadInfo' with the minimum fields required to make a request.
31-- | Creates a value of 'ReadInfo' with the minimum fields required to make a request.
32--
32--
33-- Use one of the following lenses to modify other fields as desired:
33-- Use one of the following lenses to modify other fields as desired:
34--
34--
35−-- * 'riProperties'
35+-- * 'riAddtional'
36readInfo
36readInfo
37− :: HashMap Text [JSONValue] -- ^ 'properties'
37+ :: HashMap Text [JSONValue] -- ^ 'addtional'
38 -> ReadInfo
38 -> ReadInfo
39−readInfo pRiProperties_ =
39+readInfo pRiAddtional_ =
40 ReadInfo
40 ReadInfo
41− { _riProperties = pRiProperties_
41+ { _riAddtional = pRiAddtional_
42 }
42 }
43
43
44−riProperties :: Lens' ReadInfo (HashMap Text [JSONValue])
44+riAddtional :: Lens' ReadInfo (HashMap Text [JSONValue])
45−riProperties
45+riAddtional
46− = lens _riProperties (\ s a -> s{_riProperties = a})
46+ = lens _riAddtional (\ s a -> s{_riAddtional = a})
47
47
48instance FromJSON ReadInfo where
48instance FromJSON ReadInfo where
49 parseJSON
49 parseJSON
@@ -51,7 +51,7 @@ instance FromJSON ReadInfo where
51 (\ o -> ReadInfo <$> (parseJSONObject o))
51 (\ o -> ReadInfo <$> (parseJSONObject o))
52
52
53instance ToJSON ReadInfo where
53instance ToJSON ReadInfo where
54− toJSON = toJSON . _riProperties
54+ toJSON = toJSON . _riAddtional
55
55
56-- | The \`Status\` type defines a logical error model that is suitable for
56-- | The \`Status\` type defines a logical error model that is suitable for
57-- different programming environments, including REST APIs and RPC APIs. It
57-- different programming environments, including REST APIs and RPC APIs. It
@@ -153,26 +153,26 @@ instance ToJSON Status where
153--
153--
154-- /See:/ 'operationSchema' smart constructor.
154-- /See:/ 'operationSchema' smart constructor.
155newtype OperationSchema = OperationSchema
155newtype OperationSchema = OperationSchema
156− { _osProperties :: HashMap Text JSONValue
156+ { _osAddtional :: HashMap Text JSONValue
157 } deriving (Eq,Show,Data,Typeable,Generic)
157 } deriving (Eq,Show,Data,Typeable,Generic)
158
158
159-- | Creates a value of 'OperationSchema' with the minimum fields required to make a request.
159-- | Creates a value of 'OperationSchema' with the minimum fields required to make a request.
160--
160--
161-- Use one of the following lenses to modify other fields as desired:
161-- Use one of the following lenses to modify other fields as desired:
162--
162--
163−-- * 'osProperties'
163+-- * 'osAddtional'
164operationSchema
164operationSchema
165− :: HashMap Text JSONValue -- ^ 'properties'
165+ :: HashMap Text JSONValue -- ^ 'addtional'
166 -> OperationSchema
166 -> OperationSchema
167−operationSchema pOsProperties_ =
167+operationSchema pOsAddtional_ =
168 OperationSchema
168 OperationSchema
169− { _osProperties = pOsProperties_
169+ { _osAddtional = pOsAddtional_
170 }
170 }
171
171
172-- | Properties of the object. Contains field \'ype with type URL.
172-- | Properties of the object. Contains field \'ype with type URL.
173−osProperties :: Lens' OperationSchema (HashMap Text JSONValue)
173+osAddtional :: Lens' OperationSchema (HashMap Text JSONValue)
174−osProperties
174+osAddtional
175− = lens _osProperties (\ s a -> s{_osProperties = a})
175+ = lens _osAddtional (\ s a -> s{_osAddtional = a})
176
176
177instance FromJSON OperationSchema where
177instance FromJSON OperationSchema where
178 parseJSON
178 parseJSON
@@ -180,7 +180,7 @@ instance FromJSON OperationSchema where
180 (\ o -> OperationSchema <$> (parseJSONObject o))
180 (\ o -> OperationSchema <$> (parseJSONObject o))
181
181
182instance ToJSON OperationSchema where
182instance ToJSON OperationSchema where
183− toJSON = toJSON . _osProperties
183+ toJSON = toJSON . _osAddtional
184
184
185-- | A variant represents a change in DNA sequence relative to a reference
185-- | A variant represents a change in DNA sequence relative to a reference
186-- sequence. For example, a variant could represent a SNP or an insertion.
186-- sequence. For example, a variant could represent a SNP or an insertion.
@@ -1844,26 +1844,25 @@ instance ToJSON Reference where
1844--
1844--
1845-- /See:/ 'variantCallInfo' smart constructor.
1845-- /See:/ 'variantCallInfo' smart constructor.
1846newtype VariantCallInfo = VariantCallInfo
1846newtype VariantCallInfo = VariantCallInfo
1847− { _vciProperties :: HashMap Text [JSONValue]
1847+ { _vciAddtional :: HashMap Text [JSONValue]
1848 } deriving (Eq,Show,Data,Typeable,Generic)
1848 } deriving (Eq,Show,Data,Typeable,Generic)
1849
1849
1850-- | Creates a value of 'VariantCallInfo' with the minimum fields required to make a request.
1850-- | Creates a value of 'VariantCallInfo' with the minimum fields required to make a request.
1851--
1851--
1852-- Use one of the following lenses to modify other fields as desired:
1852-- Use one of the following lenses to modify other fields as desired:
1853--
1853--
1854−-- * 'vciProperties'
1854+-- * 'vciAddtional'
1855variantCallInfo
1855variantCallInfo
1856− :: HashMap Text [JSONValue] -- ^ 'properties'
1856+ :: HashMap Text [JSONValue] -- ^ 'addtional'
1857 -> VariantCallInfo
1857 -> VariantCallInfo
1858−variantCallInfo pVciProperties_ =
1858+variantCallInfo pVciAddtional_ =
1859 VariantCallInfo
1859 VariantCallInfo
1860− { _vciProperties = pVciProperties_
1860+ { _vciAddtional = pVciAddtional_
1861 }
1861 }
1862
1862
1863−vciProperties :: Lens' VariantCallInfo (HashMap Text [JSONValue])
1863+vciAddtional :: Lens' VariantCallInfo (HashMap Text [JSONValue])
1864−vciProperties
1864+vciAddtional
1865− = lens _vciProperties
1865+ = lens _vciAddtional (\ s a -> s{_vciAddtional = a})
1866− (\ s a -> s{_vciProperties = a})
1867
1866
1868instance FromJSON VariantCallInfo where
1867instance FromJSON VariantCallInfo where
1869 parseJSON
1868 parseJSON
@@ -1871,33 +1870,32 @@ instance FromJSON VariantCallInfo where
1871 (\ o -> VariantCallInfo <$> (parseJSONObject o))
1870 (\ o -> VariantCallInfo <$> (parseJSONObject o))
1872
1871
1873instance ToJSON VariantCallInfo where
1872instance ToJSON VariantCallInfo where
1874− toJSON = toJSON . _vciProperties
1873+ toJSON = toJSON . _vciAddtional
1875
1874
1876-- | A map of additional read group information. This must be of the form map
1875-- | A map of additional read group information. This must be of the form map
1877-- (string key mapping to a list of string values).
1876-- (string key mapping to a list of string values).
1878--
1877--
1879-- /See:/ 'readGroupInfo' smart constructor.
1878-- /See:/ 'readGroupInfo' smart constructor.
1880newtype ReadGroupInfo = ReadGroupInfo
1879newtype ReadGroupInfo = ReadGroupInfo
1881− { _rgiProperties :: HashMap Text [JSONValue]
1880+ { _rgiAddtional :: HashMap Text [JSONValue]
1882 } deriving (Eq,Show,Data,Typeable,Generic)
1881 } deriving (Eq,Show,Data,Typeable,Generic)
1883
1882
1884-- | Creates a value of 'ReadGroupInfo' with the minimum fields required to make a request.
1883-- | Creates a value of 'ReadGroupInfo' with the minimum fields required to make a request.
1885--
1884--
1886-- Use one of the following lenses to modify other fields as desired:
1885-- Use one of the following lenses to modify other fields as desired:
1887--
1886--
1888−-- * 'rgiProperties'
1887+-- * 'rgiAddtional'
1889readGroupInfo
1888readGroupInfo
1890− :: HashMap Text [JSONValue] -- ^ 'properties'
1889+ :: HashMap Text [JSONValue] -- ^ 'addtional'
1891 -> ReadGroupInfo
1890 -> ReadGroupInfo
1892−readGroupInfo pRgiProperties_ =
1891+readGroupInfo pRgiAddtional_ =
1893 ReadGroupInfo
1892 ReadGroupInfo
1894− { _rgiProperties = pRgiProperties_
1893+ { _rgiAddtional = pRgiAddtional_
1895 }
1894 }
1896
1895
1897−rgiProperties :: Lens' ReadGroupInfo (HashMap Text [JSONValue])
1896+rgiAddtional :: Lens' ReadGroupInfo (HashMap Text [JSONValue])
1898−rgiProperties
1897+rgiAddtional
1899− = lens _rgiProperties
1898+ = lens _rgiAddtional (\ s a -> s{_rgiAddtional = a})
1900− (\ s a -> s{_rgiProperties = a})
1901
1899
1902instance FromJSON ReadGroupInfo where
1900instance FromJSON ReadGroupInfo where
1903 parseJSON
1901 parseJSON
@@ -1905,32 +1903,31 @@ instance FromJSON ReadGroupInfo where
1905 (\ o -> ReadGroupInfo <$> (parseJSONObject o))
1903 (\ o -> ReadGroupInfo <$> (parseJSONObject o))
1906
1904
1907instance ToJSON ReadGroupInfo where
1905instance ToJSON ReadGroupInfo where
1908− toJSON = toJSON . _rgiProperties
1906+ toJSON = toJSON . _rgiAddtional
1909
1907
1910--
1908--
1911-- /See:/ 'statusDetailsItem' smart constructor.
1909-- /See:/ 'statusDetailsItem' smart constructor.
1912newtype StatusDetailsItem = StatusDetailsItem
1910newtype StatusDetailsItem = StatusDetailsItem
1913− { _sdiProperties :: HashMap Text JSONValue
1911+ { _sdiAddtional :: HashMap Text JSONValue
1914 } deriving (Eq,Show,Data,Typeable,Generic)
1912 } deriving (Eq,Show,Data,Typeable,Generic)
1915
1913
1916-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
1914-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
1917--
1915--
1918-- Use one of the following lenses to modify other fields as desired:
1916-- Use one of the following lenses to modify other fields as desired:
1919--
1917--
1920−-- * 'sdiProperties'
1918+-- * 'sdiAddtional'
1921statusDetailsItem
1919statusDetailsItem
1922− :: HashMap Text JSONValue -- ^ 'properties'
1920+ :: HashMap Text JSONValue -- ^ 'addtional'
1923 -> StatusDetailsItem
1921 -> StatusDetailsItem
1924−statusDetailsItem pSdiProperties_ =
1922+statusDetailsItem pSdiAddtional_ =
1925 StatusDetailsItem
1923 StatusDetailsItem
1926− { _sdiProperties = pSdiProperties_
1924+ { _sdiAddtional = pSdiAddtional_
1927 }
1925 }
1928
1926
1929-- | Properties of the object. Contains field \'ype with type URL.
1927-- | Properties of the object. Contains field \'ype with type URL.
1930−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1928+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1931−sdiProperties
1929+sdiAddtional
1932− = lens _sdiProperties
1930+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
1933− (\ s a -> s{_sdiProperties = a})
1934
1931
1935instance FromJSON StatusDetailsItem where
1932instance FromJSON StatusDetailsItem where
1936 parseJSON
1933 parseJSON
@@ -1938,7 +1935,7 @@ instance FromJSON StatusDetailsItem where
1938 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
1935 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
1939
1936
1940instance ToJSON StatusDetailsItem where
1937instance ToJSON StatusDetailsItem where
1941− toJSON = toJSON . _sdiProperties
1938+ toJSON = toJSON . _sdiAddtional
1942
1939
1943-- | The call set search response.
1940-- | The call set search response.
1944--
1941--
@@ -2155,27 +2152,26 @@ instance ToJSON SearchReadsRequest where
2155--
2152--
2156-- /See:/ 'operationMetadataRequest' smart constructor.
2153-- /See:/ 'operationMetadataRequest' smart constructor.
2157newtype OperationMetadataRequest = OperationMetadataRequest
2154newtype OperationMetadataRequest = OperationMetadataRequest
2158− { _omrProperties :: HashMap Text JSONValue
2155+ { _omrAddtional :: HashMap Text JSONValue
2159 } deriving (Eq,Show,Data,Typeable,Generic)
2156 } deriving (Eq,Show,Data,Typeable,Generic)
2160
2157
2161-- | Creates a value of 'OperationMetadataRequest' with the minimum fields required to make a request.
2158-- | Creates a value of 'OperationMetadataRequest' with the minimum fields required to make a request.
2162--
2159--
2163-- Use one of the following lenses to modify other fields as desired:
2160-- Use one of the following lenses to modify other fields as desired:
2164--
2161--
2165−-- * 'omrProperties'
2162+-- * 'omrAddtional'
2166operationMetadataRequest
2163operationMetadataRequest
2167− :: HashMap Text JSONValue -- ^ 'properties'
2164+ :: HashMap Text JSONValue -- ^ 'addtional'
2168 -> OperationMetadataRequest
2165 -> OperationMetadataRequest
2169−operationMetadataRequest pOmrProperties_ =
2166+operationMetadataRequest pOmrAddtional_ =
2170 OperationMetadataRequest
2167 OperationMetadataRequest
2171− { _omrProperties = pOmrProperties_
2168+ { _omrAddtional = pOmrAddtional_
2172 }
2169 }
2173
2170
2174-- | Properties of the object. Contains field \'ype with type URL.
2171-- | Properties of the object. Contains field \'ype with type URL.
2175−omrProperties :: Lens' OperationMetadataRequest (HashMap Text JSONValue)
2172+omrAddtional :: Lens' OperationMetadataRequest (HashMap Text JSONValue)
2176−omrProperties
2173+omrAddtional
2177− = lens _omrProperties
2174+ = lens _omrAddtional (\ s a -> s{_omrAddtional = a})
2178− (\ s a -> s{_omrProperties = a})
2179
2175
2180instance FromJSON OperationMetadataRequest where
2176instance FromJSON OperationMetadataRequest where
2181 parseJSON
2177 parseJSON
@@ -2184,32 +2180,32 @@ instance FromJSON OperationMetadataRequest where
2184 OperationMetadataRequest <$> (parseJSONObject o))
2180 OperationMetadataRequest <$> (parseJSONObject o))
2185
2181
2186instance ToJSON OperationMetadataRequest where
2182instance ToJSON OperationMetadataRequest where
2187− toJSON = toJSON . _omrProperties
2183+ toJSON = toJSON . _omrAddtional
2188
2184
2189-- | A map of additional variant information. This must be of the form map
2185-- | A map of additional variant information. This must be of the form map
2190-- (string key mapping to a list of string values).
2186-- (string key mapping to a list of string values).
2191--
2187--
2192-- /See:/ 'variantInfo' smart constructor.
2188-- /See:/ 'variantInfo' smart constructor.
2193newtype VariantInfo = VariantInfo
2189newtype VariantInfo = VariantInfo
2194− { _viProperties :: HashMap Text [JSONValue]
2190+ { _viAddtional :: HashMap Text [JSONValue]
2195 } deriving (Eq,Show,Data,Typeable,Generic)
2191 } deriving (Eq,Show,Data,Typeable,Generic)
2196
2192
2197-- | Creates a value of 'VariantInfo' with the minimum fields required to make a request.
2193-- | Creates a value of 'VariantInfo' with the minimum fields required to make a request.
2198--
2194--
2199-- Use one of the following lenses to modify other fields as desired:
2195-- Use one of the following lenses to modify other fields as desired:
2200--
2196--
2201−-- * 'viProperties'
2197+-- * 'viAddtional'
2202variantInfo
2198variantInfo
2203− :: HashMap Text [JSONValue] -- ^ 'properties'
2199+ :: HashMap Text [JSONValue] -- ^ 'addtional'
2204 -> VariantInfo
2200 -> VariantInfo
2205−variantInfo pViProperties_ =
2201+variantInfo pViAddtional_ =
2206 VariantInfo
2202 VariantInfo
2207− { _viProperties = pViProperties_
2203+ { _viAddtional = pViAddtional_
2208 }
2204 }
2209
2205
2210−viProperties :: Lens' VariantInfo (HashMap Text [JSONValue])
2206+viAddtional :: Lens' VariantInfo (HashMap Text [JSONValue])
2211−viProperties
2207+viAddtional
2212− = lens _viProperties (\ s a -> s{_viProperties = a})
2208+ = lens _viAddtional (\ s a -> s{_viAddtional = a})
2213
2209
2214instance FromJSON VariantInfo where
2210instance FromJSON VariantInfo where
2215 parseJSON
2211 parseJSON
@@ -2217,7 +2213,7 @@ instance FromJSON VariantInfo where
2217 (\ o -> VariantInfo <$> (parseJSONObject o))
2213 (\ o -> VariantInfo <$> (parseJSONObject o))
2218
2214
2219instance ToJSON VariantInfo where
2215instance ToJSON VariantInfo where
2220− toJSON = toJSON . _viProperties
2216+ toJSON = toJSON . _viAddtional
2221
2217
2222--
2218--
2223-- /See:/ 'experiment' smart constructor.
2219-- /See:/ 'experiment' smart constructor.
@@ -4112,26 +4108,25 @@ instance ToJSON SearchVariantsRequest where
4112--
4108--
4113-- /See:/ 'callSetInfo' smart constructor.
4109-- /See:/ 'callSetInfo' smart constructor.
4114newtype CallSetInfo = CallSetInfo
4110newtype CallSetInfo = CallSetInfo
4115− { _csiProperties :: HashMap Text [JSONValue]
4111+ { _csiAddtional :: HashMap Text [JSONValue]
4116 } deriving (Eq,Show,Data,Typeable,Generic)
4112 } deriving (Eq,Show,Data,Typeable,Generic)
4117
4113
4118-- | Creates a value of 'CallSetInfo' with the minimum fields required to make a request.
4114-- | Creates a value of 'CallSetInfo' with the minimum fields required to make a request.
4119--
4115--
4120-- Use one of the following lenses to modify other fields as desired:
4116-- Use one of the following lenses to modify other fields as desired:
4121--
4117--
4122−-- * 'csiProperties'
4118+-- * 'csiAddtional'
4123callSetInfo
4119callSetInfo
4124− :: HashMap Text [JSONValue] -- ^ 'properties'
4120+ :: HashMap Text [JSONValue] -- ^ 'addtional'
4125 -> CallSetInfo
4121 -> CallSetInfo
4126−callSetInfo pCsiProperties_ =
4122+callSetInfo pCsiAddtional_ =
4127 CallSetInfo
4123 CallSetInfo
4128− { _csiProperties = pCsiProperties_
4124+ { _csiAddtional = pCsiAddtional_
4129 }
4125 }
4130
4126
4131−csiProperties :: Lens' CallSetInfo (HashMap Text [JSONValue])
4127+csiAddtional :: Lens' CallSetInfo (HashMap Text [JSONValue])
4132−csiProperties
4128+csiAddtional
4133− = lens _csiProperties
4129+ = lens _csiAddtional (\ s a -> s{_csiAddtional = a})
4134− (\ s a -> s{_csiProperties = a})
4135
4130
4136instance FromJSON CallSetInfo where
4131instance FromJSON CallSetInfo where
4137 parseJSON
4132 parseJSON
@@ -4139,33 +4134,33 @@ instance FromJSON CallSetInfo where
4139 (\ o -> CallSetInfo <$> (parseJSONObject o))
4134 (\ o -> CallSetInfo <$> (parseJSONObject o))
4140
4135
4141instance ToJSON CallSetInfo where
4136instance ToJSON CallSetInfo where
4142− toJSON = toJSON . _csiProperties
4137+ toJSON = toJSON . _csiAddtional
4143
4138
4144-- | Remaining structured metadata key-value pairs. This must be of the form
4139-- | Remaining structured metadata key-value pairs. This must be of the form
4145-- map (string key mapping to a list of string values).
4140-- map (string key mapping to a list of string values).
4146--
4141--
4147-- /See:/ 'variantSetMetadataInfo' smart constructor.
4142-- /See:/ 'variantSetMetadataInfo' smart constructor.
4148newtype VariantSetMetadataInfo = VariantSetMetadataInfo
4143newtype VariantSetMetadataInfo = VariantSetMetadataInfo
4149− { _vsmiProperties :: HashMap Text [JSONValue]
4144+ { _vsmiAddtional :: HashMap Text [JSONValue]
4150 } deriving (Eq,Show,Data,Typeable,Generic)
4145 } deriving (Eq,Show,Data,Typeable,Generic)
4151
4146
4152-- | Creates a value of 'VariantSetMetadataInfo' with the minimum fields required to make a request.
4147-- | Creates a value of 'VariantSetMetadataInfo' with the minimum fields required to make a request.
4153--
4148--
4154-- Use one of the following lenses to modify other fields as desired:
4149-- Use one of the following lenses to modify other fields as desired:
4155--
4150--
4156−-- * 'vsmiProperties'
4151+-- * 'vsmiAddtional'
4157variantSetMetadataInfo
4152variantSetMetadataInfo
4158− :: HashMap Text [JSONValue] -- ^ 'properties'
4153+ :: HashMap Text [JSONValue] -- ^ 'addtional'
4159 -> VariantSetMetadataInfo
4154 -> VariantSetMetadataInfo
4160−variantSetMetadataInfo pVsmiProperties_ =
4155+variantSetMetadataInfo pVsmiAddtional_ =
4161 VariantSetMetadataInfo
4156 VariantSetMetadataInfo
4162− { _vsmiProperties = pVsmiProperties_
4157+ { _vsmiAddtional = pVsmiAddtional_
4163 }
4158 }
4164
4159
4165−vsmiProperties :: Lens' VariantSetMetadataInfo (HashMap Text [JSONValue])
4160+vsmiAddtional :: Lens' VariantSetMetadataInfo (HashMap Text [JSONValue])
4166−vsmiProperties
4161+vsmiAddtional
4167− = lens _vsmiProperties
4162+ = lens _vsmiAddtional
4168− (\ s a -> s{_vsmiProperties = a})
4163+ (\ s a -> s{_vsmiAddtional = a})
4169
4164
4170instance FromJSON VariantSetMetadataInfo where
4165instance FromJSON VariantSetMetadataInfo where
4171 parseJSON
4166 parseJSON
@@ -4174,7 +4169,7 @@ instance FromJSON VariantSetMetadataInfo where
4174 VariantSetMetadataInfo <$> (parseJSONObject o))
4169 VariantSetMetadataInfo <$> (parseJSONObject o))
4175
4170
4176instance ToJSON VariantSetMetadataInfo where
4171instance ToJSON VariantSetMetadataInfo where
4177− toJSON = toJSON . _vsmiProperties
4172+ toJSON = toJSON . _vsmiAddtional
4178
4173
4179-- | If importing ReadGroupSets, an ImportReadGroupSetsResponse is returned.
4174-- | If importing ReadGroupSets, an ImportReadGroupSetsResponse is returned.
4180-- If importing Variants, an ImportVariantsResponse is returned. For
4175-- If importing Variants, an ImportVariantsResponse is returned. For
@@ -4182,26 +4177,26 @@ instance ToJSON VariantSetMetadataInfo where
4182--
4177--
4183-- /See:/ 'operationResponse' smart constructor.
4178-- /See:/ 'operationResponse' smart constructor.
4184newtype OperationResponse = OperationResponse
4179newtype OperationResponse = OperationResponse
4185− { _orProperties :: HashMap Text JSONValue
4180+ { _orAddtional :: HashMap Text JSONValue
4186 } deriving (Eq,Show,Data,Typeable,Generic)
4181 } deriving (Eq,Show,Data,Typeable,Generic)
4187
4182
4188-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
4183-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
4189--
4184--
4190-- Use one of the following lenses to modify other fields as desired:
4185-- Use one of the following lenses to modify other fields as desired:
4191--
4186--
4192−-- * 'orProperties'
4187+-- * 'orAddtional'
4193operationResponse
4188operationResponse
4194− :: HashMap Text JSONValue -- ^ 'properties'
4189+ :: HashMap Text JSONValue -- ^ 'addtional'
4195 -> OperationResponse
4190 -> OperationResponse
4196−operationResponse pOrProperties_ =
4191+operationResponse pOrAddtional_ =
4197 OperationResponse
4192 OperationResponse
4198− { _orProperties = pOrProperties_
4193+ { _orAddtional = pOrAddtional_
4199 }
4194 }
4200
4195
4201-- | Properties of the object. Contains field \'ype with type URL.
4196-- | Properties of the object. Contains field \'ype with type URL.
4202−orProperties :: Lens' OperationResponse (HashMap Text JSONValue)
4197+orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
4203−orProperties
4198+orAddtional
4204− = lens _orProperties (\ s a -> s{_orProperties = a})
4199+ = lens _orAddtional (\ s a -> s{_orAddtional = a})
4205
4200
4206instance FromJSON OperationResponse where
4201instance FromJSON OperationResponse where
4207 parseJSON
4202 parseJSON
@@ -4209,7 +4204,7 @@ instance FromJSON OperationResponse where
4209 (\ o -> OperationResponse <$> (parseJSONObject o))
4204 (\ o -> OperationResponse <$> (parseJSONObject o))
4210
4205
4211instance ToJSON OperationResponse where
4206instance ToJSON OperationResponse where
4212− toJSON = toJSON . _orProperties
4207+ toJSON = toJSON . _orAddtional
4213
4208
4214-- | An event that occurred during an Operation.
4209-- | An event that occurred during an Operation.
4215--
4210--
@@ -4502,26 +4497,26 @@ instance ToJSON SearchReadGroupSetsResponse where
4502--
4497--
4503-- /See:/ 'readGroupSetInfo' smart constructor.
4498-- /See:/ 'readGroupSetInfo' smart constructor.
4504newtype ReadGroupSetInfo = ReadGroupSetInfo
4499newtype ReadGroupSetInfo = ReadGroupSetInfo
4505− { _rgsiProperties :: HashMap Text [JSONValue]
4500+ { _rgsiAddtional :: HashMap Text [JSONValue]
4506 } deriving (Eq,Show,Data,Typeable,Generic)
4501 } deriving (Eq,Show,Data,Typeable,Generic)
4507
4502
4508-- | Creates a value of 'ReadGroupSetInfo' with the minimum fields required to make a request.
4503-- | Creates a value of 'ReadGroupSetInfo' with the minimum fields required to make a request.
4509--
4504--
4510-- Use one of the following lenses to modify other fields as desired:
4505-- Use one of the following lenses to modify other fields as desired:
4511--
4506--
4512−-- * 'rgsiProperties'
4507+-- * 'rgsiAddtional'
4513readGroupSetInfo
4508readGroupSetInfo
4514− :: HashMap Text [JSONValue] -- ^ 'properties'
4509+ :: HashMap Text [JSONValue] -- ^ 'addtional'
4515 -> ReadGroupSetInfo
4510 -> ReadGroupSetInfo
4516−readGroupSetInfo pRgsiProperties_ =
4511+readGroupSetInfo pRgsiAddtional_ =
4517 ReadGroupSetInfo
4512 ReadGroupSetInfo
4518− { _rgsiProperties = pRgsiProperties_
4513+ { _rgsiAddtional = pRgsiAddtional_
4519 }
4514 }
4520
4515
4521−rgsiProperties :: Lens' ReadGroupSetInfo (HashMap Text [JSONValue])
4516+rgsiAddtional :: Lens' ReadGroupSetInfo (HashMap Text [JSONValue])
4522−rgsiProperties
4517+rgsiAddtional
4523− = lens _rgsiProperties
4518+ = lens _rgsiAddtional
4524− (\ s a -> s{_rgsiProperties = a})
4519+ (\ s a -> s{_rgsiAddtional = a})
4525
4520
4526instance FromJSON ReadGroupSetInfo where
4521instance FromJSON ReadGroupSetInfo where
4527 parseJSON
4522 parseJSON
@@ -4529,7 +4524,7 @@ instance FromJSON ReadGroupSetInfo where
4529 (\ o -> ReadGroupSetInfo <$> (parseJSONObject o))
4524 (\ o -> ReadGroupSetInfo <$> (parseJSONObject o))
4530
4525
4531instance ToJSON ReadGroupSetInfo where
4526instance ToJSON ReadGroupSetInfo where
4532− toJSON = toJSON . _rgsiProperties
4527+ toJSON = toJSON . _rgsiAddtional
4533
4528
4534-- | A reference set is a set of references which typically comprise a
4529-- | A reference set is a set of references which typically comprise a
4535-- reference assembly for a species, such as \`GRCh38\` which is
4530-- 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
169 -- ** IdentitytoolkitRelyingPartyGetPublicKeysResponse
169 -- ** IdentitytoolkitRelyingPartyGetPublicKeysResponse
170 , IdentitytoolkitRelyingPartyGetPublicKeysResponse
170 , IdentitytoolkitRelyingPartyGetPublicKeysResponse
171 , identitytoolkitRelyingPartyGetPublicKeysResponse
171 , identitytoolkitRelyingPartyGetPublicKeysResponse
172− , irpgpkrProperties
172+ , irpgpkrAddtional
173
173
174 -- ** RelyingParty
174 -- ** RelyingParty
175 , RelyingParty
175 , RelyingParty
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+1−1
@@ -126,7 +126,7 @@ module Network.Google.IdentityToolkit.Types
126 -- * IdentitytoolkitRelyingPartyGetPublicKeysResponse
126 -- * IdentitytoolkitRelyingPartyGetPublicKeysResponse
127 , IdentitytoolkitRelyingPartyGetPublicKeysResponse
127 , IdentitytoolkitRelyingPartyGetPublicKeysResponse
128 , identitytoolkitRelyingPartyGetPublicKeysResponse
128 , identitytoolkitRelyingPartyGetPublicKeysResponse
129− , irpgpkrProperties
129+ , irpgpkrAddtional
130
130
131 -- * RelyingParty
131 -- * RelyingParty
132 , RelyingParty
132 , RelyingParty
gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+10−10
@@ -1025,26 +1025,26 @@ instance ToJSON CreateAuthURIResponse where
1025--
1025--
1026-- /See:/ 'identitytoolkitRelyingPartyGetPublicKeysResponse' smart constructor.
1026-- /See:/ 'identitytoolkitRelyingPartyGetPublicKeysResponse' smart constructor.
1027newtype IdentitytoolkitRelyingPartyGetPublicKeysResponse = IdentitytoolkitRelyingPartyGetPublicKeysResponse
1027newtype IdentitytoolkitRelyingPartyGetPublicKeysResponse = IdentitytoolkitRelyingPartyGetPublicKeysResponse
1028− { _irpgpkrProperties :: HashMap Text Text
1028+ { _irpgpkrAddtional :: HashMap Text Text
1029 } deriving (Eq,Show,Data,Typeable,Generic)
1029 } deriving (Eq,Show,Data,Typeable,Generic)
1030
1030
1031-- | Creates a value of 'IdentitytoolkitRelyingPartyGetPublicKeysResponse' with the minimum fields required to make a request.
1031-- | Creates a value of 'IdentitytoolkitRelyingPartyGetPublicKeysResponse' with the minimum fields required to make a request.
1032--
1032--
1033-- Use one of the following lenses to modify other fields as desired:
1033-- Use one of the following lenses to modify other fields as desired:
1034--
1034--
1035−-- * 'irpgpkrProperties'
1035+-- * 'irpgpkrAddtional'
1036identitytoolkitRelyingPartyGetPublicKeysResponse
1036identitytoolkitRelyingPartyGetPublicKeysResponse
1037− :: HashMap Text Text -- ^ 'properties'
1037+ :: HashMap Text Text -- ^ 'addtional'
1038 -> IdentitytoolkitRelyingPartyGetPublicKeysResponse
1038 -> IdentitytoolkitRelyingPartyGetPublicKeysResponse
1039−identitytoolkitRelyingPartyGetPublicKeysResponse pIrpgpkrProperties_ =
1039+identitytoolkitRelyingPartyGetPublicKeysResponse pIrpgpkrAddtional_ =
1040 IdentitytoolkitRelyingPartyGetPublicKeysResponse
1040 IdentitytoolkitRelyingPartyGetPublicKeysResponse
1041− { _irpgpkrProperties = pIrpgpkrProperties_
1041+ { _irpgpkrAddtional = pIrpgpkrAddtional_
1042 }
1042 }
1043
1043
1044−irpgpkrProperties :: Lens' IdentitytoolkitRelyingPartyGetPublicKeysResponse (HashMap Text Text)
1044+irpgpkrAddtional :: Lens' IdentitytoolkitRelyingPartyGetPublicKeysResponse (HashMap Text Text)
1045−irpgpkrProperties
1045+irpgpkrAddtional
1046− = lens _irpgpkrProperties
1046+ = lens _irpgpkrAddtional
1047− (\ s a -> s{_irpgpkrProperties = a})
1047+ (\ s a -> s{_irpgpkrAddtional = a})
1048
1048
1049instance FromJSON
1049instance FromJSON
1050 IdentitytoolkitRelyingPartyGetPublicKeysResponse
1050 IdentitytoolkitRelyingPartyGetPublicKeysResponse
@@ -1059,7 +1059,7 @@ instance FromJSON
1059instance ToJSON
1059instance ToJSON
1060 IdentitytoolkitRelyingPartyGetPublicKeysResponse
1060 IdentitytoolkitRelyingPartyGetPublicKeysResponse
1061 where
1061 where
1062− toJSON = toJSON . _irpgpkrProperties
1062+ toJSON = toJSON . _irpgpkrAddtional
1063
1063
1064-- | Request of getting a code for user confirmation (reset password, change
1064-- | Request of getting a code for user confirmation (reset password, change
1065-- email etc.)
1065-- email etc.)
gogol-logging/gen/Network/Google/Logging.hs+5−5
@@ -116,7 +116,7 @@ module Network.Google.Logging
116 -- ** WriteLogEntriesRequestCommonLabels
116 -- ** WriteLogEntriesRequestCommonLabels
117 , WriteLogEntriesRequestCommonLabels
117 , WriteLogEntriesRequestCommonLabels
118 , writeLogEntriesRequestCommonLabels
118 , writeLogEntriesRequestCommonLabels
119− , wlerclProperties
119+ , wlerclAddtional
120
120
121 -- ** Empty
121 -- ** Empty
122 , Empty
122 , Empty
@@ -177,7 +177,7 @@ module Network.Google.Logging
177 -- ** LogEntryProtoPayload
177 -- ** LogEntryProtoPayload
178 , LogEntryProtoPayload
178 , LogEntryProtoPayload
179 , logEntryProtoPayload
179 , logEntryProtoPayload
180− , leppProperties
180+ , leppAddtional
181
181
182 -- ** ListLogServiceIndexesResponse
182 -- ** ListLogServiceIndexesResponse
183 , ListLogServiceIndexesResponse
183 , ListLogServiceIndexesResponse
@@ -206,7 +206,7 @@ module Network.Google.Logging
206 -- ** StatusDetailsItem
206 -- ** StatusDetailsItem
207 , StatusDetailsItem
207 , StatusDetailsItem
208 , statusDetailsItem
208 , statusDetailsItem
209− , sdiProperties
209+ , sdiAddtional
210
210
211 -- ** ListLogsResponse
211 -- ** ListLogsResponse
212 , ListLogsResponse
212 , ListLogsResponse
@@ -264,7 +264,7 @@ module Network.Google.Logging
264 -- ** LogEntryMetadataLabels
264 -- ** LogEntryMetadataLabels
265 , LogEntryMetadataLabels
265 , LogEntryMetadataLabels
266 , logEntryMetadataLabels
266 , logEntryMetadataLabels
267− , lemlProperties
267+ , lemlAddtional
268
268
269 -- ** SourceLocation
269 -- ** SourceLocation
270 , SourceLocation
270 , SourceLocation
@@ -282,7 +282,7 @@ module Network.Google.Logging
282 -- ** LogEntryStructPayload
282 -- ** LogEntryStructPayload
283 , LogEntryStructPayload
283 , LogEntryStructPayload
284 , logEntryStructPayload
284 , logEntryStructPayload
285− , lespProperties
285+ , lespAddtional
286 ) where
286 ) where
287
287
288import Network.Google.Logging.Types
288import Network.Google.Logging.Types
gogol-logging/gen/Network/Google/Logging/Types.hs+5−5
@@ -48,7 +48,7 @@ module Network.Google.Logging.Types
48 -- * WriteLogEntriesRequestCommonLabels
48 -- * WriteLogEntriesRequestCommonLabels
49 , WriteLogEntriesRequestCommonLabels
49 , WriteLogEntriesRequestCommonLabels
50 , writeLogEntriesRequestCommonLabels
50 , writeLogEntriesRequestCommonLabels
51− , wlerclProperties
51+ , wlerclAddtional
52
52
53 -- * Empty
53 -- * Empty
54 , Empty
54 , Empty
@@ -109,7 +109,7 @@ module Network.Google.Logging.Types
109 -- * LogEntryProtoPayload
109 -- * LogEntryProtoPayload
110 , LogEntryProtoPayload
110 , LogEntryProtoPayload
111 , logEntryProtoPayload
111 , logEntryProtoPayload
112− , leppProperties
112+ , leppAddtional
113
113
114 -- * ListLogServiceIndexesResponse
114 -- * ListLogServiceIndexesResponse
115 , ListLogServiceIndexesResponse
115 , ListLogServiceIndexesResponse
@@ -138,7 +138,7 @@ module Network.Google.Logging.Types
138 -- * StatusDetailsItem
138 -- * StatusDetailsItem
139 , StatusDetailsItem
139 , StatusDetailsItem
140 , statusDetailsItem
140 , statusDetailsItem
141− , sdiProperties
141+ , sdiAddtional
142
142
143 -- * ListLogsResponse
143 -- * ListLogsResponse
144 , ListLogsResponse
144 , ListLogsResponse
@@ -196,7 +196,7 @@ module Network.Google.Logging.Types
196 -- * LogEntryMetadataLabels
196 -- * LogEntryMetadataLabels
197 , LogEntryMetadataLabels
197 , LogEntryMetadataLabels
198 , logEntryMetadataLabels
198 , logEntryMetadataLabels
199− , lemlProperties
199+ , lemlAddtional
200
200
201 -- * SourceLocation
201 -- * SourceLocation
202 , SourceLocation
202 , SourceLocation
@@ -214,7 +214,7 @@ module Network.Google.Logging.Types
214 -- * LogEntryStructPayload
214 -- * LogEntryStructPayload
215 , LogEntryStructPayload
215 , LogEntryStructPayload
216 , logEntryStructPayload
216 , logEntryStructPayload
217− , lespProperties
217+ , lespAddtional
218 ) where
218 ) where
219
219
220import Network.Google.Logging.Types.Product
220import Network.Google.Logging.Types.Product
gogol-logging/gen/Network/Google/Logging/Types/Product.hs+49−50
@@ -304,26 +304,26 @@ instance ToJSON WriteLogEntriesRequest where
304--
304--
305-- /See:/ 'writeLogEntriesRequestCommonLabels' smart constructor.
305-- /See:/ 'writeLogEntriesRequestCommonLabels' smart constructor.
306newtype WriteLogEntriesRequestCommonLabels = WriteLogEntriesRequestCommonLabels
306newtype WriteLogEntriesRequestCommonLabels = WriteLogEntriesRequestCommonLabels
307− { _wlerclProperties :: HashMap Text Text
307+ { _wlerclAddtional :: HashMap Text Text
308 } deriving (Eq,Show,Data,Typeable,Generic)
308 } deriving (Eq,Show,Data,Typeable,Generic)
309
309
310-- | Creates a value of 'WriteLogEntriesRequestCommonLabels' with the minimum fields required to make a request.
310-- | Creates a value of 'WriteLogEntriesRequestCommonLabels' with the minimum fields required to make a request.
311--
311--
312-- Use one of the following lenses to modify other fields as desired:
312-- Use one of the following lenses to modify other fields as desired:
313--
313--
314−-- * 'wlerclProperties'
314+-- * 'wlerclAddtional'
315writeLogEntriesRequestCommonLabels
315writeLogEntriesRequestCommonLabels
316− :: HashMap Text Text -- ^ 'properties'
316+ :: HashMap Text Text -- ^ 'addtional'
317 -> WriteLogEntriesRequestCommonLabels
317 -> WriteLogEntriesRequestCommonLabels
318−writeLogEntriesRequestCommonLabels pWlerclProperties_ =
318+writeLogEntriesRequestCommonLabels pWlerclAddtional_ =
319 WriteLogEntriesRequestCommonLabels
319 WriteLogEntriesRequestCommonLabels
320− { _wlerclProperties = pWlerclProperties_
320+ { _wlerclAddtional = pWlerclAddtional_
321 }
321 }
322
322
323−wlerclProperties :: Lens' WriteLogEntriesRequestCommonLabels (HashMap Text Text)
323+wlerclAddtional :: Lens' WriteLogEntriesRequestCommonLabels (HashMap Text Text)
324−wlerclProperties
324+wlerclAddtional
325− = lens _wlerclProperties
325+ = lens _wlerclAddtional
326− (\ s a -> s{_wlerclProperties = a})
326+ (\ s a -> s{_wlerclAddtional = a})
327
327
328instance FromJSON WriteLogEntriesRequestCommonLabels
328instance FromJSON WriteLogEntriesRequestCommonLabels
329 where
329 where
@@ -335,7 +335,7 @@ instance FromJSON WriteLogEntriesRequestCommonLabels
335
335
336instance ToJSON WriteLogEntriesRequestCommonLabels
336instance ToJSON WriteLogEntriesRequestCommonLabels
337 where
337 where
338− toJSON = toJSON . _wlerclProperties
338+ toJSON = toJSON . _wlerclAddtional
339
339
340-- | A generic empty message that you can re-use to avoid defining duplicated
340-- | A generic empty message that you can re-use to avoid defining duplicated
341-- empty messages in your APIs. A typical example is to use it as the
341-- empty messages in your APIs. A typical example is to use it as the
@@ -927,27 +927,27 @@ instance ToJSON LogEntryMetadata where
927--
927--
928-- /See:/ 'logEntryProtoPayload' smart constructor.
928-- /See:/ 'logEntryProtoPayload' smart constructor.
929newtype LogEntryProtoPayload = LogEntryProtoPayload
929newtype LogEntryProtoPayload = LogEntryProtoPayload
930− { _leppProperties :: HashMap Text JSONValue
930+ { _leppAddtional :: HashMap Text JSONValue
931 } deriving (Eq,Show,Data,Typeable,Generic)
931 } deriving (Eq,Show,Data,Typeable,Generic)
932
932
933-- | Creates a value of 'LogEntryProtoPayload' with the minimum fields required to make a request.
933-- | Creates a value of 'LogEntryProtoPayload' with the minimum fields required to make a request.
934--
934--
935-- Use one of the following lenses to modify other fields as desired:
935-- Use one of the following lenses to modify other fields as desired:
936--
936--
937−-- * 'leppProperties'
937+-- * 'leppAddtional'
938logEntryProtoPayload
938logEntryProtoPayload
939− :: HashMap Text JSONValue -- ^ 'properties'
939+ :: HashMap Text JSONValue -- ^ 'addtional'
940 -> LogEntryProtoPayload
940 -> LogEntryProtoPayload
941−logEntryProtoPayload pLeppProperties_ =
941+logEntryProtoPayload pLeppAddtional_ =
942 LogEntryProtoPayload
942 LogEntryProtoPayload
943− { _leppProperties = pLeppProperties_
943+ { _leppAddtional = pLeppAddtional_
944 }
944 }
945
945
946-- | Properties of the object. Contains field \'ype with type URL.
946-- | Properties of the object. Contains field \'ype with type URL.
947−leppProperties :: Lens' LogEntryProtoPayload (HashMap Text JSONValue)
947+leppAddtional :: Lens' LogEntryProtoPayload (HashMap Text JSONValue)
948−leppProperties
948+leppAddtional
949− = lens _leppProperties
949+ = lens _leppAddtional
950− (\ s a -> s{_leppProperties = a})
950+ (\ s a -> s{_leppAddtional = a})
951
951
952instance FromJSON LogEntryProtoPayload where
952instance FromJSON LogEntryProtoPayload where
953 parseJSON
953 parseJSON
@@ -955,7 +955,7 @@ instance FromJSON LogEntryProtoPayload where
955 (\ o -> LogEntryProtoPayload <$> (parseJSONObject o))
955 (\ o -> LogEntryProtoPayload <$> (parseJSONObject o))
956
956
957instance ToJSON LogEntryProtoPayload where
957instance ToJSON LogEntryProtoPayload where
958− toJSON = toJSON . _leppProperties
958+ toJSON = toJSON . _leppAddtional
959
959
960-- | Result returned from ListLogServiceIndexesRequest.
960-- | Result returned from ListLogServiceIndexesRequest.
961--
961--
@@ -1173,27 +1173,26 @@ instance ToJSON ListLogServicesResponse where
1173--
1173--
1174-- /See:/ 'statusDetailsItem' smart constructor.
1174-- /See:/ 'statusDetailsItem' smart constructor.
1175newtype StatusDetailsItem = StatusDetailsItem
1175newtype StatusDetailsItem = StatusDetailsItem
1176− { _sdiProperties :: HashMap Text JSONValue
1176+ { _sdiAddtional :: HashMap Text JSONValue
1177 } deriving (Eq,Show,Data,Typeable,Generic)
1177 } deriving (Eq,Show,Data,Typeable,Generic)
1178
1178
1179-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
1179-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
1180--
1180--
1181-- Use one of the following lenses to modify other fields as desired:
1181-- Use one of the following lenses to modify other fields as desired:
1182--
1182--
1183−-- * 'sdiProperties'
1183+-- * 'sdiAddtional'
1184statusDetailsItem
1184statusDetailsItem
1185− :: HashMap Text JSONValue -- ^ 'properties'
1185+ :: HashMap Text JSONValue -- ^ 'addtional'
1186 -> StatusDetailsItem
1186 -> StatusDetailsItem
1187−statusDetailsItem pSdiProperties_ =
1187+statusDetailsItem pSdiAddtional_ =
1188 StatusDetailsItem
1188 StatusDetailsItem
1189− { _sdiProperties = pSdiProperties_
1189+ { _sdiAddtional = pSdiAddtional_
1190 }
1190 }
1191
1191
1192-- | Properties of the object. Contains field \'ype with type URL.
1192-- | Properties of the object. Contains field \'ype with type URL.
1193−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1193+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
1194−sdiProperties
1194+sdiAddtional
1195− = lens _sdiProperties
1195+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
1196− (\ s a -> s{_sdiProperties = a})
1197
1196
1198instance FromJSON StatusDetailsItem where
1197instance FromJSON StatusDetailsItem where
1199 parseJSON
1198 parseJSON
@@ -1201,7 +1200,7 @@ instance FromJSON StatusDetailsItem where
1201 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
1200 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
1202
1201
1203instance ToJSON StatusDetailsItem where
1202instance ToJSON StatusDetailsItem where
1204− toJSON = toJSON . _sdiProperties
1203+ toJSON = toJSON . _sdiAddtional
1205
1204
1206-- | Result returned from ListLogs.
1205-- | Result returned from ListLogs.
1207--
1206--
@@ -1710,26 +1709,26 @@ instance ToJSON LogEntry where
1710--
1709--
1711-- /See:/ 'logEntryMetadataLabels' smart constructor.
1710-- /See:/ 'logEntryMetadataLabels' smart constructor.
1712newtype LogEntryMetadataLabels = LogEntryMetadataLabels
1711newtype LogEntryMetadataLabels = LogEntryMetadataLabels
1713− { _lemlProperties :: HashMap Text Text
1712+ { _lemlAddtional :: HashMap Text Text
1714 } deriving (Eq,Show,Data,Typeable,Generic)
1713 } deriving (Eq,Show,Data,Typeable,Generic)
1715
1714
1716-- | Creates a value of 'LogEntryMetadataLabels' with the minimum fields required to make a request.
1715-- | Creates a value of 'LogEntryMetadataLabels' with the minimum fields required to make a request.
1717--
1716--
1718-- Use one of the following lenses to modify other fields as desired:
1717-- Use one of the following lenses to modify other fields as desired:
1719--
1718--
1720−-- * 'lemlProperties'
1719+-- * 'lemlAddtional'
1721logEntryMetadataLabels
1720logEntryMetadataLabels
1722− :: HashMap Text Text -- ^ 'properties'
1721+ :: HashMap Text Text -- ^ 'addtional'
1723 -> LogEntryMetadataLabels
1722 -> LogEntryMetadataLabels
1724−logEntryMetadataLabels pLemlProperties_ =
1723+logEntryMetadataLabels pLemlAddtional_ =
1725 LogEntryMetadataLabels
1724 LogEntryMetadataLabels
1726− { _lemlProperties = pLemlProperties_
1725+ { _lemlAddtional = pLemlAddtional_
1727 }
1726 }
1728
1727
1729−lemlProperties :: Lens' LogEntryMetadataLabels (HashMap Text Text)
1728+lemlAddtional :: Lens' LogEntryMetadataLabels (HashMap Text Text)
1730−lemlProperties
1729+lemlAddtional
1731− = lens _lemlProperties
1730+ = lens _lemlAddtional
1732− (\ s a -> s{_lemlProperties = a})
1731+ (\ s a -> s{_lemlAddtional = a})
1733
1732
1734instance FromJSON LogEntryMetadataLabels where
1733instance FromJSON LogEntryMetadataLabels where
1735 parseJSON
1734 parseJSON
@@ -1738,7 +1737,7 @@ instance FromJSON LogEntryMetadataLabels where
1738 LogEntryMetadataLabels <$> (parseJSONObject o))
1737 LogEntryMetadataLabels <$> (parseJSONObject o))
1739
1738
1740instance ToJSON LogEntryMetadataLabels where
1739instance ToJSON LogEntryMetadataLabels where
1741− toJSON = toJSON . _lemlProperties
1740+ toJSON = toJSON . _lemlAddtional
1742
1741
1743-- | Specifies a location in a source file.
1742-- | Specifies a location in a source file.
1744--
1743--
@@ -1857,27 +1856,27 @@ instance ToJSON SourceReference where
1857--
1856--
1858-- /See:/ 'logEntryStructPayload' smart constructor.
1857-- /See:/ 'logEntryStructPayload' smart constructor.
1859newtype LogEntryStructPayload = LogEntryStructPayload
1858newtype LogEntryStructPayload = LogEntryStructPayload
1860− { _lespProperties :: HashMap Text JSONValue
1859+ { _lespAddtional :: HashMap Text JSONValue
1861 } deriving (Eq,Show,Data,Typeable,Generic)
1860 } deriving (Eq,Show,Data,Typeable,Generic)
1862
1861
1863-- | Creates a value of 'LogEntryStructPayload' with the minimum fields required to make a request.
1862-- | Creates a value of 'LogEntryStructPayload' with the minimum fields required to make a request.
1864--
1863--
1865-- Use one of the following lenses to modify other fields as desired:
1864-- Use one of the following lenses to modify other fields as desired:
1866--
1865--
1867−-- * 'lespProperties'
1866+-- * 'lespAddtional'
1868logEntryStructPayload
1867logEntryStructPayload
1869− :: HashMap Text JSONValue -- ^ 'properties'
1868+ :: HashMap Text JSONValue -- ^ 'addtional'
1870 -> LogEntryStructPayload
1869 -> LogEntryStructPayload
1871−logEntryStructPayload pLespProperties_ =
1870+logEntryStructPayload pLespAddtional_ =
1872 LogEntryStructPayload
1871 LogEntryStructPayload
1873− { _lespProperties = pLespProperties_
1872+ { _lespAddtional = pLespAddtional_
1874 }
1873 }
1875
1874
1876-- | Properties of the object.
1875-- | Properties of the object.
1877−lespProperties :: Lens' LogEntryStructPayload (HashMap Text JSONValue)
1876+lespAddtional :: Lens' LogEntryStructPayload (HashMap Text JSONValue)
1878−lespProperties
1877+lespAddtional
1879− = lens _lespProperties
1878+ = lens _lespAddtional
1880− (\ s a -> s{_lespProperties = a})
1879+ (\ s a -> s{_lespAddtional = a})
1881
1880
1882instance FromJSON LogEntryStructPayload where
1881instance FromJSON LogEntryStructPayload where
1883 parseJSON
1882 parseJSON
@@ -1886,4 +1885,4 @@ instance FromJSON LogEntryStructPayload where
1886 LogEntryStructPayload <$> (parseJSONObject o))
1885 LogEntryStructPayload <$> (parseJSONObject o))
1887
1886
1888instance ToJSON LogEntryStructPayload where
1887instance 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
266 -- ** GeoJSONProperties
266 -- ** GeoJSONProperties
267 , GeoJSONProperties
267 , GeoJSONProperties
268 , geoJSONProperties
268 , geoJSONProperties
269− , gjpProperties
269+ , gjpAddtional
270
270
271 -- ** Feature
271 -- ** Feature
272 , Feature
272 , Feature
gogol-maps-engine/gen/Network/Google/MapsEngine/Types.hs+1−1
@@ -27,7 +27,7 @@ module Network.Google.MapsEngine.Types
27 -- * GeoJSONProperties
27 -- * GeoJSONProperties
28 , GeoJSONProperties
28 , GeoJSONProperties
29 , geoJSONProperties
29 , geoJSONProperties
30− , gjpProperties
30+ , gjpAddtional
31
31
32 -- * Feature
32 -- * Feature
33 , Feature
33 , Feature
gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+9−10
@@ -68,29 +68,28 @@ instance ToJSON ValueRange where
68--
68--
69-- /See:/ 'geoJSONProperties' smart constructor.
69-- /See:/ 'geoJSONProperties' smart constructor.
70newtype GeoJSONProperties = GeoJSONProperties
70newtype GeoJSONProperties = GeoJSONProperties
71− { _gjpProperties :: HashMap Text JSONValue
71+ { _gjpAddtional :: HashMap Text JSONValue
72 } deriving (Eq,Show,Data,Typeable,Generic)
72 } deriving (Eq,Show,Data,Typeable,Generic)
73
73
74-- | Creates a value of 'GeoJSONProperties' with the minimum fields required to make a request.
74-- | Creates a value of 'GeoJSONProperties' with the minimum fields required to make a request.
75--
75--
76-- Use one of the following lenses to modify other fields as desired:
76-- Use one of the following lenses to modify other fields as desired:
77--
77--
78−-- * 'gjpProperties'
78+-- * 'gjpAddtional'
79geoJSONProperties
79geoJSONProperties
80− :: HashMap Text JSONValue -- ^ 'properties'
80+ :: HashMap Text JSONValue -- ^ 'addtional'
81 -> GeoJSONProperties
81 -> GeoJSONProperties
82−geoJSONProperties pGjpProperties_ =
82+geoJSONProperties pGjpAddtional_ =
83 GeoJSONProperties
83 GeoJSONProperties
84− { _gjpProperties = pGjpProperties_
84+ { _gjpAddtional = pGjpAddtional_
85 }
85 }
86
86
87-- | An arbitrary key-value pair. The key must be the name of a column in the
87-- | An arbitrary key-value pair. The key must be the name of a column in the
88-- table\'s schema, and the type of the value must correspond to the type
88-- table\'s schema, and the type of the value must correspond to the type
89-- specified in the schema.
89-- specified in the schema.
90−gjpProperties :: Lens' GeoJSONProperties (HashMap Text JSONValue)
90+gjpAddtional :: Lens' GeoJSONProperties (HashMap Text JSONValue)
91−gjpProperties
91+gjpAddtional
92− = lens _gjpProperties
92+ = lens _gjpAddtional (\ s a -> s{_gjpAddtional = a})
93− (\ s a -> s{_gjpProperties = a})
94
93
95instance FromJSON GeoJSONProperties where
94instance FromJSON GeoJSONProperties where
96 parseJSON
95 parseJSON
@@ -98,7 +97,7 @@ instance FromJSON GeoJSONProperties where
98 (\ o -> GeoJSONProperties <$> (parseJSONObject o))
97 (\ o -> GeoJSONProperties <$> (parseJSONObject o))
99
98
100instance ToJSON GeoJSONProperties where
99instance ToJSON GeoJSONProperties where
101− toJSON = toJSON . _gjpProperties
100+ toJSON = toJSON . _gjpAddtional
102
101
103-- | A feature within a table.
102-- | A feature within a table.
104--
103--
gogol-monitoring/gen/Network/Google/Monitoring.hs+2−2
@@ -76,7 +76,7 @@ module Network.Google.Monitoring
76 -- ** WriteTimeseriesRequestCommonLabels
76 -- ** WriteTimeseriesRequestCommonLabels
77 , WriteTimeseriesRequestCommonLabels
77 , WriteTimeseriesRequestCommonLabels
78 , writeTimeseriesRequestCommonLabels
78 , writeTimeseriesRequestCommonLabels
79− , wtrclProperties
79+ , wtrclAddtional
80
80
81 -- ** MetricDescriptorLabelDescriptor
81 -- ** MetricDescriptorLabelDescriptor
82 , MetricDescriptorLabelDescriptor
82 , MetricDescriptorLabelDescriptor
@@ -108,7 +108,7 @@ module Network.Google.Monitoring
108 -- ** TimeseriesDescriptorLabels
108 -- ** TimeseriesDescriptorLabels
109 , TimeseriesDescriptorLabels
109 , TimeseriesDescriptorLabels
110 , timeseriesDescriptorLabels
110 , timeseriesDescriptorLabels
111− , tdlProperties
111+ , tdlAddtional
112
112
113 -- ** PointDistributionBucket
113 -- ** PointDistributionBucket
114 , PointDistributionBucket
114 , PointDistributionBucket
gogol-monitoring/gen/Network/Google/Monitoring/Types.hs+2−2
@@ -51,7 +51,7 @@ module Network.Google.Monitoring.Types
51 -- * WriteTimeseriesRequestCommonLabels
51 -- * WriteTimeseriesRequestCommonLabels
52 , WriteTimeseriesRequestCommonLabels
52 , WriteTimeseriesRequestCommonLabels
53 , writeTimeseriesRequestCommonLabels
53 , writeTimeseriesRequestCommonLabels
54− , wtrclProperties
54+ , wtrclAddtional
55
55
56 -- * MetricDescriptorLabelDescriptor
56 -- * MetricDescriptorLabelDescriptor
57 , MetricDescriptorLabelDescriptor
57 , MetricDescriptorLabelDescriptor
@@ -83,7 +83,7 @@ module Network.Google.Monitoring.Types
83 -- * TimeseriesDescriptorLabels
83 -- * TimeseriesDescriptorLabels
84 , TimeseriesDescriptorLabels
84 , TimeseriesDescriptorLabels
85 , timeseriesDescriptorLabels
85 , timeseriesDescriptorLabels
86− , tdlProperties
86+ , tdlAddtional
87
87
88 -- * PointDistributionBucket
88 -- * PointDistributionBucket
89 , PointDistributionBucket
89 , PointDistributionBucket
gogol-monitoring/gen/Network/Google/Monitoring/Types/Product.hs+19−20
@@ -307,27 +307,27 @@ instance ToJSON WriteTimeseriesRequest where
307--
307--
308-- /See:/ 'writeTimeseriesRequestCommonLabels' smart constructor.
308-- /See:/ 'writeTimeseriesRequestCommonLabels' smart constructor.
309newtype WriteTimeseriesRequestCommonLabels = WriteTimeseriesRequestCommonLabels
309newtype WriteTimeseriesRequestCommonLabels = WriteTimeseriesRequestCommonLabels
310− { _wtrclProperties :: HashMap Text Text
310+ { _wtrclAddtional :: HashMap Text Text
311 } deriving (Eq,Show,Data,Typeable,Generic)
311 } deriving (Eq,Show,Data,Typeable,Generic)
312
312
313-- | Creates a value of 'WriteTimeseriesRequestCommonLabels' with the minimum fields required to make a request.
313-- | Creates a value of 'WriteTimeseriesRequestCommonLabels' with the minimum fields required to make a request.
314--
314--
315-- Use one of the following lenses to modify other fields as desired:
315-- Use one of the following lenses to modify other fields as desired:
316--
316--
317−-- * 'wtrclProperties'
317+-- * 'wtrclAddtional'
318writeTimeseriesRequestCommonLabels
318writeTimeseriesRequestCommonLabels
319− :: HashMap Text Text -- ^ 'properties'
319+ :: HashMap Text Text -- ^ 'addtional'
320 -> WriteTimeseriesRequestCommonLabels
320 -> WriteTimeseriesRequestCommonLabels
321−writeTimeseriesRequestCommonLabels pWtrclProperties_ =
321+writeTimeseriesRequestCommonLabels pWtrclAddtional_ =
322 WriteTimeseriesRequestCommonLabels
322 WriteTimeseriesRequestCommonLabels
323− { _wtrclProperties = pWtrclProperties_
323+ { _wtrclAddtional = pWtrclAddtional_
324 }
324 }
325
325
326-- | The label\'s name.
326-- | The label\'s name.
327−wtrclProperties :: Lens' WriteTimeseriesRequestCommonLabels (HashMap Text Text)
327+wtrclAddtional :: Lens' WriteTimeseriesRequestCommonLabels (HashMap Text Text)
328−wtrclProperties
328+wtrclAddtional
329− = lens _wtrclProperties
329+ = lens _wtrclAddtional
330− (\ s a -> s{_wtrclProperties = a})
330+ (\ s a -> s{_wtrclAddtional = a})
331
331
332instance FromJSON WriteTimeseriesRequestCommonLabels
332instance FromJSON WriteTimeseriesRequestCommonLabels
333 where
333 where
@@ -339,7 +339,7 @@ instance FromJSON WriteTimeseriesRequestCommonLabels
339
339
340instance ToJSON WriteTimeseriesRequestCommonLabels
340instance ToJSON WriteTimeseriesRequestCommonLabels
341 where
341 where
342− toJSON = toJSON . _wtrclProperties
342+ toJSON = toJSON . _wtrclAddtional
343
343
344-- | A label in a metric is a description of this metric, including the key
344-- | A label in a metric is a description of this metric, including the key
345-- of this description (what the description is), and the value for this
345-- of this description (what the description is), and the value for this
@@ -552,27 +552,26 @@ instance ToJSON ListTimeseriesDescriptorsRequest
552--
552--
553-- /See:/ 'timeseriesDescriptorLabels' smart constructor.
553-- /See:/ 'timeseriesDescriptorLabels' smart constructor.
554newtype TimeseriesDescriptorLabels = TimeseriesDescriptorLabels
554newtype TimeseriesDescriptorLabels = TimeseriesDescriptorLabels
555− { _tdlProperties :: HashMap Text Text
555+ { _tdlAddtional :: HashMap Text Text
556 } deriving (Eq,Show,Data,Typeable,Generic)
556 } deriving (Eq,Show,Data,Typeable,Generic)
557
557
558-- | Creates a value of 'TimeseriesDescriptorLabels' with the minimum fields required to make a request.
558-- | Creates a value of 'TimeseriesDescriptorLabels' with the minimum fields required to make a request.
559--
559--
560-- Use one of the following lenses to modify other fields as desired:
560-- Use one of the following lenses to modify other fields as desired:
561--
561--
562−-- * 'tdlProperties'
562+-- * 'tdlAddtional'
563timeseriesDescriptorLabels
563timeseriesDescriptorLabels
564− :: HashMap Text Text -- ^ 'properties'
564+ :: HashMap Text Text -- ^ 'addtional'
565 -> TimeseriesDescriptorLabels
565 -> TimeseriesDescriptorLabels
566−timeseriesDescriptorLabels pTdlProperties_ =
566+timeseriesDescriptorLabels pTdlAddtional_ =
567 TimeseriesDescriptorLabels
567 TimeseriesDescriptorLabels
568− { _tdlProperties = pTdlProperties_
568+ { _tdlAddtional = pTdlAddtional_
569 }
569 }
570
570
571-- | The label\'s name.
571-- | The label\'s name.
572−tdlProperties :: Lens' TimeseriesDescriptorLabels (HashMap Text Text)
572+tdlAddtional :: Lens' TimeseriesDescriptorLabels (HashMap Text Text)
573−tdlProperties
573+tdlAddtional
574− = lens _tdlProperties
574+ = lens _tdlAddtional (\ s a -> s{_tdlAddtional = a})
575− (\ s a -> s{_tdlProperties = a})
576
575
577instance FromJSON TimeseriesDescriptorLabels where
576instance FromJSON TimeseriesDescriptorLabels where
578 parseJSON
577 parseJSON
@@ -581,7 +580,7 @@ instance FromJSON TimeseriesDescriptorLabels where
581 TimeseriesDescriptorLabels <$> (parseJSONObject o))
580 TimeseriesDescriptorLabels <$> (parseJSONObject o))
582
581
583instance ToJSON TimeseriesDescriptorLabels where
582instance ToJSON TimeseriesDescriptorLabels where
584− toJSON = toJSON . _tdlProperties
583+ toJSON = toJSON . _tdlAddtional
585
584
586-- | The histogram\'s bucket. Buckets that form the histogram of a
585-- | The histogram\'s bucket. Buckets that form the histogram of a
587-- distribution value. If the upper bound of a bucket, say U1, does not
586-- 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
29
29
30 -- * Types
30 -- * Types
31
31
32+ -- ** ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
33+ , ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
34+ , resultFormattedResultsRuleResultsAdditionalURLBlocksItem
35+ , rfrrraubiURLs
36+ , rfrrraubiHeader
37+
32 -- ** PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
38 -- ** PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
33 , PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
39 , PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
34 , pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
40 , pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
@@ -55,23 +61,9 @@ module Network.Google.PageSpeed
55 , pafsvairiWidth
61 , pafsvairiWidth
56 , pafsvairiTop
62 , pafsvairiTop
57
63
58− -- ** ResultRuleGroupsProperties
59− , ResultRuleGroupsProperties
60− , resultRuleGroupsProperties
61− , rrgpScore
62−
63 -- ** PagespeedAPIRunPagespeedStrategy
64 -- ** PagespeedAPIRunPagespeedStrategy
64 , PagespeedAPIRunPagespeedStrategy (..)
65 , PagespeedAPIRunPagespeedStrategy (..)
65
66
66− -- ** ResultFormattedResultsRuleResultsProperties
67− , ResultFormattedResultsRuleResultsProperties
68− , resultFormattedResultsRuleResultsProperties
69− , rfrrrpSummary
70− , rfrrrpRuleImpact
71− , rfrrrpGroups
72− , rfrrrpLocalizedRuleName
73− , rfrrrpURLBlocks
74−
75 -- ** ResultVersion
67 -- ** ResultVersion
76 , ResultVersion
68 , ResultVersion
77 , resultVersion
69 , resultVersion
@@ -103,12 +95,6 @@ module Network.Google.PageSpeed
103 , paivpWidth
95 , paivpWidth
104 , paivpTop
96 , paivpTop
105
97
106− -- ** ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
107− , ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
108− , resultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
109− , rfrrrpubiuiResult
110− , rfrrrpubiuiDetails
111−
112 -- ** Result
98 -- ** Result
113 , Result
99 , Result
114 , result
100 , result
@@ -132,11 +118,10 @@ module Network.Google.PageSpeed
132 , pafsvaiType
118 , pafsvaiType
133 , pafsvaiSecondaryRects
119 , pafsvaiSecondaryRects
134
120
135− -- ** ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
121+ -- ** ResultRuleGroupsAdditional
136− , ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
122+ , ResultRuleGroupsAdditional
137− , resultFormattedResultsRuleResultsPropertiesURLBlocksItem
123+ , resultRuleGroupsAdditional
138− , rfrrrpubiURLs
124+ , rrgaScore
139− , rfrrrpubiHeader
140
125
141 -- ** ResultFormattedResults
126 -- ** ResultFormattedResults
142 , ResultFormattedResults
127 , ResultFormattedResults
@@ -144,10 +129,19 @@ module Network.Google.PageSpeed
144 , rfrLocale
129 , rfrLocale
145 , rfrRuleResults
130 , rfrRuleResults
146
131
132+ -- ** ResultFormattedResultsRuleResultsAdditional
133+ , ResultFormattedResultsRuleResultsAdditional
134+ , resultFormattedResultsRuleResultsAdditional
135+ , rfrrraSummary
136+ , rfrrraRuleImpact
137+ , rfrrraGroups
138+ , rfrrraLocalizedRuleName
139+ , rfrrraURLBlocks
140+
147 -- ** ResultRuleGroups
141 -- ** ResultRuleGroups
148 , ResultRuleGroups
142 , ResultRuleGroups
149 , resultRuleGroups
143 , resultRuleGroups
150− , rrgProperties
144+ , rrgAddtional
151
145
152 -- ** PagespeedAPIFormatStringV2
146 -- ** PagespeedAPIFormatStringV2
153 , PagespeedAPIFormatStringV2
147 , PagespeedAPIFormatStringV2
@@ -158,7 +152,13 @@ module Network.Google.PageSpeed
158 -- ** ResultFormattedResultsRuleResults
152 -- ** ResultFormattedResultsRuleResults
159 , ResultFormattedResultsRuleResults
153 , ResultFormattedResultsRuleResults
160 , resultFormattedResultsRuleResults
154 , resultFormattedResultsRuleResults
161− , rfrrrProperties
155+ , rfrrrAddtional
156+
157+ -- ** ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
158+ , ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
159+ , resultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
160+ , rfrrraubiuiResult
161+ , rfrrraubiuiDetails
162 ) where
162 ) where
163
163
164import Network.Google.PageSpeed.Types
164import Network.Google.PageSpeed.Types
gogol-pagespeed/gen/Network/Google/PageSpeed/Types.hs+27−27
@@ -18,6 +18,12 @@ module Network.Google.PageSpeed.Types
18 -- * Service Request
18 -- * Service Request
19 pageSpeedRequest
19 pageSpeedRequest
20
20
21+ -- * ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
22+ , ResultFormattedResultsRuleResultsAdditionalURLBlocksItem
23+ , resultFormattedResultsRuleResultsAdditionalURLBlocksItem
24+ , rfrrraubiURLs
25+ , rfrrraubiHeader
26+
21 -- * PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
27 -- * PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
22 , PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
28 , PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
23 , pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
29 , pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
@@ -44,23 +50,9 @@ module Network.Google.PageSpeed.Types
44 , pafsvairiWidth
50 , pafsvairiWidth
45 , pafsvairiTop
51 , pafsvairiTop
46
52
47− -- * ResultRuleGroupsProperties
48− , ResultRuleGroupsProperties
49− , resultRuleGroupsProperties
50− , rrgpScore
51−
52 -- * PagespeedAPIRunPagespeedStrategy
53 -- * PagespeedAPIRunPagespeedStrategy
53 , PagespeedAPIRunPagespeedStrategy (..)
54 , PagespeedAPIRunPagespeedStrategy (..)
54
55
55− -- * ResultFormattedResultsRuleResultsProperties
56− , ResultFormattedResultsRuleResultsProperties
57− , resultFormattedResultsRuleResultsProperties
58− , rfrrrpSummary
59− , rfrrrpRuleImpact
60− , rfrrrpGroups
61− , rfrrrpLocalizedRuleName
62− , rfrrrpURLBlocks
63−
64 -- * ResultVersion
56 -- * ResultVersion
65 , ResultVersion
57 , ResultVersion
66 , resultVersion
58 , resultVersion
@@ -92,12 +84,6 @@ module Network.Google.PageSpeed.Types
92 , paivpWidth
84 , paivpWidth
93 , paivpTop
85 , paivpTop
94
86
95− -- * ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
96− , ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
97− , resultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem
98− , rfrrrpubiuiResult
99− , rfrrrpubiuiDetails
100−
101 -- * Result
87 -- * Result
102 , Result
88 , Result
103 , result
89 , result
@@ -121,11 +107,10 @@ module Network.Google.PageSpeed.Types
121 , pafsvaiType
107 , pafsvaiType
122 , pafsvaiSecondaryRects
108 , pafsvaiSecondaryRects
123
109
124− -- * ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
110+ -- * ResultRuleGroupsAdditional
125− , ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
111+ , ResultRuleGroupsAdditional
126− , resultFormattedResultsRuleResultsPropertiesURLBlocksItem
112+ , resultRuleGroupsAdditional
127− , rfrrrpubiURLs
113+ , rrgaScore
128− , rfrrrpubiHeader
129
114
130 -- * ResultFormattedResults
115 -- * ResultFormattedResults
131 , ResultFormattedResults
116 , ResultFormattedResults
@@ -133,10 +118,19 @@ module Network.Google.PageSpeed.Types
133 , rfrLocale
118 , rfrLocale
134 , rfrRuleResults
119 , rfrRuleResults
135
120
121+ -- * ResultFormattedResultsRuleResultsAdditional
122+ , ResultFormattedResultsRuleResultsAdditional
123+ , resultFormattedResultsRuleResultsAdditional
124+ , rfrrraSummary
125+ , rfrrraRuleImpact
126+ , rfrrraGroups
127+ , rfrrraLocalizedRuleName
128+ , rfrrraURLBlocks
129+
136 -- * ResultRuleGroups
130 -- * ResultRuleGroups
137 , ResultRuleGroups
131 , ResultRuleGroups
138 , resultRuleGroups
132 , resultRuleGroups
139− , rrgProperties
133+ , rrgAddtional
140
134
141 -- * PagespeedAPIFormatStringV2
135 -- * PagespeedAPIFormatStringV2
142 , PagespeedAPIFormatStringV2
136 , PagespeedAPIFormatStringV2
@@ -147,7 +141,13 @@ module Network.Google.PageSpeed.Types
147 -- * ResultFormattedResultsRuleResults
141 -- * ResultFormattedResultsRuleResults
148 , ResultFormattedResultsRuleResults
142 , ResultFormattedResultsRuleResults
149 , resultFormattedResultsRuleResults
143 , resultFormattedResultsRuleResults
150− , rfrrrProperties
144+ , rfrrrAddtional
145+
146+ -- * ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
147+ , ResultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
148+ , resultFormattedResultsRuleResultsAdditionalURLBlocksItemURLsItem
149+ , rfrrraubiuiResult
150+ , rfrrraubiuiDetails
151 ) where
151 ) where
152
152
153import Network.Google.PageSpeed.Types.Product
153import 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
20import Network.Google.PageSpeed.Types.Sum
20import Network.Google.PageSpeed.Types.Sum
21import Network.Google.Prelude
21import Network.Google.Prelude
22
22
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+
23--
80--
24-- /See:/ 'pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem' smart constructor.
81-- /See:/ 'pagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem' smart constructor.
25data PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem = PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
82data PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem = PagespeedAPIFormatStringV2ArgsItemSecondary_rectsItem
@@ -262,147 +319,6 @@ instance ToJSON
262 ("width" .=) <$> _pafsvairiWidth,
319 ("width" .=) <$> _pafsvairiWidth,
263 ("top" .=) <$> _pafsvairiTop])
320 ("top" .=) <$> _pafsvairiTop])
264
321
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−
406-- | The version of PageSpeed used to generate these results.
322-- | The version of PageSpeed used to generate these results.
407--
323--
408-- /See:/ 'resultVersion' smart constructor.
324-- /See:/ 'resultVersion' smart constructor.
@@ -705,65 +621,6 @@ instance ToJSON PagespeedAPIImageV2Page_rect where
705 ("width" .=) <$> _paivpWidth,
621 ("width" .=) <$> _paivpWidth,
706 ("top" .=) <$> _paivpTop])
622 ("top" .=) <$> _paivpTop])
707
623
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−
767--
624--
768-- /See:/ 'result' smart constructor.
625-- /See:/ 'result' smart constructor.
769data Result = Result
626data Result = Result
@@ -995,62 +852,42 @@ instance ToJSON PagespeedAPIFormatStringV2ArgsItem
995 ("type" .=) <$> _pafsvaiType,
852 ("type" .=) <$> _pafsvaiType,
996 ("secondary_rects" .=) <$> _pafsvaiSecondaryRects])
853 ("secondary_rects" .=) <$> _pafsvaiSecondaryRects])
997
854
855+-- | The name of this rule group: one of \"SPEED\" or \"USABILITY\".
998--
856--
999−-- /See:/ 'resultFormattedResultsRuleResultsPropertiesURLBlocksItem' smart constructor.
857+-- /See:/ 'resultRuleGroupsAdditional' smart constructor.
1000−data ResultFormattedResultsRuleResultsPropertiesURLBlocksItem = ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
858+newtype ResultRuleGroupsAdditional = ResultRuleGroupsAdditional
1001− { _rfrrrpubiURLs :: !(Maybe [ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem])
859+ { _rrgaScore :: Maybe Int32
1002− , _rfrrrpubiHeader :: !(Maybe PagespeedAPIFormatStringV2)
1003 } deriving (Eq,Show,Data,Typeable,Generic)
860 } deriving (Eq,Show,Data,Typeable,Generic)
1004
861
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.
1006--
863--
1007-- Use one of the following lenses to modify other fields as desired:
864-- Use one of the following lenses to modify other fields as desired:
1008--
865--
1009−-- * 'rfrrrpubiURLs'
866+-- * 'rrgaScore'
1010−--
867+resultRuleGroupsAdditional
1011−-- * 'rfrrrpubiHeader'
868+ :: ResultRuleGroupsAdditional
1012−resultFormattedResultsRuleResultsPropertiesURLBlocksItem
869+resultRuleGroupsAdditional =
1013− :: ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
870+ ResultRuleGroupsAdditional
1014−resultFormattedResultsRuleResultsPropertiesURLBlocksItem =
871+ { _rrgaScore = Nothing
1015− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
1016− { _rfrrrpubiURLs = Nothing
1017− , _rfrrrpubiHeader = Nothing
1018 }
872 }
1019
873
1020−-- | List of entries that provide information about URLs in the url block.
874+-- | The score (0-100) for this rule group, which indicates how much better a
1021−-- Optional.
875+-- page could be in that category (e.g. how much faster, or how much more
1022−rfrrrpubiURLs :: Lens' ResultFormattedResultsRuleResultsPropertiesURLBlocksItem [ResultFormattedResultsRuleResultsPropertiesURLBlocksItemURLsItem]
876+-- usable). A high score indicates little room for improvement, while a
1023−rfrrrpubiURLs
877+-- lower score indicates more room for improvement.
1024− = lens _rfrrrpubiURLs
878+rrgaScore :: Lens' ResultRuleGroupsAdditional (Maybe Int32)
1025− (\ s a -> s{_rfrrrpubiURLs = a})
879+rrgaScore
1026− . _Default
880+ = lens _rrgaScore (\ s a -> s{_rrgaScore = a})
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})
1034
881
1035−instance FromJSON
882+instance FromJSON ResultRuleGroupsAdditional where
1036− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
1037− where
1038 parseJSON
883 parseJSON
1039− = withObject
884+ = withObject "ResultRuleGroupsAdditional"
1040− "ResultFormattedResultsRuleResultsPropertiesURLBlocksItem"
1041 (\ o ->
885 (\ o ->
1042− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
886+ ResultRuleGroupsAdditional <$> (o .:? "score"))
1043− <$> (o .:? "urls" .!= mempty) <*> (o .:? "header"))
1044
887
1045−instance ToJSON
888+instance ToJSON ResultRuleGroupsAdditional where
1046− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem
889+ toJSON ResultRuleGroupsAdditional{..}
1047− where
1048− toJSON
1049− ResultFormattedResultsRuleResultsPropertiesURLBlocksItem{..}
1050− = object
1051− (catMaybes
890+ = object (catMaybes [("score" .=) <$> _rrgaScore])
1052− [("urls" .=) <$> _rfrrrpubiURLs,
1053− ("header" .=) <$> _rfrrrpubiHeader])
1054
891
1055-- | Localized PageSpeed results. Contains a ruleResults entry for each
892-- | Localized PageSpeed results. Contains a ruleResults entry for each
1056-- PageSpeed rule instantiated and run by the server.
893-- PageSpeed rule instantiated and run by the server.
@@ -1102,31 +939,134 @@ instance ToJSON ResultFormattedResults where
1102 [("locale" .=) <$> _rfrLocale,
939 [("locale" .=) <$> _rfrLocale,
1103 ("ruleResults" .=) <$> _rfrRuleResults])
940 ("ruleResults" .=) <$> _rfrRuleResults])
1104
941
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+
1105-- | A map with one entry for each rule group in these results.
1046-- | A map with one entry for each rule group in these results.
1106--
1047--
1107-- /See:/ 'resultRuleGroups' smart constructor.
1048-- /See:/ 'resultRuleGroups' smart constructor.
1108newtype ResultRuleGroups = ResultRuleGroups
1049newtype ResultRuleGroups = ResultRuleGroups
1109− { _rrgProperties :: HashMap Text ResultRuleGroupsProperties
1050+ { _rrgAddtional :: HashMap Text ResultRuleGroupsAdditional
1110 } deriving (Eq,Show,Data,Typeable,Generic)
1051 } deriving (Eq,Show,Data,Typeable,Generic)
1111
1052
1112-- | Creates a value of 'ResultRuleGroups' with the minimum fields required to make a request.
1053-- | Creates a value of 'ResultRuleGroups' with the minimum fields required to make a request.
1113--
1054--
1114-- Use one of the following lenses to modify other fields as desired:
1055-- Use one of the following lenses to modify other fields as desired:
1115--
1056--
1116−-- * 'rrgProperties'
1057+-- * 'rrgAddtional'
1117resultRuleGroups
1058resultRuleGroups
1118− :: HashMap Text ResultRuleGroupsProperties -- ^ 'properties'
1059+ :: HashMap Text ResultRuleGroupsAdditional -- ^ 'addtional'
1119 -> ResultRuleGroups
1060 -> ResultRuleGroups
1120−resultRuleGroups pRrgProperties_ =
1061+resultRuleGroups pRrgAddtional_ =
1121 ResultRuleGroups
1062 ResultRuleGroups
1122− { _rrgProperties = pRrgProperties_
1063+ { _rrgAddtional = pRrgAddtional_
1123 }
1064 }
1124
1065
1125-- | The name of this rule group: one of \"SPEED\" or \"USABILITY\".
1066-- | The name of this rule group: one of \"SPEED\" or \"USABILITY\".
1126−rrgProperties :: Lens' ResultRuleGroups (HashMap Text ResultRuleGroupsProperties)
1067+rrgAddtional :: Lens' ResultRuleGroups (HashMap Text ResultRuleGroupsAdditional)
1127−rrgProperties
1068+rrgAddtional
1128− = lens _rrgProperties
1069+ = lens _rrgAddtional (\ s a -> s{_rrgAddtional = a})
1129− (\ s a -> s{_rrgProperties = a})
1130
1070
1131instance FromJSON ResultRuleGroups where
1071instance FromJSON ResultRuleGroups where
1132 parseJSON
1072 parseJSON
@@ -1134,7 +1074,7 @@ instance FromJSON ResultRuleGroups where
1134 (\ o -> ResultRuleGroups <$> (parseJSONObject o))
1074 (\ o -> ResultRuleGroups <$> (parseJSONObject o))
1135
1075
1136instance ToJSON ResultRuleGroups where
1076instance ToJSON ResultRuleGroups where
1137− toJSON = toJSON . _rrgProperties
1077+ toJSON = toJSON . _rrgAddtional
1138
1078
1139--
1079--
1140-- /See:/ 'pagespeedAPIFormatStringV2' smart constructor.
1080-- /See:/ 'pagespeedAPIFormatStringV2' smart constructor.
@@ -1192,28 +1132,28 @@ instance ToJSON PagespeedAPIFormatStringV2 where
1192--
1132--
1193-- /See:/ 'resultFormattedResultsRuleResults' smart constructor.
1133-- /See:/ 'resultFormattedResultsRuleResults' smart constructor.
1194newtype ResultFormattedResultsRuleResults = ResultFormattedResultsRuleResults
1134newtype ResultFormattedResultsRuleResults = ResultFormattedResultsRuleResults
1195− { _rfrrrProperties :: HashMap Text ResultFormattedResultsRuleResultsProperties
1135+ { _rfrrrAddtional :: HashMap Text ResultFormattedResultsRuleResultsAdditional
1196 } deriving (Eq,Show,Data,Typeable,Generic)
1136 } deriving (Eq,Show,Data,Typeable,Generic)
1197
1137
1198-- | Creates a value of 'ResultFormattedResultsRuleResults' with the minimum fields required to make a request.
1138-- | Creates a value of 'ResultFormattedResultsRuleResults' with the minimum fields required to make a request.
1199--
1139--
1200-- Use one of the following lenses to modify other fields as desired:
1140-- Use one of the following lenses to modify other fields as desired:
1201--
1141--
1202−-- * 'rfrrrProperties'
1142+-- * 'rfrrrAddtional'
1203resultFormattedResultsRuleResults
1143resultFormattedResultsRuleResults
1204− :: HashMap Text ResultFormattedResultsRuleResultsProperties -- ^ 'properties'
1144+ :: HashMap Text ResultFormattedResultsRuleResultsAdditional -- ^ 'addtional'
1205 -> ResultFormattedResultsRuleResults
1145 -> ResultFormattedResultsRuleResults
1206−resultFormattedResultsRuleResults pRfrrrProperties_ =
1146+resultFormattedResultsRuleResults pRfrrrAddtional_ =
1207 ResultFormattedResultsRuleResults
1147 ResultFormattedResultsRuleResults
1208− { _rfrrrProperties = pRfrrrProperties_
1148+ { _rfrrrAddtional = pRfrrrAddtional_
1209 }
1149 }
1210
1150
1211-- | The enum-like identifier for this rule. For instance \"EnableKeepAlive\"
1151-- | The enum-like identifier for this rule. For instance \"EnableKeepAlive\"
1212-- or \"AvoidCssImport\". Not localized.
1152-- or \"AvoidCssImport\". Not localized.
1213−rfrrrProperties :: Lens' ResultFormattedResultsRuleResults (HashMap Text ResultFormattedResultsRuleResultsProperties)
1153+rfrrrAddtional :: Lens' ResultFormattedResultsRuleResults (HashMap Text ResultFormattedResultsRuleResultsAdditional)
1214−rfrrrProperties
1154+rfrrrAddtional
1215− = lens _rfrrrProperties
1155+ = lens _rfrrrAddtional
1216− (\ s a -> s{_rfrrrProperties = a})
1156+ (\ s a -> s{_rfrrrAddtional = a})
1217
1157
1218instance FromJSON ResultFormattedResultsRuleResults
1158instance FromJSON ResultFormattedResultsRuleResults
1219 where
1159 where
@@ -1225,4 +1165,63 @@ instance FromJSON ResultFormattedResultsRuleResults
1225
1165
1226instance ToJSON ResultFormattedResultsRuleResults
1166instance ToJSON ResultFormattedResultsRuleResults
1227 where
1167 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
174 -- ** LogMessageRequestClientInfo
174 -- ** LogMessageRequestClientInfo
175 , LogMessageRequestClientInfo
175 , LogMessageRequestClientInfo
176 , logMessageRequestClientInfo
176 , logMessageRequestClientInfo
177− , lmrciProperties
177+ , lmrciAddtional
178
178
179 -- ** Lead
179 -- ** Lead
180 , Lead
180 , Lead
gogol-partners/gen/Network/Google/Partners/Types.hs+1−1
@@ -148,7 +148,7 @@ module Network.Google.Partners.Types
148 -- * LogMessageRequestClientInfo
148 -- * LogMessageRequestClientInfo
149 , LogMessageRequestClientInfo
149 , LogMessageRequestClientInfo
150 , logMessageRequestClientInfo
150 , logMessageRequestClientInfo
151− , lmrciProperties
151+ , lmrciAddtional
152
152
153 -- * Lead
153 -- * Lead
154 , Lead
154 , Lead
gogol-partners/gen/Network/Google/Partners/Types/Product.hs+10−10
@@ -1122,26 +1122,26 @@ instance ToJSON LocalizedCompanyInfo where
1122--
1122--
1123-- /See:/ 'logMessageRequestClientInfo' smart constructor.
1123-- /See:/ 'logMessageRequestClientInfo' smart constructor.
1124newtype LogMessageRequestClientInfo = LogMessageRequestClientInfo
1124newtype LogMessageRequestClientInfo = LogMessageRequestClientInfo
1125− { _lmrciProperties :: HashMap Text Text
1125+ { _lmrciAddtional :: HashMap Text Text
1126 } deriving (Eq,Show,Data,Typeable,Generic)
1126 } deriving (Eq,Show,Data,Typeable,Generic)
1127
1127
1128-- | Creates a value of 'LogMessageRequestClientInfo' with the minimum fields required to make a request.
1128-- | Creates a value of 'LogMessageRequestClientInfo' with the minimum fields required to make a request.
1129--
1129--
1130-- Use one of the following lenses to modify other fields as desired:
1130-- Use one of the following lenses to modify other fields as desired:
1131--
1131--
1132−-- * 'lmrciProperties'
1132+-- * 'lmrciAddtional'
1133logMessageRequestClientInfo
1133logMessageRequestClientInfo
1134− :: HashMap Text Text -- ^ 'properties'
1134+ :: HashMap Text Text -- ^ 'addtional'
1135 -> LogMessageRequestClientInfo
1135 -> LogMessageRequestClientInfo
1136−logMessageRequestClientInfo pLmrciProperties_ =
1136+logMessageRequestClientInfo pLmrciAddtional_ =
1137 LogMessageRequestClientInfo
1137 LogMessageRequestClientInfo
1138− { _lmrciProperties = pLmrciProperties_
1138+ { _lmrciAddtional = pLmrciAddtional_
1139 }
1139 }
1140
1140
1141−lmrciProperties :: Lens' LogMessageRequestClientInfo (HashMap Text Text)
1141+lmrciAddtional :: Lens' LogMessageRequestClientInfo (HashMap Text Text)
1142−lmrciProperties
1142+lmrciAddtional
1143− = lens _lmrciProperties
1143+ = lens _lmrciAddtional
1144− (\ s a -> s{_lmrciProperties = a})
1144+ (\ s a -> s{_lmrciAddtional = a})
1145
1145
1146instance FromJSON LogMessageRequestClientInfo where
1146instance FromJSON LogMessageRequestClientInfo where
1147 parseJSON
1147 parseJSON
@@ -1150,7 +1150,7 @@ instance FromJSON LogMessageRequestClientInfo where
1150 LogMessageRequestClientInfo <$> (parseJSONObject o))
1150 LogMessageRequestClientInfo <$> (parseJSONObject o))
1151
1151
1152instance ToJSON LogMessageRequestClientInfo where
1152instance ToJSON LogMessageRequestClientInfo where
1153− toJSON = toJSON . _lmrciProperties
1153+ toJSON = toJSON . _lmrciAddtional
1154
1154
1155-- | A lead resource that represents an advertiser contact for a \`Company\`.
1155-- | A lead resource that represents an advertiser contact for a \`Company\`.
1156-- These are usually generated via Google Partner Search (the advertiser
1156-- 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
63 -- ** AnalyzeModelDescriptionConfusionMatrixRowTotals
63 -- ** AnalyzeModelDescriptionConfusionMatrixRowTotals
64 , AnalyzeModelDescriptionConfusionMatrixRowTotals
64 , AnalyzeModelDescriptionConfusionMatrixRowTotals
65 , analyzeModelDescriptionConfusionMatrixRowTotals
65 , analyzeModelDescriptionConfusionMatrixRowTotals
66− , amdcmrtProperties
66+ , amdcmrtAddtional
67
67
68 -- ** Insert
68 -- ** Insert
69 , Insert
69 , Insert
@@ -88,7 +88,7 @@ module Network.Google.Prediction
88 -- ** InsertUtilityItem
88 -- ** InsertUtilityItem
89 , InsertUtilityItem
89 , InsertUtilityItem
90 , insertUtilityItem
90 , insertUtilityItem
91− , iuiProperties
91+ , iuiAddtional
92
92
93 -- ** Insert2
93 -- ** Insert2
94 , Insert2
94 , Insert2
@@ -105,11 +105,6 @@ module Network.Google.Prediction
105 , insStoragePMMLLocation
105 , insStoragePMMLLocation
106 , insModelInfo
106 , insModelInfo
107
107
108− -- ** AnalyzeModelDescriptionConfusionMatrixProperties
109− , AnalyzeModelDescriptionConfusionMatrixProperties
110− , analyzeModelDescriptionConfusionMatrixProperties
111− , amdcmpProperties
112−
113 -- ** InsertTrainingInstancesItem
108 -- ** InsertTrainingInstancesItem
114 , InsertTrainingInstancesItem
109 , InsertTrainingInstancesItem
115 , insertTrainingInstancesItem
110 , insertTrainingInstancesItem
@@ -170,7 +165,7 @@ module Network.Google.Prediction
170 -- ** AnalyzeModelDescriptionConfusionMatrix
165 -- ** AnalyzeModelDescriptionConfusionMatrix
171 , AnalyzeModelDescriptionConfusionMatrix
166 , AnalyzeModelDescriptionConfusionMatrix
172 , analyzeModelDescriptionConfusionMatrix
167 , analyzeModelDescriptionConfusionMatrix
173− , amdcmProperties
168+ , amdcmAddtional
174
169
175 -- ** Output
170 -- ** Output
176 , Output
171 , Output
@@ -192,7 +187,7 @@ module Network.Google.Prediction
192 -- ** AnalyzeErrorsItem
187 -- ** AnalyzeErrorsItem
193 , AnalyzeErrorsItem
188 , AnalyzeErrorsItem
194 , analyzeErrorsItem
189 , analyzeErrorsItem
195− , aeiProperties
190+ , aeiAddtional
196
191
197 -- ** AnalyzeDataDescription
192 -- ** AnalyzeDataDescription
198 , AnalyzeDataDescription
193 , AnalyzeDataDescription
@@ -212,6 +207,11 @@ module Network.Google.Prediction
212 , analyzeDataDescriptionFeaturesItemText
207 , analyzeDataDescriptionFeaturesItemText
213 , addfitCount
208 , addfitCount
214
209
210+ -- ** AnalyzeModelDescriptionConfusionMatrixAdditional
211+ , AnalyzeModelDescriptionConfusionMatrixAdditional
212+ , analyzeModelDescriptionConfusionMatrixAdditional
213+ , amdcmaAddtional
214+
215 -- ** AnalyzeDataDescriptionFeaturesItem
215 -- ** AnalyzeDataDescriptionFeaturesItem
216 , AnalyzeDataDescriptionFeaturesItem
216 , AnalyzeDataDescriptionFeaturesItem
217 , analyzeDataDescriptionFeaturesItem
217 , analyzeDataDescriptionFeaturesItem
gogol-prediction/gen/Network/Google/Prediction/Types.hs+9−9
@@ -31,7 +31,7 @@ module Network.Google.Prediction.Types
31 -- * AnalyzeModelDescriptionConfusionMatrixRowTotals
31 -- * AnalyzeModelDescriptionConfusionMatrixRowTotals
32 , AnalyzeModelDescriptionConfusionMatrixRowTotals
32 , AnalyzeModelDescriptionConfusionMatrixRowTotals
33 , analyzeModelDescriptionConfusionMatrixRowTotals
33 , analyzeModelDescriptionConfusionMatrixRowTotals
34− , amdcmrtProperties
34+ , amdcmrtAddtional
35
35
36 -- * Insert
36 -- * Insert
37 , Insert
37 , Insert
@@ -56,7 +56,7 @@ module Network.Google.Prediction.Types
56 -- * InsertUtilityItem
56 -- * InsertUtilityItem
57 , InsertUtilityItem
57 , InsertUtilityItem
58 , insertUtilityItem
58 , insertUtilityItem
59− , iuiProperties
59+ , iuiAddtional
60
60
61 -- * Insert2
61 -- * Insert2
62 , Insert2
62 , Insert2
@@ -73,11 +73,6 @@ module Network.Google.Prediction.Types
73 , insStoragePMMLLocation
73 , insStoragePMMLLocation
74 , insModelInfo
74 , insModelInfo
75
75
76− -- * AnalyzeModelDescriptionConfusionMatrixProperties
77− , AnalyzeModelDescriptionConfusionMatrixProperties
78− , analyzeModelDescriptionConfusionMatrixProperties
79− , amdcmpProperties
80−
81 -- * InsertTrainingInstancesItem
76 -- * InsertTrainingInstancesItem
82 , InsertTrainingInstancesItem
77 , InsertTrainingInstancesItem
83 , insertTrainingInstancesItem
78 , insertTrainingInstancesItem
@@ -138,7 +133,7 @@ module Network.Google.Prediction.Types
138 -- * AnalyzeModelDescriptionConfusionMatrix
133 -- * AnalyzeModelDescriptionConfusionMatrix
139 , AnalyzeModelDescriptionConfusionMatrix
134 , AnalyzeModelDescriptionConfusionMatrix
140 , analyzeModelDescriptionConfusionMatrix
135 , analyzeModelDescriptionConfusionMatrix
141− , amdcmProperties
136+ , amdcmAddtional
142
137
143 -- * Output
138 -- * Output
144 , Output
139 , Output
@@ -160,7 +155,7 @@ module Network.Google.Prediction.Types
160 -- * AnalyzeErrorsItem
155 -- * AnalyzeErrorsItem
161 , AnalyzeErrorsItem
156 , AnalyzeErrorsItem
162 , analyzeErrorsItem
157 , analyzeErrorsItem
163− , aeiProperties
158+ , aeiAddtional
164
159
165 -- * AnalyzeDataDescription
160 -- * AnalyzeDataDescription
166 , AnalyzeDataDescription
161 , AnalyzeDataDescription
@@ -180,6 +175,11 @@ module Network.Google.Prediction.Types
180 , analyzeDataDescriptionFeaturesItemText
175 , analyzeDataDescriptionFeaturesItemText
181 , addfitCount
176 , addfitCount
182
177
178+ -- * AnalyzeModelDescriptionConfusionMatrixAdditional
179+ , AnalyzeModelDescriptionConfusionMatrixAdditional
180+ , analyzeModelDescriptionConfusionMatrixAdditional
181+ , amdcmaAddtional
182+
183 -- * AnalyzeDataDescriptionFeaturesItem
183 -- * AnalyzeDataDescriptionFeaturesItem
184 , AnalyzeDataDescriptionFeaturesItem
184 , AnalyzeDataDescriptionFeaturesItem
185 , analyzeDataDescriptionFeaturesItem
185 , analyzeDataDescriptionFeaturesItem
gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+81−83
@@ -130,26 +130,26 @@ instance ToJSON Insert2ModelInfo where
130--
130--
131-- /See:/ 'analyzeModelDescriptionConfusionMatrixRowTotals' smart constructor.
131-- /See:/ 'analyzeModelDescriptionConfusionMatrixRowTotals' smart constructor.
132newtype AnalyzeModelDescriptionConfusionMatrixRowTotals = AnalyzeModelDescriptionConfusionMatrixRowTotals
132newtype AnalyzeModelDescriptionConfusionMatrixRowTotals = AnalyzeModelDescriptionConfusionMatrixRowTotals
133− { _amdcmrtProperties :: HashMap Text Text
133+ { _amdcmrtAddtional :: HashMap Text Text
134 } deriving (Eq,Show,Data,Typeable,Generic)
134 } deriving (Eq,Show,Data,Typeable,Generic)
135
135
136-- | Creates a value of 'AnalyzeModelDescriptionConfusionMatrixRowTotals' with the minimum fields required to make a request.
136-- | Creates a value of 'AnalyzeModelDescriptionConfusionMatrixRowTotals' with the minimum fields required to make a request.
137--
137--
138-- Use one of the following lenses to modify other fields as desired:
138-- Use one of the following lenses to modify other fields as desired:
139--
139--
140−-- * 'amdcmrtProperties'
140+-- * 'amdcmrtAddtional'
141analyzeModelDescriptionConfusionMatrixRowTotals
141analyzeModelDescriptionConfusionMatrixRowTotals
142− :: HashMap Text Text -- ^ 'properties'
142+ :: HashMap Text Text -- ^ 'addtional'
143 -> AnalyzeModelDescriptionConfusionMatrixRowTotals
143 -> AnalyzeModelDescriptionConfusionMatrixRowTotals
144−analyzeModelDescriptionConfusionMatrixRowTotals pAmdcmrtProperties_ =
144+analyzeModelDescriptionConfusionMatrixRowTotals pAmdcmrtAddtional_ =
145 AnalyzeModelDescriptionConfusionMatrixRowTotals
145 AnalyzeModelDescriptionConfusionMatrixRowTotals
146− { _amdcmrtProperties = pAmdcmrtProperties_
146+ { _amdcmrtAddtional = pAmdcmrtAddtional_
147 }
147 }
148
148
149−amdcmrtProperties :: Lens' AnalyzeModelDescriptionConfusionMatrixRowTotals (HashMap Text Text)
149+amdcmrtAddtional :: Lens' AnalyzeModelDescriptionConfusionMatrixRowTotals (HashMap Text Text)
150−amdcmrtProperties
150+amdcmrtAddtional
151− = lens _amdcmrtProperties
151+ = lens _amdcmrtAddtional
152− (\ s a -> s{_amdcmrtProperties = a})
152+ (\ s a -> s{_amdcmrtAddtional = a})
153
153
154instance FromJSON
154instance FromJSON
155 AnalyzeModelDescriptionConfusionMatrixRowTotals where
155 AnalyzeModelDescriptionConfusionMatrixRowTotals where
@@ -162,7 +162,7 @@ instance FromJSON
162
162
163instance ToJSON
163instance ToJSON
164 AnalyzeModelDescriptionConfusionMatrixRowTotals where
164 AnalyzeModelDescriptionConfusionMatrixRowTotals where
165− toJSON = toJSON . _amdcmrtProperties
165+ toJSON = toJSON . _amdcmrtAddtional
166
166
167--
167--
168-- /See:/ 'insert' smart constructor.
168-- /See:/ 'insert' smart constructor.
@@ -360,26 +360,25 @@ instance ToJSON List where
360--
360--
361-- /See:/ 'insertUtilityItem' smart constructor.
361-- /See:/ 'insertUtilityItem' smart constructor.
362newtype InsertUtilityItem = InsertUtilityItem
362newtype InsertUtilityItem = InsertUtilityItem
363− { _iuiProperties :: HashMap Text Double
363+ { _iuiAddtional :: HashMap Text Double
364 } deriving (Eq,Show,Data,Typeable,Generic)
364 } deriving (Eq,Show,Data,Typeable,Generic)
365
365
366-- | Creates a value of 'InsertUtilityItem' with the minimum fields required to make a request.
366-- | Creates a value of 'InsertUtilityItem' with the minimum fields required to make a request.
367--
367--
368-- Use one of the following lenses to modify other fields as desired:
368-- Use one of the following lenses to modify other fields as desired:
369--
369--
370−-- * 'iuiProperties'
370+-- * 'iuiAddtional'
371insertUtilityItem
371insertUtilityItem
372− :: HashMap Text Double -- ^ 'properties'
372+ :: HashMap Text Double -- ^ 'addtional'
373 -> InsertUtilityItem
373 -> InsertUtilityItem
374−insertUtilityItem pIuiProperties_ =
374+insertUtilityItem pIuiAddtional_ =
375 InsertUtilityItem
375 InsertUtilityItem
376− { _iuiProperties = pIuiProperties_
376+ { _iuiAddtional = pIuiAddtional_
377 }
377 }
378
378
379−iuiProperties :: Lens' InsertUtilityItem (HashMap Text Double)
379+iuiAddtional :: Lens' InsertUtilityItem (HashMap Text Double)
380−iuiProperties
380+iuiAddtional
381− = lens _iuiProperties
381+ = lens _iuiAddtional (\ s a -> s{_iuiAddtional = a})
382− (\ s a -> s{_iuiProperties = a})
383
382
384instance FromJSON InsertUtilityItem where
383instance FromJSON InsertUtilityItem where
385 parseJSON
384 parseJSON
@@ -387,7 +386,7 @@ instance FromJSON InsertUtilityItem where
387 (\ o -> InsertUtilityItem <$> (parseJSONObject o))
386 (\ o -> InsertUtilityItem <$> (parseJSONObject o))
388
387
389instance ToJSON InsertUtilityItem where
388instance ToJSON InsertUtilityItem where
390− toJSON = toJSON . _iuiProperties
389+ toJSON = toJSON . _iuiAddtional
391
390
392--
391--
393-- /See:/ 'insert2' smart constructor.
392-- /See:/ 'insert2' smart constructor.
@@ -543,49 +542,6 @@ instance ToJSON Insert2 where
543 _insStoragePMMLLocation,
542 _insStoragePMMLLocation,
544 ("modelInfo" .=) <$> _insModelInfo])
543 ("modelInfo" .=) <$> _insModelInfo])
545
544
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−
589--
545--
590-- /See:/ 'insertTrainingInstancesItem' smart constructor.
546-- /See:/ 'insertTrainingInstancesItem' smart constructor.
591data InsertTrainingInstancesItem = InsertTrainingInstancesItem
547data InsertTrainingInstancesItem = InsertTrainingInstancesItem
@@ -1070,27 +1026,27 @@ instance ToJSON Analyze where
1070--
1026--
1071-- /See:/ 'analyzeModelDescriptionConfusionMatrix' smart constructor.
1027-- /See:/ 'analyzeModelDescriptionConfusionMatrix' smart constructor.
1072newtype AnalyzeModelDescriptionConfusionMatrix = AnalyzeModelDescriptionConfusionMatrix
1028newtype AnalyzeModelDescriptionConfusionMatrix = AnalyzeModelDescriptionConfusionMatrix
1073− { _amdcmProperties :: HashMap Text AnalyzeModelDescriptionConfusionMatrixProperties
1029+ { _amdcmAddtional :: HashMap Text AnalyzeModelDescriptionConfusionMatrixAdditional
1074 } deriving (Eq,Show,Data,Typeable,Generic)
1030 } deriving (Eq,Show,Data,Typeable,Generic)
1075
1031
1076-- | Creates a value of 'AnalyzeModelDescriptionConfusionMatrix' with the minimum fields required to make a request.
1032-- | Creates a value of 'AnalyzeModelDescriptionConfusionMatrix' with the minimum fields required to make a request.
1077--
1033--
1078-- Use one of the following lenses to modify other fields as desired:
1034-- Use one of the following lenses to modify other fields as desired:
1079--
1035--
1080−-- * 'amdcmProperties'
1036+-- * 'amdcmAddtional'
1081analyzeModelDescriptionConfusionMatrix
1037analyzeModelDescriptionConfusionMatrix
1082− :: HashMap Text AnalyzeModelDescriptionConfusionMatrixProperties -- ^ 'properties'
1038+ :: HashMap Text AnalyzeModelDescriptionConfusionMatrixAdditional -- ^ 'addtional'
1083 -> AnalyzeModelDescriptionConfusionMatrix
1039 -> AnalyzeModelDescriptionConfusionMatrix
1084−analyzeModelDescriptionConfusionMatrix pAmdcmProperties_ =
1040+analyzeModelDescriptionConfusionMatrix pAmdcmAddtional_ =
1085 AnalyzeModelDescriptionConfusionMatrix
1041 AnalyzeModelDescriptionConfusionMatrix
1086− { _amdcmProperties = pAmdcmProperties_
1042+ { _amdcmAddtional = pAmdcmAddtional_
1087 }
1043 }
1088
1044
1089-- | Confusion matrix information for the true class label.
1045-- | Confusion matrix information for the true class label.
1090−amdcmProperties :: Lens' AnalyzeModelDescriptionConfusionMatrix (HashMap Text AnalyzeModelDescriptionConfusionMatrixProperties)
1046+amdcmAddtional :: Lens' AnalyzeModelDescriptionConfusionMatrix (HashMap Text AnalyzeModelDescriptionConfusionMatrixAdditional)
1091−amdcmProperties
1047+amdcmAddtional
1092− = lens _amdcmProperties
1048+ = lens _amdcmAddtional
1093− (\ s a -> s{_amdcmProperties = a})
1049+ (\ s a -> s{_amdcmAddtional = a})
1094
1050
1095instance FromJSON
1051instance FromJSON
1096 AnalyzeModelDescriptionConfusionMatrix where
1052 AnalyzeModelDescriptionConfusionMatrix where
@@ -1102,7 +1058,7 @@ instance FromJSON
1102
1058
1103instance ToJSON
1059instance ToJSON
1104 AnalyzeModelDescriptionConfusionMatrix where
1060 AnalyzeModelDescriptionConfusionMatrix where
1105− toJSON = toJSON . _amdcmProperties
1061+ toJSON = toJSON . _amdcmAddtional
1106
1062
1107--
1063--
1108-- /See:/ 'output' smart constructor.
1064-- /See:/ 'output' smart constructor.
@@ -1260,27 +1216,26 @@ instance ToJSON
1260--
1216--
1261-- /See:/ 'analyzeErrorsItem' smart constructor.
1217-- /See:/ 'analyzeErrorsItem' smart constructor.
1262newtype AnalyzeErrorsItem = AnalyzeErrorsItem
1218newtype AnalyzeErrorsItem = AnalyzeErrorsItem
1263− { _aeiProperties :: HashMap Text Text
1219+ { _aeiAddtional :: HashMap Text Text
1264 } deriving (Eq,Show,Data,Typeable,Generic)
1220 } deriving (Eq,Show,Data,Typeable,Generic)
1265
1221
1266-- | Creates a value of 'AnalyzeErrorsItem' with the minimum fields required to make a request.
1222-- | Creates a value of 'AnalyzeErrorsItem' with the minimum fields required to make a request.
1267--
1223--
1268-- Use one of the following lenses to modify other fields as desired:
1224-- Use one of the following lenses to modify other fields as desired:
1269--
1225--
1270−-- * 'aeiProperties'
1226+-- * 'aeiAddtional'
1271analyzeErrorsItem
1227analyzeErrorsItem
1272− :: HashMap Text Text -- ^ 'properties'
1228+ :: HashMap Text Text -- ^ 'addtional'
1273 -> AnalyzeErrorsItem
1229 -> AnalyzeErrorsItem
1274−analyzeErrorsItem pAeiProperties_ =
1230+analyzeErrorsItem pAeiAddtional_ =
1275 AnalyzeErrorsItem
1231 AnalyzeErrorsItem
1276− { _aeiProperties = pAeiProperties_
1232+ { _aeiAddtional = pAeiAddtional_
1277 }
1233 }
1278
1234
1279-- | Error level followed by a detailed error message.
1235-- | Error level followed by a detailed error message.
1280−aeiProperties :: Lens' AnalyzeErrorsItem (HashMap Text Text)
1236+aeiAddtional :: Lens' AnalyzeErrorsItem (HashMap Text Text)
1281−aeiProperties
1237+aeiAddtional
1282− = lens _aeiProperties
1238+ = lens _aeiAddtional (\ s a -> s{_aeiAddtional = a})
1283− (\ s a -> s{_aeiProperties = a})
1284
1239
1285instance FromJSON AnalyzeErrorsItem where
1240instance FromJSON AnalyzeErrorsItem where
1286 parseJSON
1241 parseJSON
@@ -1288,7 +1243,7 @@ instance FromJSON AnalyzeErrorsItem where
1288 (\ o -> AnalyzeErrorsItem <$> (parseJSONObject o))
1243 (\ o -> AnalyzeErrorsItem <$> (parseJSONObject o))
1289
1244
1290instance ToJSON AnalyzeErrorsItem where
1245instance ToJSON AnalyzeErrorsItem where
1291− toJSON = toJSON . _aeiProperties
1246+ toJSON = toJSON . _aeiAddtional
1292
1247
1293-- | Description of the data the model was trained on.
1248-- | Description of the data the model was trained on.
1294--
1249--
@@ -1445,6 +1400,49 @@ instance ToJSON
1445 toJSON AnalyzeDataDescriptionFeaturesItemText{..}
1400 toJSON AnalyzeDataDescriptionFeaturesItemText{..}
1446 = object (catMaybes [("count" .=) <$> _addfitCount])
1401 = object (catMaybes [("count" .=) <$> _addfitCount])
1447
1402
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+
1448--
1446--
1449-- /See:/ 'analyzeDataDescriptionFeaturesItem' smart constructor.
1447-- /See:/ 'analyzeDataDescriptionFeaturesItem' smart constructor.
1450data AnalyzeDataDescriptionFeaturesItem = AnalyzeDataDescriptionFeaturesItem
1448data AnalyzeDataDescriptionFeaturesItem = AnalyzeDataDescriptionFeaturesItem
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon.hs+1−1
@@ -83,7 +83,7 @@ module Network.Google.ProximityBeacon
83 -- ** BeaconProperties
83 -- ** BeaconProperties
84 , BeaconProperties
84 , BeaconProperties
85 , beaconProperties
85 , beaconProperties
86− , bpProperties
86+ , bpAddtional
87
87
88 -- ** Empty
88 -- ** Empty
89 , Empty
89 , Empty
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types.hs+1−1
@@ -33,7 +33,7 @@ module Network.Google.ProximityBeacon.Types
33 -- * BeaconProperties
33 -- * BeaconProperties
34 , BeaconProperties
34 , BeaconProperties
35 , beaconProperties
35 , beaconProperties
36− , bpProperties
36+ , bpAddtional
37
37
38 -- * Empty
38 -- * Empty
39 , Empty
39 , Empty
gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+9−9
@@ -145,25 +145,25 @@ instance ToJSON AttachmentInfo where
145--
145--
146-- /See:/ 'beaconProperties' smart constructor.
146-- /See:/ 'beaconProperties' smart constructor.
147newtype BeaconProperties = BeaconProperties
147newtype BeaconProperties = BeaconProperties
148− { _bpProperties :: HashMap Text Text
148+ { _bpAddtional :: HashMap Text Text
149 } deriving (Eq,Show,Data,Typeable,Generic)
149 } deriving (Eq,Show,Data,Typeable,Generic)
150
150
151-- | Creates a value of 'BeaconProperties' with the minimum fields required to make a request.
151-- | Creates a value of 'BeaconProperties' with the minimum fields required to make a request.
152--
152--
153-- Use one of the following lenses to modify other fields as desired:
153-- Use one of the following lenses to modify other fields as desired:
154--
154--
155−-- * 'bpProperties'
155+-- * 'bpAddtional'
156beaconProperties
156beaconProperties
157− :: HashMap Text Text -- ^ 'properties'
157+ :: HashMap Text Text -- ^ 'addtional'
158 -> BeaconProperties
158 -> BeaconProperties
159−beaconProperties pBpProperties_ =
159+beaconProperties pBpAddtional_ =
160 BeaconProperties
160 BeaconProperties
161− { _bpProperties = pBpProperties_
161+ { _bpAddtional = pBpAddtional_
162 }
162 }
163
163
164−bpProperties :: Lens' BeaconProperties (HashMap Text Text)
164+bpAddtional :: Lens' BeaconProperties (HashMap Text Text)
165−bpProperties
165+bpAddtional
166− = lens _bpProperties (\ s a -> s{_bpProperties = a})
166+ = lens _bpAddtional (\ s a -> s{_bpAddtional = a})
167
167
168instance FromJSON BeaconProperties where
168instance FromJSON BeaconProperties where
169 parseJSON
169 parseJSON
@@ -171,7 +171,7 @@ instance FromJSON BeaconProperties where
171 (\ o -> BeaconProperties <$> (parseJSONObject o))
171 (\ o -> BeaconProperties <$> (parseJSONObject o))
172
172
173instance ToJSON BeaconProperties where
173instance ToJSON BeaconProperties where
174− toJSON = toJSON . _bpProperties
174+ toJSON = toJSON . _bpAddtional
175
175
176-- | A generic empty message that you can re-use to avoid defining duplicated
176-- | A generic empty message that you can re-use to avoid defining duplicated
177-- empty messages in your APIs. A typical example is to use it as the
177-- 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
156 -- ** PubsubMessageAttributes
156 -- ** PubsubMessageAttributes
157 , PubsubMessageAttributes
157 , PubsubMessageAttributes
158 , pubsubMessageAttributes
158 , pubsubMessageAttributes
159− , pmaProperties
159+ , pmaAddtional
160
160
161 -- ** TestIAMPermissionsRequest
161 -- ** TestIAMPermissionsRequest
162 , TestIAMPermissionsRequest
162 , TestIAMPermissionsRequest
@@ -188,7 +188,7 @@ module Network.Google.PubSub
188 -- ** PushConfigAttributes
188 -- ** PushConfigAttributes
189 , PushConfigAttributes
189 , PushConfigAttributes
190 , pushConfigAttributes
190 , pushConfigAttributes
191− , pcaProperties
191+ , pcaAddtional
192
192
193 -- ** Subscription
193 -- ** Subscription
194 , Subscription
194 , Subscription
gogol-pubsub/gen/Network/Google/PubSub/Types.hs+2−2
@@ -88,7 +88,7 @@ module Network.Google.PubSub.Types
88 -- * PubsubMessageAttributes
88 -- * PubsubMessageAttributes
89 , PubsubMessageAttributes
89 , PubsubMessageAttributes
90 , pubsubMessageAttributes
90 , pubsubMessageAttributes
91− , pmaProperties
91+ , pmaAddtional
92
92
93 -- * TestIAMPermissionsRequest
93 -- * TestIAMPermissionsRequest
94 , TestIAMPermissionsRequest
94 , TestIAMPermissionsRequest
@@ -120,7 +120,7 @@ module Network.Google.PubSub.Types
120 -- * PushConfigAttributes
120 -- * PushConfigAttributes
121 , PushConfigAttributes
121 , PushConfigAttributes
122 , pushConfigAttributes
122 , pushConfigAttributes
123− , pcaProperties
123+ , pcaAddtional
124
124
125 -- * Subscription
125 -- * Subscription
126 , Subscription
126 , Subscription
gogol-pubsub/gen/Network/Google/PubSub/Types/Product.hs+18−20
@@ -593,26 +593,25 @@ instance ToJSON PullRequest where
593--
593--
594-- /See:/ 'pubsubMessageAttributes' smart constructor.
594-- /See:/ 'pubsubMessageAttributes' smart constructor.
595newtype PubsubMessageAttributes = PubsubMessageAttributes
595newtype PubsubMessageAttributes = PubsubMessageAttributes
596− { _pmaProperties :: HashMap Text Text
596+ { _pmaAddtional :: HashMap Text Text
597 } deriving (Eq,Show,Data,Typeable,Generic)
597 } deriving (Eq,Show,Data,Typeable,Generic)
598
598
599-- | Creates a value of 'PubsubMessageAttributes' with the minimum fields required to make a request.
599-- | Creates a value of 'PubsubMessageAttributes' with the minimum fields required to make a request.
600--
600--
601-- Use one of the following lenses to modify other fields as desired:
601-- Use one of the following lenses to modify other fields as desired:
602--
602--
603−-- * 'pmaProperties'
603+-- * 'pmaAddtional'
604pubsubMessageAttributes
604pubsubMessageAttributes
605− :: HashMap Text Text -- ^ 'properties'
605+ :: HashMap Text Text -- ^ 'addtional'
606 -> PubsubMessageAttributes
606 -> PubsubMessageAttributes
607−pubsubMessageAttributes pPmaProperties_ =
607+pubsubMessageAttributes pPmaAddtional_ =
608 PubsubMessageAttributes
608 PubsubMessageAttributes
609− { _pmaProperties = pPmaProperties_
609+ { _pmaAddtional = pPmaAddtional_
610 }
610 }
611
611
612−pmaProperties :: Lens' PubsubMessageAttributes (HashMap Text Text)
612+pmaAddtional :: Lens' PubsubMessageAttributes (HashMap Text Text)
613−pmaProperties
613+pmaAddtional
614− = lens _pmaProperties
614+ = lens _pmaAddtional (\ s a -> s{_pmaAddtional = a})
615− (\ s a -> s{_pmaProperties = a})
616
615
617instance FromJSON PubsubMessageAttributes where
616instance FromJSON PubsubMessageAttributes where
618 parseJSON
617 parseJSON
@@ -621,7 +620,7 @@ instance FromJSON PubsubMessageAttributes where
621 PubsubMessageAttributes <$> (parseJSONObject o))
620 PubsubMessageAttributes <$> (parseJSONObject o))
622
621
623instance ToJSON PubsubMessageAttributes where
622instance ToJSON PubsubMessageAttributes where
624− toJSON = toJSON . _pmaProperties
623+ toJSON = toJSON . _pmaAddtional
625
624
626-- | Request message for \`TestIamPermissions\` method.
625-- | Request message for \`TestIamPermissions\` method.
627--
626--
@@ -873,26 +872,25 @@ instance ToJSON Policy where
873--
872--
874-- /See:/ 'pushConfigAttributes' smart constructor.
873-- /See:/ 'pushConfigAttributes' smart constructor.
875newtype PushConfigAttributes = PushConfigAttributes
874newtype PushConfigAttributes = PushConfigAttributes
876− { _pcaProperties :: HashMap Text Text
875+ { _pcaAddtional :: HashMap Text Text
877 } deriving (Eq,Show,Data,Typeable,Generic)
876 } deriving (Eq,Show,Data,Typeable,Generic)
878
877
879-- | Creates a value of 'PushConfigAttributes' with the minimum fields required to make a request.
878-- | Creates a value of 'PushConfigAttributes' with the minimum fields required to make a request.
880--
879--
881-- Use one of the following lenses to modify other fields as desired:
880-- Use one of the following lenses to modify other fields as desired:
882--
881--
883−-- * 'pcaProperties'
882+-- * 'pcaAddtional'
884pushConfigAttributes
883pushConfigAttributes
885− :: HashMap Text Text -- ^ 'properties'
884+ :: HashMap Text Text -- ^ 'addtional'
886 -> PushConfigAttributes
885 -> PushConfigAttributes
887−pushConfigAttributes pPcaProperties_ =
886+pushConfigAttributes pPcaAddtional_ =
888 PushConfigAttributes
887 PushConfigAttributes
889− { _pcaProperties = pPcaProperties_
888+ { _pcaAddtional = pPcaAddtional_
890 }
889 }
891
890
892−pcaProperties :: Lens' PushConfigAttributes (HashMap Text Text)
891+pcaAddtional :: Lens' PushConfigAttributes (HashMap Text Text)
893−pcaProperties
892+pcaAddtional
894− = lens _pcaProperties
893+ = lens _pcaAddtional (\ s a -> s{_pcaAddtional = a})
895− (\ s a -> s{_pcaProperties = a})
896
894
897instance FromJSON PushConfigAttributes where
895instance FromJSON PushConfigAttributes where
898 parseJSON
896 parseJSON
@@ -900,7 +898,7 @@ instance FromJSON PushConfigAttributes where
900 (\ o -> PushConfigAttributes <$> (parseJSONObject o))
898 (\ o -> PushConfigAttributes <$> (parseJSONObject o))
901
899
902instance ToJSON PushConfigAttributes where
900instance ToJSON PushConfigAttributes where
903− toJSON = toJSON . _pcaProperties
901+ toJSON = toJSON . _pcaAddtional
904
902
905-- | A subscription resource.
903-- | A subscription resource.
906--
904--
gogol-resourcemanager/gen/Network/Google/ResourceManager.hs+1−1
@@ -132,7 +132,7 @@ module Network.Google.ResourceManager
132 -- ** ProjectLabels
132 -- ** ProjectLabels
133 , ProjectLabels
133 , ProjectLabels
134 , projectLabels
134 , projectLabels
135− , plProperties
135+ , plAddtional
136
136
137 -- ** Organization
137 -- ** Organization
138 , Organization
138 , Organization
gogol-resourcemanager/gen/Network/Google/ResourceManager/Types.hs+1−1
@@ -79,7 +79,7 @@ module Network.Google.ResourceManager.Types
79 -- * ProjectLabels
79 -- * ProjectLabels
80 , ProjectLabels
80 , ProjectLabels
81 , projectLabels
81 , projectLabels
82− , plProperties
82+ , plAddtional
83
83
84 -- * Organization
84 -- * Organization
85 , Organization
85 , Organization
gogol-resourcemanager/gen/Network/Google/ResourceManager/Types/Product.hs+9−9
@@ -536,25 +536,25 @@ instance ToJSON Policy where
536--
536--
537-- /See:/ 'projectLabels' smart constructor.
537-- /See:/ 'projectLabels' smart constructor.
538newtype ProjectLabels = ProjectLabels
538newtype ProjectLabels = ProjectLabels
539− { _plProperties :: HashMap Text Text
539+ { _plAddtional :: HashMap Text Text
540 } deriving (Eq,Show,Data,Typeable,Generic)
540 } deriving (Eq,Show,Data,Typeable,Generic)
541
541
542-- | Creates a value of 'ProjectLabels' with the minimum fields required to make a request.
542-- | Creates a value of 'ProjectLabels' with the minimum fields required to make a request.
543--
543--
544-- Use one of the following lenses to modify other fields as desired:
544-- Use one of the following lenses to modify other fields as desired:
545--
545--
546−-- * 'plProperties'
546+-- * 'plAddtional'
547projectLabels
547projectLabels
548− :: HashMap Text Text -- ^ 'properties'
548+ :: HashMap Text Text -- ^ 'addtional'
549 -> ProjectLabels
549 -> ProjectLabels
550−projectLabels pPlProperties_ =
550+projectLabels pPlAddtional_ =
551 ProjectLabels
551 ProjectLabels
552− { _plProperties = pPlProperties_
552+ { _plAddtional = pPlAddtional_
553 }
553 }
554
554
555−plProperties :: Lens' ProjectLabels (HashMap Text Text)
555+plAddtional :: Lens' ProjectLabels (HashMap Text Text)
556−plProperties
556+plAddtional
557− = lens _plProperties (\ s a -> s{_plProperties = a})
557+ = lens _plAddtional (\ s a -> s{_plAddtional = a})
558
558
559instance FromJSON ProjectLabels where
559instance FromJSON ProjectLabels where
560 parseJSON
560 parseJSON
@@ -562,7 +562,7 @@ instance FromJSON ProjectLabels where
562 (\ o -> ProjectLabels <$> (parseJSONObject o))
562 (\ o -> ProjectLabels <$> (parseJSONObject o))
563
563
564instance ToJSON ProjectLabels where
564instance ToJSON ProjectLabels where
565− toJSON = toJSON . _plProperties
565+ toJSON = toJSON . _plAddtional
566
566
567-- | The root node in the resource hierarchy to which a particular entity\'s
567-- | The root node in the resource hierarchy to which a particular entity\'s
568-- (e.g., company) resources belong.
568-- (e.g., company) resources belong.
gogol-resourceviews/gen/Network/Google/ResourceViews.hs+1−1
@@ -151,7 +151,7 @@ module Network.Google.ResourceViews
151 -- ** ListResourceResponseItemEndpoints
151 -- ** ListResourceResponseItemEndpoints
152 , ListResourceResponseItemEndpoints
152 , ListResourceResponseItemEndpoints
153 , listResourceResponseItemEndpoints
153 , listResourceResponseItemEndpoints
154− , lrrieProperties
154+ , lrrieAddtional
155
155
156 -- ** ZoneViewsAddResourcesRequest
156 -- ** ZoneViewsAddResourcesRequest
157 , ZoneViewsAddResourcesRequest
157 , ZoneViewsAddResourcesRequest
gogol-resourceviews/gen/Network/Google/ResourceViews/Types.hs+1−1
@@ -110,7 +110,7 @@ module Network.Google.ResourceViews.Types
110 -- * ListResourceResponseItemEndpoints
110 -- * ListResourceResponseItemEndpoints
111 , ListResourceResponseItemEndpoints
111 , ListResourceResponseItemEndpoints
112 , listResourceResponseItemEndpoints
112 , listResourceResponseItemEndpoints
113− , lrrieProperties
113+ , lrrieAddtional
114
114
115 -- * ZoneViewsAddResourcesRequest
115 -- * ZoneViewsAddResourcesRequest
116 , ZoneViewsAddResourcesRequest
116 , ZoneViewsAddResourcesRequest
gogol-resourceviews/gen/Network/Google/ResourceViews/Types/Product.hs+10−10
@@ -813,27 +813,27 @@ instance ToJSON ZoneViewsRemoveResourcesRequest where
813--
813--
814-- /See:/ 'listResourceResponseItemEndpoints' smart constructor.
814-- /See:/ 'listResourceResponseItemEndpoints' smart constructor.
815newtype ListResourceResponseItemEndpoints = ListResourceResponseItemEndpoints
815newtype ListResourceResponseItemEndpoints = ListResourceResponseItemEndpoints
816− { _lrrieProperties :: HashMap Text [Int32]
816+ { _lrrieAddtional :: HashMap Text [Int32]
817 } deriving (Eq,Show,Data,Typeable,Generic)
817 } deriving (Eq,Show,Data,Typeable,Generic)
818
818
819-- | Creates a value of 'ListResourceResponseItemEndpoints' with the minimum fields required to make a request.
819-- | Creates a value of 'ListResourceResponseItemEndpoints' with the minimum fields required to make a request.
820--
820--
821-- Use one of the following lenses to modify other fields as desired:
821-- Use one of the following lenses to modify other fields as desired:
822--
822--
823−-- * 'lrrieProperties'
823+-- * 'lrrieAddtional'
824listResourceResponseItemEndpoints
824listResourceResponseItemEndpoints
825− :: HashMap Text [Int32] -- ^ 'properties'
825+ :: HashMap Text [Int32] -- ^ 'addtional'
826 -> ListResourceResponseItemEndpoints
826 -> ListResourceResponseItemEndpoints
827−listResourceResponseItemEndpoints pLrrieProperties_ =
827+listResourceResponseItemEndpoints pLrrieAddtional_ =
828 ListResourceResponseItemEndpoints
828 ListResourceResponseItemEndpoints
829− { _lrrieProperties = pLrrieProperties_
829+ { _lrrieAddtional = pLrrieAddtional_
830 }
830 }
831
831
832-- | The name of the service end point.
832-- | The name of the service end point.
833−lrrieProperties :: Lens' ListResourceResponseItemEndpoints (HashMap Text [Int32])
833+lrrieAddtional :: Lens' ListResourceResponseItemEndpoints (HashMap Text [Int32])
834−lrrieProperties
834+lrrieAddtional
835− = lens _lrrieProperties
835+ = lens _lrrieAddtional
836− (\ s a -> s{_lrrieProperties = a})
836+ (\ s a -> s{_lrrieAddtional = a})
837
837
838instance FromJSON ListResourceResponseItemEndpoints
838instance FromJSON ListResourceResponseItemEndpoints
839 where
839 where
@@ -845,7 +845,7 @@ instance FromJSON ListResourceResponseItemEndpoints
845
845
846instance ToJSON ListResourceResponseItemEndpoints
846instance ToJSON ListResourceResponseItemEndpoints
847 where
847 where
848− toJSON = toJSON . _lrrieProperties
848+ toJSON = toJSON . _lrrieAddtional
849
849
850-- | The request to add resources to the resource view.
850-- | The request to add resources to the resource view.
851--
851--
gogol-storage-transfer/gen/Network/Google/StorageTransfer.hs+3−3
@@ -122,7 +122,7 @@ module Network.Google.StorageTransfer
122 -- ** StatusDetailsItem
122 -- ** StatusDetailsItem
123 , StatusDetailsItem
123 , StatusDetailsItem
124 , statusDetailsItem
124 , statusDetailsItem
125− , sdiProperties
125+ , sdiAddtional
126
126
127 -- ** Date
127 -- ** Date
128 , Date
128 , Date
@@ -204,7 +204,7 @@ module Network.Google.StorageTransfer
204 -- ** OperationMetadata
204 -- ** OperationMetadata
205 , OperationMetadata
205 , OperationMetadata
206 , operationMetadata
206 , operationMetadata
207− , omProperties
207+ , omAddtional
208
208
209 -- ** TransferOptions
209 -- ** TransferOptions
210 , TransferOptions
210 , TransferOptions
@@ -245,7 +245,7 @@ module Network.Google.StorageTransfer
245 -- ** OperationResponse
245 -- ** OperationResponse
246 , OperationResponse
246 , OperationResponse
247 , operationResponse
247 , operationResponse
248− , orProperties
248+ , orAddtional
249
249
250 -- ** ResumeTransferOperationRequest
250 -- ** ResumeTransferOperationRequest
251 , ResumeTransferOperationRequest
251 , ResumeTransferOperationRequest
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types.hs+3−3
@@ -78,7 +78,7 @@ module Network.Google.StorageTransfer.Types
78 -- * StatusDetailsItem
78 -- * StatusDetailsItem
79 , StatusDetailsItem
79 , StatusDetailsItem
80 , statusDetailsItem
80 , statusDetailsItem
81− , sdiProperties
81+ , sdiAddtional
82
82
83 -- * Date
83 -- * Date
84 , Date
84 , Date
@@ -160,7 +160,7 @@ module Network.Google.StorageTransfer.Types
160 -- * OperationMetadata
160 -- * OperationMetadata
161 , OperationMetadata
161 , OperationMetadata
162 , operationMetadata
162 , operationMetadata
163− , omProperties
163+ , omAddtional
164
164
165 -- * TransferOptions
165 -- * TransferOptions
166 , TransferOptions
166 , TransferOptions
@@ -201,7 +201,7 @@ module Network.Google.StorageTransfer.Types
201 -- * OperationResponse
201 -- * OperationResponse
202 , OperationResponse
202 , OperationResponse
203 , operationResponse
203 , operationResponse
204− , orProperties
204+ , orAddtional
205
205
206 -- * ResumeTransferOperationRequest
206 -- * ResumeTransferOperationRequest
207 , ResumeTransferOperationRequest
207 , ResumeTransferOperationRequest
gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+27−28
@@ -578,27 +578,26 @@ instance ToJSON GoogleServiceAccount where
578--
578--
579-- /See:/ 'statusDetailsItem' smart constructor.
579-- /See:/ 'statusDetailsItem' smart constructor.
580newtype StatusDetailsItem = StatusDetailsItem
580newtype StatusDetailsItem = StatusDetailsItem
581− { _sdiProperties :: HashMap Text JSONValue
581+ { _sdiAddtional :: HashMap Text JSONValue
582 } deriving (Eq,Show,Data,Typeable,Generic)
582 } deriving (Eq,Show,Data,Typeable,Generic)
583
583
584-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
584-- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.
585--
585--
586-- Use one of the following lenses to modify other fields as desired:
586-- Use one of the following lenses to modify other fields as desired:
587--
587--
588−-- * 'sdiProperties'
588+-- * 'sdiAddtional'
589statusDetailsItem
589statusDetailsItem
590− :: HashMap Text JSONValue -- ^ 'properties'
590+ :: HashMap Text JSONValue -- ^ 'addtional'
591 -> StatusDetailsItem
591 -> StatusDetailsItem
592−statusDetailsItem pSdiProperties_ =
592+statusDetailsItem pSdiAddtional_ =
593 StatusDetailsItem
593 StatusDetailsItem
594− { _sdiProperties = pSdiProperties_
594+ { _sdiAddtional = pSdiAddtional_
595 }
595 }
596
596
597-- | Properties of the object. Contains field \'ype with type URL.
597-- | Properties of the object. Contains field \'ype with type URL.
598−sdiProperties :: Lens' StatusDetailsItem (HashMap Text JSONValue)
598+sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)
599−sdiProperties
599+sdiAddtional
600− = lens _sdiProperties
600+ = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})
601− (\ s a -> s{_sdiProperties = a})
602
601
603instance FromJSON StatusDetailsItem where
602instance FromJSON StatusDetailsItem where
604 parseJSON
603 parseJSON
@@ -606,7 +605,7 @@ instance FromJSON StatusDetailsItem where
606 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
605 (\ o -> StatusDetailsItem <$> (parseJSONObject o))
607
606
608instance ToJSON StatusDetailsItem where
607instance ToJSON StatusDetailsItem where
609− toJSON = toJSON . _sdiProperties
608+ toJSON = toJSON . _sdiAddtional
610
609
611-- | Represents a whole calendar date, e.g. date of birth. The time of day
610-- | Represents a whole calendar date, e.g. date of birth. The time of day
612-- and time zone are either specified elsewhere or are not significant. The
611-- and time zone are either specified elsewhere or are not significant. The
@@ -1392,26 +1391,26 @@ instance ToJSON ErrorLogEntry where
1392--
1391--
1393-- /See:/ 'operationMetadata' smart constructor.
1392-- /See:/ 'operationMetadata' smart constructor.
1394newtype OperationMetadata = OperationMetadata
1393newtype OperationMetadata = OperationMetadata
1395− { _omProperties :: HashMap Text JSONValue
1394+ { _omAddtional :: HashMap Text JSONValue
1396 } deriving (Eq,Show,Data,Typeable,Generic)
1395 } deriving (Eq,Show,Data,Typeable,Generic)
1397
1396
1398-- | Creates a value of 'OperationMetadata' with the minimum fields required to make a request.
1397-- | Creates a value of 'OperationMetadata' with the minimum fields required to make a request.
1399--
1398--
1400-- Use one of the following lenses to modify other fields as desired:
1399-- Use one of the following lenses to modify other fields as desired:
1401--
1400--
1402−-- * 'omProperties'
1401+-- * 'omAddtional'
1403operationMetadata
1402operationMetadata
1404− :: HashMap Text JSONValue -- ^ 'properties'
1403+ :: HashMap Text JSONValue -- ^ 'addtional'
1405 -> OperationMetadata
1404 -> OperationMetadata
1406−operationMetadata pOmProperties_ =
1405+operationMetadata pOmAddtional_ =
1407 OperationMetadata
1406 OperationMetadata
1408− { _omProperties = pOmProperties_
1407+ { _omAddtional = pOmAddtional_
1409 }
1408 }
1410
1409
1411-- | Properties of the object. Contains field \'ype with type URL.
1410-- | Properties of the object. Contains field \'ype with type URL.
1412−omProperties :: Lens' OperationMetadata (HashMap Text JSONValue)
1411+omAddtional :: Lens' OperationMetadata (HashMap Text JSONValue)
1413−omProperties
1412+omAddtional
1414− = lens _omProperties (\ s a -> s{_omProperties = a})
1413+ = lens _omAddtional (\ s a -> s{_omAddtional = a})
1415
1414
1416instance FromJSON OperationMetadata where
1415instance FromJSON OperationMetadata where
1417 parseJSON
1416 parseJSON
@@ -1419,7 +1418,7 @@ instance FromJSON OperationMetadata where
1419 (\ o -> OperationMetadata <$> (parseJSONObject o))
1418 (\ o -> OperationMetadata <$> (parseJSONObject o))
1420
1419
1421instance ToJSON OperationMetadata where
1420instance ToJSON OperationMetadata where
1422− toJSON = toJSON . _omProperties
1421+ toJSON = toJSON . _omAddtional
1423
1422
1424-- | TransferOptions uses three boolean parameters to define the actions to
1423-- | TransferOptions uses three boolean parameters to define the actions to
1425-- be performed on objects in a transfer.
1424-- be performed on objects in a transfer.
@@ -1784,26 +1783,26 @@ instance ToJSON ListTransferJobsResponse where
1784--
1783--
1785-- /See:/ 'operationResponse' smart constructor.
1784-- /See:/ 'operationResponse' smart constructor.
1786newtype OperationResponse = OperationResponse
1785newtype OperationResponse = OperationResponse
1787− { _orProperties :: HashMap Text JSONValue
1786+ { _orAddtional :: HashMap Text JSONValue
1788 } deriving (Eq,Show,Data,Typeable,Generic)
1787 } deriving (Eq,Show,Data,Typeable,Generic)
1789
1788
1790-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
1789-- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.
1791--
1790--
1792-- Use one of the following lenses to modify other fields as desired:
1791-- Use one of the following lenses to modify other fields as desired:
1793--
1792--
1794−-- * 'orProperties'
1793+-- * 'orAddtional'
1795operationResponse
1794operationResponse
1796− :: HashMap Text JSONValue -- ^ 'properties'
1795+ :: HashMap Text JSONValue -- ^ 'addtional'
1797 -> OperationResponse
1796 -> OperationResponse
1798−operationResponse pOrProperties_ =
1797+operationResponse pOrAddtional_ =
1799 OperationResponse
1798 OperationResponse
1800− { _orProperties = pOrProperties_
1799+ { _orAddtional = pOrAddtional_
1801 }
1800 }
1802
1801
1803-- | Properties of the object. Contains field \'ype with type URL.
1802-- | Properties of the object. Contains field \'ype with type URL.
1804−orProperties :: Lens' OperationResponse (HashMap Text JSONValue)
1803+orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)
1805−orProperties
1804+orAddtional
1806− = lens _orProperties (\ s a -> s{_orProperties = a})
1805+ = lens _orAddtional (\ s a -> s{_orAddtional = a})
1807
1806
1808instance FromJSON OperationResponse where
1807instance FromJSON OperationResponse where
1809 parseJSON
1808 parseJSON
@@ -1811,7 +1810,7 @@ instance FromJSON OperationResponse where
1811 (\ o -> OperationResponse <$> (parseJSONObject o))
1810 (\ o -> OperationResponse <$> (parseJSONObject o))
1812
1811
1813instance ToJSON OperationResponse where
1812instance ToJSON OperationResponse where
1814− toJSON = toJSON . _orProperties
1813+ toJSON = toJSON . _orAddtional
1815
1814
1816-- | Request passed to ResumeTransferOperation.
1815-- | Request passed to ResumeTransferOperation.
1817--
1816--
gogol-storage/gen/Network/Google/Storage.hs+2−2
@@ -169,7 +169,7 @@ module Network.Google.Storage
169 -- ** ObjectMetadata
169 -- ** ObjectMetadata
170 , ObjectMetadata
170 , ObjectMetadata
171 , objectMetadata
171 , objectMetadata
172− , omProperties
172+ , omAddtional
173
173
174 -- ** ObjectsPatchPredefinedACL
174 -- ** ObjectsPatchPredefinedACL
175 , ObjectsPatchPredefinedACL (..)
175 , ObjectsPatchPredefinedACL (..)
@@ -316,7 +316,7 @@ module Network.Google.Storage
316 -- ** ChannelParams
316 -- ** ChannelParams
317 , ChannelParams
317 , ChannelParams
318 , channelParams
318 , channelParams
319− , cpProperties
319+ , cpAddtional
320
320
321 -- ** BucketsListProjection
321 -- ** BucketsListProjection
322 , BucketsListProjection (..)
322 , BucketsListProjection (..)
gogol-storage/gen/Network/Google/Storage/Types.hs+2−2
@@ -57,7 +57,7 @@ module Network.Google.Storage.Types
57 -- * ObjectMetadata
57 -- * ObjectMetadata
58 , ObjectMetadata
58 , ObjectMetadata
59 , objectMetadata
59 , objectMetadata
60− , omProperties
60+ , omAddtional
61
61
62 -- * ObjectsPatchPredefinedACL
62 -- * ObjectsPatchPredefinedACL
63 , ObjectsPatchPredefinedACL (..)
63 , ObjectsPatchPredefinedACL (..)
@@ -204,7 +204,7 @@ module Network.Google.Storage.Types
204 -- * ChannelParams
204 -- * ChannelParams
205 , ChannelParams
205 , ChannelParams
206 , channelParams
206 , channelParams
207− , cpProperties
207+ , cpAddtional
208
208
209 -- * BucketsListProjection
209 -- * BucketsListProjection
210 , BucketsListProjection (..)
210 , BucketsListProjection (..)
gogol-storage/gen/Network/Google/Storage/Types/Product.hs+18−18
@@ -214,26 +214,26 @@ instance ToJSON BucketLogging where
214--
214--
215-- /See:/ 'objectMetadata' smart constructor.
215-- /See:/ 'objectMetadata' smart constructor.
216newtype ObjectMetadata = ObjectMetadata
216newtype ObjectMetadata = ObjectMetadata
217− { _omProperties :: HashMap Text Text
217+ { _omAddtional :: HashMap Text Text
218 } deriving (Eq,Show,Data,Typeable,Generic)
218 } deriving (Eq,Show,Data,Typeable,Generic)
219
219
220-- | Creates a value of 'ObjectMetadata' with the minimum fields required to make a request.
220-- | Creates a value of 'ObjectMetadata' with the minimum fields required to make a request.
221--
221--
222-- Use one of the following lenses to modify other fields as desired:
222-- Use one of the following lenses to modify other fields as desired:
223--
223--
224−-- * 'omProperties'
224+-- * 'omAddtional'
225objectMetadata
225objectMetadata
226− :: HashMap Text Text -- ^ 'properties'
226+ :: HashMap Text Text -- ^ 'addtional'
227 -> ObjectMetadata
227 -> ObjectMetadata
228−objectMetadata pOmProperties_ =
228+objectMetadata pOmAddtional_ =
229 ObjectMetadata
229 ObjectMetadata
230− { _omProperties = pOmProperties_
230+ { _omAddtional = pOmAddtional_
231 }
231 }
232
232
233-- | An individual metadata entry.
233-- | An individual metadata entry.
234−omProperties :: Lens' ObjectMetadata (HashMap Text Text)
234+omAddtional :: Lens' ObjectMetadata (HashMap Text Text)
235−omProperties
235+omAddtional
236− = lens _omProperties (\ s a -> s{_omProperties = a})
236+ = lens _omAddtional (\ s a -> s{_omAddtional = a})
237
237
238instance FromJSON ObjectMetadata where
238instance FromJSON ObjectMetadata where
239 parseJSON
239 parseJSON
@@ -241,7 +241,7 @@ instance FromJSON ObjectMetadata where
241 (\ o -> ObjectMetadata <$> (parseJSONObject o))
241 (\ o -> ObjectMetadata <$> (parseJSONObject o))
242
242
243instance ToJSON ObjectMetadata where
243instance ToJSON ObjectMetadata where
244− toJSON = toJSON . _omProperties
244+ toJSON = toJSON . _omAddtional
245
245
246-- | The condition(s) under which the action will be taken.
246-- | The condition(s) under which the action will be taken.
247--
247--
@@ -1205,26 +1205,26 @@ instance ToJSON ComposeRequestSourceObjectsItem where
1205--
1205--
1206-- /See:/ 'channelParams' smart constructor.
1206-- /See:/ 'channelParams' smart constructor.
1207newtype ChannelParams = ChannelParams
1207newtype ChannelParams = ChannelParams
1208− { _cpProperties :: HashMap Text Text
1208+ { _cpAddtional :: HashMap Text Text
1209 } deriving (Eq,Show,Data,Typeable,Generic)
1209 } deriving (Eq,Show,Data,Typeable,Generic)
1210
1210
1211-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
1211-- | Creates a value of 'ChannelParams' with the minimum fields required to make a request.
1212--
1212--
1213-- Use one of the following lenses to modify other fields as desired:
1213-- Use one of the following lenses to modify other fields as desired:
1214--
1214--
1215−-- * 'cpProperties'
1215+-- * 'cpAddtional'
1216channelParams
1216channelParams
1217− :: HashMap Text Text -- ^ 'properties'
1217+ :: HashMap Text Text -- ^ 'addtional'
1218 -> ChannelParams
1218 -> ChannelParams
1219−channelParams pCpProperties_ =
1219+channelParams pCpAddtional_ =
1220 ChannelParams
1220 ChannelParams
1221− { _cpProperties = pCpProperties_
1221+ { _cpAddtional = pCpAddtional_
1222 }
1222 }
1223
1223
1224-- | Declares a new parameter by name.
1224-- | Declares a new parameter by name.
1225−cpProperties :: Lens' ChannelParams (HashMap Text Text)
1225+cpAddtional :: Lens' ChannelParams (HashMap Text Text)
1226−cpProperties
1226+cpAddtional
1227− = lens _cpProperties (\ s a -> s{_cpProperties = a})
1227+ = lens _cpAddtional (\ s a -> s{_cpAddtional = a})
1228
1228
1229instance FromJSON ChannelParams where
1229instance FromJSON ChannelParams where
1230 parseJSON
1230 parseJSON
@@ -1232,7 +1232,7 @@ instance FromJSON ChannelParams where
1232 (\ o -> ChannelParams <$> (parseJSONObject o))
1232 (\ o -> ChannelParams <$> (parseJSONObject o))
1233
1233
1234instance ToJSON ChannelParams where
1234instance ToJSON ChannelParams where
1235− toJSON = toJSON . _cpProperties
1235+ toJSON = toJSON . _cpAddtional
1236
1236
1237-- | An object.
1237-- | An object.
1238--
1238--
gogol-youtube/gen/Network/Google/YouTube.hs+4−4
@@ -860,7 +860,7 @@ module Network.Google.YouTube
860 -- ** ChannelLocalizations
860 -- ** ChannelLocalizations
861 , ChannelLocalizations
861 , ChannelLocalizations
862 , channelLocalizations
862 , channelLocalizations
863− , clProperties
863+ , clAddtional
864
864
865 -- ** PlayListSnippet
865 -- ** PlayListSnippet
866 , PlayListSnippet
866 , PlayListSnippet
@@ -920,7 +920,7 @@ module Network.Google.YouTube
920 -- ** PlayListLocalizations
920 -- ** PlayListLocalizations
921 , PlayListLocalizations
921 , PlayListLocalizations
922 , playListLocalizations
922 , playListLocalizations
923− , pllProperties
923+ , pllAddtional
924
924
925 -- ** ContentRatingCzfilmRating
925 -- ** ContentRatingCzfilmRating
926 , ContentRatingCzfilmRating (..)
926 , ContentRatingCzfilmRating (..)
@@ -1034,7 +1034,7 @@ module Network.Google.YouTube
1034 -- ** VideoLocalizations
1034 -- ** VideoLocalizations
1035 , VideoLocalizations
1035 , VideoLocalizations
1036 , videoLocalizations
1036 , videoLocalizations
1037− , vlProperties
1037+ , vlAddtional
1038
1038
1039 -- ** ChannelSectionContentDetails
1039 -- ** ChannelSectionContentDetails
1040 , ChannelSectionContentDetails
1040 , ChannelSectionContentDetails
@@ -1340,7 +1340,7 @@ module Network.Google.YouTube
1340 -- ** ChannelSectionLocalizations
1340 -- ** ChannelSectionLocalizations
1341 , ChannelSectionLocalizations
1341 , ChannelSectionLocalizations
1342 , channelSectionLocalizations
1342 , channelSectionLocalizations
1343− , cslProperties
1343+ , cslAddtional
1344
1344
1345 -- ** ContentRatingIlfilmRating
1345 -- ** ContentRatingIlfilmRating
1346 , ContentRatingIlfilmRating (..)
1346 , ContentRatingIlfilmRating (..)
gogol-youtube/gen/Network/Google/YouTube/Types.hs+4−4
@@ -667,7 +667,7 @@ module Network.Google.YouTube.Types
667 -- * ChannelLocalizations
667 -- * ChannelLocalizations
668 , ChannelLocalizations
668 , ChannelLocalizations
669 , channelLocalizations
669 , channelLocalizations
670− , clProperties
670+ , clAddtional
671
671
672 -- * PlayListSnippet
672 -- * PlayListSnippet
673 , PlayListSnippet
673 , PlayListSnippet
@@ -727,7 +727,7 @@ module Network.Google.YouTube.Types
727 -- * PlayListLocalizations
727 -- * PlayListLocalizations
728 , PlayListLocalizations
728 , PlayListLocalizations
729 , playListLocalizations
729 , playListLocalizations
730− , pllProperties
730+ , pllAddtional
731
731
732 -- * ContentRatingCzfilmRating
732 -- * ContentRatingCzfilmRating
733 , ContentRatingCzfilmRating (..)
733 , ContentRatingCzfilmRating (..)
@@ -841,7 +841,7 @@ module Network.Google.YouTube.Types
841 -- * VideoLocalizations
841 -- * VideoLocalizations
842 , VideoLocalizations
842 , VideoLocalizations
843 , videoLocalizations
843 , videoLocalizations
844− , vlProperties
844+ , vlAddtional
845
845
846 -- * ChannelSectionContentDetails
846 -- * ChannelSectionContentDetails
847 , ChannelSectionContentDetails
847 , ChannelSectionContentDetails
@@ -1147,7 +1147,7 @@ module Network.Google.YouTube.Types
1147 -- * ChannelSectionLocalizations
1147 -- * ChannelSectionLocalizations
1148 , ChannelSectionLocalizations
1148 , ChannelSectionLocalizations
1149 , channelSectionLocalizations
1149 , channelSectionLocalizations
1150− , cslProperties
1150+ , cslAddtional
1151
1151
1152 -- * ContentRatingIlfilmRating
1152 -- * ContentRatingIlfilmRating
1153 , ContentRatingIlfilmRating (..)
1153 , ContentRatingIlfilmRating (..)
gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+36−38
@@ -4808,26 +4808,26 @@ instance ToJSON LiveStreamListResponse where
4808--
4808--
4809-- /See:/ 'channelLocalizations' smart constructor.
4809-- /See:/ 'channelLocalizations' smart constructor.
4810newtype ChannelLocalizations = ChannelLocalizations
4810newtype ChannelLocalizations = ChannelLocalizations
4811− { _clProperties :: HashMap Text ChannelLocalization
4811+ { _clAddtional :: HashMap Text ChannelLocalization
4812 } deriving (Eq,Show,Data,Typeable,Generic)
4812 } deriving (Eq,Show,Data,Typeable,Generic)
4813
4813
4814-- | Creates a value of 'ChannelLocalizations' with the minimum fields required to make a request.
4814-- | Creates a value of 'ChannelLocalizations' with the minimum fields required to make a request.
4815--
4815--
4816-- Use one of the following lenses to modify other fields as desired:
4816-- Use one of the following lenses to modify other fields as desired:
4817--
4817--
4818−-- * 'clProperties'
4818+-- * 'clAddtional'
4819channelLocalizations
4819channelLocalizations
4820− :: HashMap Text ChannelLocalization -- ^ 'properties'
4820+ :: HashMap Text ChannelLocalization -- ^ 'addtional'
4821 -> ChannelLocalizations
4821 -> ChannelLocalizations
4822−channelLocalizations pClProperties_ =
4822+channelLocalizations pClAddtional_ =
4823 ChannelLocalizations
4823 ChannelLocalizations
4824− { _clProperties = pClProperties_
4824+ { _clAddtional = pClAddtional_
4825 }
4825 }
4826
4826
4827-- | The language tag, using string since map_key require simple types.
4827-- | The language tag, using string since map_key require simple types.
4828−clProperties :: Lens' ChannelLocalizations (HashMap Text ChannelLocalization)
4828+clAddtional :: Lens' ChannelLocalizations (HashMap Text ChannelLocalization)
4829−clProperties
4829+clAddtional
4830− = lens _clProperties (\ s a -> s{_clProperties = a})
4830+ = lens _clAddtional (\ s a -> s{_clAddtional = a})
4831
4831
4832instance FromJSON ChannelLocalizations where
4832instance FromJSON ChannelLocalizations where
4833 parseJSON
4833 parseJSON
@@ -4835,7 +4835,7 @@ instance FromJSON ChannelLocalizations where
4835 (\ o -> ChannelLocalizations <$> (parseJSONObject o))
4835 (\ o -> ChannelLocalizations <$> (parseJSONObject o))
4836
4836
4837instance ToJSON ChannelLocalizations where
4837instance ToJSON ChannelLocalizations where
4838− toJSON = toJSON . _clProperties
4838+ toJSON = toJSON . _clAddtional
4839
4839
4840-- | Basic details about a playlist, including title, description and
4840-- | Basic details about a playlist, including title, description and
4841-- thumbnails.
4841-- thumbnails.
@@ -5303,27 +5303,26 @@ instance ToJSON InvideoTiming where
5303--
5303--
5304-- /See:/ 'playListLocalizations' smart constructor.
5304-- /See:/ 'playListLocalizations' smart constructor.
5305newtype PlayListLocalizations = PlayListLocalizations
5305newtype PlayListLocalizations = PlayListLocalizations
5306− { _pllProperties :: HashMap Text PlayListLocalization
5306+ { _pllAddtional :: HashMap Text PlayListLocalization
5307 } deriving (Eq,Show,Data,Typeable,Generic)
5307 } deriving (Eq,Show,Data,Typeable,Generic)
5308
5308
5309-- | Creates a value of 'PlayListLocalizations' with the minimum fields required to make a request.
5309-- | Creates a value of 'PlayListLocalizations' with the minimum fields required to make a request.
5310--
5310--
5311-- Use one of the following lenses to modify other fields as desired:
5311-- Use one of the following lenses to modify other fields as desired:
5312--
5312--
5313−-- * 'pllProperties'
5313+-- * 'pllAddtional'
5314playListLocalizations
5314playListLocalizations
5315− :: HashMap Text PlayListLocalization -- ^ 'properties'
5315+ :: HashMap Text PlayListLocalization -- ^ 'addtional'
5316 -> PlayListLocalizations
5316 -> PlayListLocalizations
5317−playListLocalizations pPllProperties_ =
5317+playListLocalizations pPllAddtional_ =
5318 PlayListLocalizations
5318 PlayListLocalizations
5319− { _pllProperties = pPllProperties_
5319+ { _pllAddtional = pPllAddtional_
5320 }
5320 }
5321
5321
5322-- | The language tag, using string since map_key require simple types.
5322-- | The language tag, using string since map_key require simple types.
5323−pllProperties :: Lens' PlayListLocalizations (HashMap Text PlayListLocalization)
5323+pllAddtional :: Lens' PlayListLocalizations (HashMap Text PlayListLocalization)
5324−pllProperties
5324+pllAddtional
5325− = lens _pllProperties
5325+ = lens _pllAddtional (\ s a -> s{_pllAddtional = a})
5326− (\ s a -> s{_pllProperties = a})
5327
5326
5328instance FromJSON PlayListLocalizations where
5327instance FromJSON PlayListLocalizations where
5329 parseJSON
5328 parseJSON
@@ -5332,7 +5331,7 @@ instance FromJSON PlayListLocalizations where
5332 PlayListLocalizations <$> (parseJSONObject o))
5331 PlayListLocalizations <$> (parseJSONObject o))
5333
5332
5334instance ToJSON PlayListLocalizations where
5333instance ToJSON PlayListLocalizations where
5335− toJSON = toJSON . _pllProperties
5334+ toJSON = toJSON . _pllAddtional
5336
5335
5337-- | Video processing progress and completion time estimate.
5336-- | Video processing progress and completion time estimate.
5338--
5337--
@@ -6086,26 +6085,26 @@ instance ToJSON VideoCategory where
6086--
6085--
6087-- /See:/ 'videoLocalizations' smart constructor.
6086-- /See:/ 'videoLocalizations' smart constructor.
6088newtype VideoLocalizations = VideoLocalizations
6087newtype VideoLocalizations = VideoLocalizations
6089− { _vlProperties :: HashMap Text VideoLocalization
6088+ { _vlAddtional :: HashMap Text VideoLocalization
6090 } deriving (Eq,Show,Data,Typeable,Generic)
6089 } deriving (Eq,Show,Data,Typeable,Generic)
6091
6090
6092-- | Creates a value of 'VideoLocalizations' with the minimum fields required to make a request.
6091-- | Creates a value of 'VideoLocalizations' with the minimum fields required to make a request.
6093--
6092--
6094-- Use one of the following lenses to modify other fields as desired:
6093-- Use one of the following lenses to modify other fields as desired:
6095--
6094--
6096−-- * 'vlProperties'
6095+-- * 'vlAddtional'
6097videoLocalizations
6096videoLocalizations
6098− :: HashMap Text VideoLocalization -- ^ 'properties'
6097+ :: HashMap Text VideoLocalization -- ^ 'addtional'
6099 -> VideoLocalizations
6098 -> VideoLocalizations
6100−videoLocalizations pVlProperties_ =
6099+videoLocalizations pVlAddtional_ =
6101 VideoLocalizations
6100 VideoLocalizations
6102− { _vlProperties = pVlProperties_
6101+ { _vlAddtional = pVlAddtional_
6103 }
6102 }
6104
6103
6105-- | The language tag, using string since map_key require simple types.
6104-- | The language tag, using string since map_key require simple types.
6106−vlProperties :: Lens' VideoLocalizations (HashMap Text VideoLocalization)
6105+vlAddtional :: Lens' VideoLocalizations (HashMap Text VideoLocalization)
6107−vlProperties
6106+vlAddtional
6108− = lens _vlProperties (\ s a -> s{_vlProperties = a})
6107+ = lens _vlAddtional (\ s a -> s{_vlAddtional = a})
6109
6108
6110instance FromJSON VideoLocalizations where
6109instance FromJSON VideoLocalizations where
6111 parseJSON
6110 parseJSON
@@ -6113,7 +6112,7 @@ instance FromJSON VideoLocalizations where
6113 (\ o -> VideoLocalizations <$> (parseJSONObject o))
6112 (\ o -> VideoLocalizations <$> (parseJSONObject o))
6114
6113
6115instance ToJSON VideoLocalizations where
6114instance ToJSON VideoLocalizations where
6116− toJSON = toJSON . _vlProperties
6115+ toJSON = toJSON . _vlAddtional
6117
6116
6118-- | Details about a channelsection, including playlists and channels.
6117-- | Details about a channelsection, including playlists and channels.
6119--
6118--
@@ -8260,27 +8259,26 @@ instance ToJSON LiveStreamHealthStatus where
8260--
8259--
8261-- /See:/ 'channelSectionLocalizations' smart constructor.
8260-- /See:/ 'channelSectionLocalizations' smart constructor.
8262newtype ChannelSectionLocalizations = ChannelSectionLocalizations
8261newtype ChannelSectionLocalizations = ChannelSectionLocalizations
8263− { _cslProperties :: HashMap Text ChannelSectionLocalization
8262+ { _cslAddtional :: HashMap Text ChannelSectionLocalization
8264 } deriving (Eq,Show,Data,Typeable,Generic)
8263 } deriving (Eq,Show,Data,Typeable,Generic)
8265
8264
8266-- | Creates a value of 'ChannelSectionLocalizations' with the minimum fields required to make a request.
8265-- | Creates a value of 'ChannelSectionLocalizations' with the minimum fields required to make a request.
8267--
8266--
8268-- Use one of the following lenses to modify other fields as desired:
8267-- Use one of the following lenses to modify other fields as desired:
8269--
8268--
8270−-- * 'cslProperties'
8269+-- * 'cslAddtional'
8271channelSectionLocalizations
8270channelSectionLocalizations
8272− :: HashMap Text ChannelSectionLocalization -- ^ 'properties'
8271+ :: HashMap Text ChannelSectionLocalization -- ^ 'addtional'
8273 -> ChannelSectionLocalizations
8272 -> ChannelSectionLocalizations
8274−channelSectionLocalizations pCslProperties_ =
8273+channelSectionLocalizations pCslAddtional_ =
8275 ChannelSectionLocalizations
8274 ChannelSectionLocalizations
8276− { _cslProperties = pCslProperties_
8275+ { _cslAddtional = pCslAddtional_
8277 }
8276 }
8278
8277
8279-- | The language tag, using string since map_key require simple types.
8278-- | The language tag, using string since map_key require simple types.
8280−cslProperties :: Lens' ChannelSectionLocalizations (HashMap Text ChannelSectionLocalization)
8279+cslAddtional :: Lens' ChannelSectionLocalizations (HashMap Text ChannelSectionLocalization)
8281−cslProperties
8280+cslAddtional
8282− = lens _cslProperties
8281+ = lens _cslAddtional (\ s a -> s{_cslAddtional = a})
8283− (\ s a -> s{_cslProperties = a})
8284
8282
8285instance FromJSON ChannelSectionLocalizations where
8283instance FromJSON ChannelSectionLocalizations where
8286 parseJSON
8284 parseJSON
@@ -8289,7 +8287,7 @@ instance FromJSON ChannelSectionLocalizations where
8289 ChannelSectionLocalizations <$> (parseJSONObject o))
8287 ChannelSectionLocalizations <$> (parseJSONObject o))
8290
8288
8291instance ToJSON ChannelSectionLocalizations where
8289instance ToJSON ChannelSectionLocalizations where
8292− toJSON = toJSON . _cslProperties
8290+ toJSON = toJSON . _cslAddtional
8293
8291
8294--
8292--
8295-- /See:/ 'subscriptionListResponse' smart constructor.
8293-- /See:/ 'subscriptionListResponse' smart constructor.