{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.FinSpaceData.UpdatePermissionGroup
(
UpdatePermissionGroup (..),
newUpdatePermissionGroup,
updatePermissionGroup_applicationPermissions,
updatePermissionGroup_clientToken,
updatePermissionGroup_description,
updatePermissionGroup_name,
updatePermissionGroup_permissionGroupId,
UpdatePermissionGroupResponse (..),
newUpdatePermissionGroupResponse,
updatePermissionGroupResponse_permissionGroupId,
updatePermissionGroupResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.FinSpaceData.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data UpdatePermissionGroup = UpdatePermissionGroup'
{
UpdatePermissionGroup -> Maybe [ApplicationPermission]
applicationPermissions :: Prelude.Maybe [ApplicationPermission],
UpdatePermissionGroup -> Maybe Text
clientToken :: Prelude.Maybe Prelude.Text,
UpdatePermissionGroup -> Maybe (Sensitive Text)
description :: Prelude.Maybe (Data.Sensitive Prelude.Text),
UpdatePermissionGroup -> Maybe (Sensitive Text)
name :: Prelude.Maybe (Data.Sensitive Prelude.Text),
UpdatePermissionGroup -> Text
permissionGroupId :: Prelude.Text
}
deriving (UpdatePermissionGroup -> UpdatePermissionGroup -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdatePermissionGroup -> UpdatePermissionGroup -> Bool
$c/= :: UpdatePermissionGroup -> UpdatePermissionGroup -> Bool
== :: UpdatePermissionGroup -> UpdatePermissionGroup -> Bool
$c== :: UpdatePermissionGroup -> UpdatePermissionGroup -> Bool
Prelude.Eq, Int -> UpdatePermissionGroup -> ShowS
[UpdatePermissionGroup] -> ShowS
UpdatePermissionGroup -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdatePermissionGroup] -> ShowS
$cshowList :: [UpdatePermissionGroup] -> ShowS
show :: UpdatePermissionGroup -> String
$cshow :: UpdatePermissionGroup -> String
showsPrec :: Int -> UpdatePermissionGroup -> ShowS
$cshowsPrec :: Int -> UpdatePermissionGroup -> ShowS
Prelude.Show, forall x. Rep UpdatePermissionGroup x -> UpdatePermissionGroup
forall x. UpdatePermissionGroup -> Rep UpdatePermissionGroup x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UpdatePermissionGroup x -> UpdatePermissionGroup
$cfrom :: forall x. UpdatePermissionGroup -> Rep UpdatePermissionGroup x
Prelude.Generic)
newUpdatePermissionGroup ::
Prelude.Text ->
UpdatePermissionGroup
newUpdatePermissionGroup :: Text -> UpdatePermissionGroup
newUpdatePermissionGroup Text
pPermissionGroupId_ =
UpdatePermissionGroup'
{ $sel:applicationPermissions:UpdatePermissionGroup' :: Maybe [ApplicationPermission]
applicationPermissions =
forall a. Maybe a
Prelude.Nothing,
$sel:clientToken:UpdatePermissionGroup' :: Maybe Text
clientToken = forall a. Maybe a
Prelude.Nothing,
$sel:description:UpdatePermissionGroup' :: Maybe (Sensitive Text)
description = forall a. Maybe a
Prelude.Nothing,
$sel:name:UpdatePermissionGroup' :: Maybe (Sensitive Text)
name = forall a. Maybe a
Prelude.Nothing,
$sel:permissionGroupId:UpdatePermissionGroup' :: Text
permissionGroupId = Text
pPermissionGroupId_
}
updatePermissionGroup_applicationPermissions :: Lens.Lens' UpdatePermissionGroup (Prelude.Maybe [ApplicationPermission])
updatePermissionGroup_applicationPermissions :: Lens' UpdatePermissionGroup (Maybe [ApplicationPermission])
updatePermissionGroup_applicationPermissions = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdatePermissionGroup' {Maybe [ApplicationPermission]
applicationPermissions :: Maybe [ApplicationPermission]
$sel:applicationPermissions:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe [ApplicationPermission]
applicationPermissions} -> Maybe [ApplicationPermission]
applicationPermissions) (\s :: UpdatePermissionGroup
s@UpdatePermissionGroup' {} Maybe [ApplicationPermission]
a -> UpdatePermissionGroup
s {$sel:applicationPermissions:UpdatePermissionGroup' :: Maybe [ApplicationPermission]
applicationPermissions = Maybe [ApplicationPermission]
a} :: UpdatePermissionGroup) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
updatePermissionGroup_clientToken :: Lens.Lens' UpdatePermissionGroup (Prelude.Maybe Prelude.Text)
updatePermissionGroup_clientToken :: Lens' UpdatePermissionGroup (Maybe Text)
updatePermissionGroup_clientToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdatePermissionGroup' {Maybe Text
clientToken :: Maybe Text
$sel:clientToken:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe Text
clientToken} -> Maybe Text
clientToken) (\s :: UpdatePermissionGroup
s@UpdatePermissionGroup' {} Maybe Text
a -> UpdatePermissionGroup
s {$sel:clientToken:UpdatePermissionGroup' :: Maybe Text
clientToken = Maybe Text
a} :: UpdatePermissionGroup)
updatePermissionGroup_description :: Lens.Lens' UpdatePermissionGroup (Prelude.Maybe Prelude.Text)
updatePermissionGroup_description :: Lens' UpdatePermissionGroup (Maybe Text)
updatePermissionGroup_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdatePermissionGroup' {Maybe (Sensitive Text)
description :: Maybe (Sensitive Text)
$sel:description:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
description} -> Maybe (Sensitive Text)
description) (\s :: UpdatePermissionGroup
s@UpdatePermissionGroup' {} Maybe (Sensitive Text)
a -> UpdatePermissionGroup
s {$sel:description:UpdatePermissionGroup' :: Maybe (Sensitive Text)
description = Maybe (Sensitive Text)
a} :: UpdatePermissionGroup) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall a. Iso' (Sensitive a) a
Data._Sensitive
updatePermissionGroup_name :: Lens.Lens' UpdatePermissionGroup (Prelude.Maybe Prelude.Text)
updatePermissionGroup_name :: Lens' UpdatePermissionGroup (Maybe Text)
updatePermissionGroup_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdatePermissionGroup' {Maybe (Sensitive Text)
name :: Maybe (Sensitive Text)
$sel:name:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
name} -> Maybe (Sensitive Text)
name) (\s :: UpdatePermissionGroup
s@UpdatePermissionGroup' {} Maybe (Sensitive Text)
a -> UpdatePermissionGroup
s {$sel:name:UpdatePermissionGroup' :: Maybe (Sensitive Text)
name = Maybe (Sensitive Text)
a} :: UpdatePermissionGroup) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall a. Iso' (Sensitive a) a
Data._Sensitive
updatePermissionGroup_permissionGroupId :: Lens.Lens' UpdatePermissionGroup Prelude.Text
updatePermissionGroup_permissionGroupId :: Lens' UpdatePermissionGroup Text
updatePermissionGroup_permissionGroupId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdatePermissionGroup' {Text
permissionGroupId :: Text
$sel:permissionGroupId:UpdatePermissionGroup' :: UpdatePermissionGroup -> Text
permissionGroupId} -> Text
permissionGroupId) (\s :: UpdatePermissionGroup
s@UpdatePermissionGroup' {} Text
a -> UpdatePermissionGroup
s {$sel:permissionGroupId:UpdatePermissionGroup' :: Text
permissionGroupId = Text
a} :: UpdatePermissionGroup)
instance Core.AWSRequest UpdatePermissionGroup where
type
AWSResponse UpdatePermissionGroup =
UpdatePermissionGroupResponse
request :: (Service -> Service)
-> UpdatePermissionGroup -> Request UpdatePermissionGroup
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.putJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy UpdatePermissionGroup
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse UpdatePermissionGroup)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe Text -> Int -> UpdatePermissionGroupResponse
UpdatePermissionGroupResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"permissionGroupId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable UpdatePermissionGroup where
hashWithSalt :: Int -> UpdatePermissionGroup -> Int
hashWithSalt Int
_salt UpdatePermissionGroup' {Maybe [ApplicationPermission]
Maybe Text
Maybe (Sensitive Text)
Text
permissionGroupId :: Text
name :: Maybe (Sensitive Text)
description :: Maybe (Sensitive Text)
clientToken :: Maybe Text
applicationPermissions :: Maybe [ApplicationPermission]
$sel:permissionGroupId:UpdatePermissionGroup' :: UpdatePermissionGroup -> Text
$sel:name:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
$sel:description:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
$sel:clientToken:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe Text
$sel:applicationPermissions:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe [ApplicationPermission]
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [ApplicationPermission]
applicationPermissions
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
clientToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive Text)
description
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive Text)
name
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
permissionGroupId
instance Prelude.NFData UpdatePermissionGroup where
rnf :: UpdatePermissionGroup -> ()
rnf UpdatePermissionGroup' {Maybe [ApplicationPermission]
Maybe Text
Maybe (Sensitive Text)
Text
permissionGroupId :: Text
name :: Maybe (Sensitive Text)
description :: Maybe (Sensitive Text)
clientToken :: Maybe Text
applicationPermissions :: Maybe [ApplicationPermission]
$sel:permissionGroupId:UpdatePermissionGroup' :: UpdatePermissionGroup -> Text
$sel:name:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
$sel:description:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
$sel:clientToken:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe Text
$sel:applicationPermissions:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe [ApplicationPermission]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [ApplicationPermission]
applicationPermissions
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
clientToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
permissionGroupId
instance Data.ToHeaders UpdatePermissionGroup where
toHeaders :: UpdatePermissionGroup -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON UpdatePermissionGroup where
toJSON :: UpdatePermissionGroup -> Value
toJSON UpdatePermissionGroup' {Maybe [ApplicationPermission]
Maybe Text
Maybe (Sensitive Text)
Text
permissionGroupId :: Text
name :: Maybe (Sensitive Text)
description :: Maybe (Sensitive Text)
clientToken :: Maybe Text
applicationPermissions :: Maybe [ApplicationPermission]
$sel:permissionGroupId:UpdatePermissionGroup' :: UpdatePermissionGroup -> Text
$sel:name:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
$sel:description:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
$sel:clientToken:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe Text
$sel:applicationPermissions:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe [ApplicationPermission]
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"applicationPermissions" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ApplicationPermission]
applicationPermissions,
(Key
"clientToken" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
clientToken,
(Key
"description" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Sensitive Text)
description,
(Key
"name" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Sensitive Text)
name
]
)
instance Data.ToPath UpdatePermissionGroup where
toPath :: UpdatePermissionGroup -> ByteString
toPath UpdatePermissionGroup' {Maybe [ApplicationPermission]
Maybe Text
Maybe (Sensitive Text)
Text
permissionGroupId :: Text
name :: Maybe (Sensitive Text)
description :: Maybe (Sensitive Text)
clientToken :: Maybe Text
applicationPermissions :: Maybe [ApplicationPermission]
$sel:permissionGroupId:UpdatePermissionGroup' :: UpdatePermissionGroup -> Text
$sel:name:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
$sel:description:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe (Sensitive Text)
$sel:clientToken:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe Text
$sel:applicationPermissions:UpdatePermissionGroup' :: UpdatePermissionGroup -> Maybe [ApplicationPermission]
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"/permission-group/", forall a. ToByteString a => a -> ByteString
Data.toBS Text
permissionGroupId]
instance Data.ToQuery UpdatePermissionGroup where
toQuery :: UpdatePermissionGroup -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data UpdatePermissionGroupResponse = UpdatePermissionGroupResponse'
{
UpdatePermissionGroupResponse -> Maybe Text
permissionGroupId :: Prelude.Maybe Prelude.Text,
UpdatePermissionGroupResponse -> Int
httpStatus :: Prelude.Int
}
deriving (UpdatePermissionGroupResponse
-> UpdatePermissionGroupResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdatePermissionGroupResponse
-> UpdatePermissionGroupResponse -> Bool
$c/= :: UpdatePermissionGroupResponse
-> UpdatePermissionGroupResponse -> Bool
== :: UpdatePermissionGroupResponse
-> UpdatePermissionGroupResponse -> Bool
$c== :: UpdatePermissionGroupResponse
-> UpdatePermissionGroupResponse -> Bool
Prelude.Eq, ReadPrec [UpdatePermissionGroupResponse]
ReadPrec UpdatePermissionGroupResponse
Int -> ReadS UpdatePermissionGroupResponse
ReadS [UpdatePermissionGroupResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdatePermissionGroupResponse]
$creadListPrec :: ReadPrec [UpdatePermissionGroupResponse]
readPrec :: ReadPrec UpdatePermissionGroupResponse
$creadPrec :: ReadPrec UpdatePermissionGroupResponse
readList :: ReadS [UpdatePermissionGroupResponse]
$creadList :: ReadS [UpdatePermissionGroupResponse]
readsPrec :: Int -> ReadS UpdatePermissionGroupResponse
$creadsPrec :: Int -> ReadS UpdatePermissionGroupResponse
Prelude.Read, Int -> UpdatePermissionGroupResponse -> ShowS
[UpdatePermissionGroupResponse] -> ShowS
UpdatePermissionGroupResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdatePermissionGroupResponse] -> ShowS
$cshowList :: [UpdatePermissionGroupResponse] -> ShowS
show :: UpdatePermissionGroupResponse -> String
$cshow :: UpdatePermissionGroupResponse -> String
showsPrec :: Int -> UpdatePermissionGroupResponse -> ShowS
$cshowsPrec :: Int -> UpdatePermissionGroupResponse -> ShowS
Prelude.Show, forall x.
Rep UpdatePermissionGroupResponse x
-> UpdatePermissionGroupResponse
forall x.
UpdatePermissionGroupResponse
-> Rep UpdatePermissionGroupResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep UpdatePermissionGroupResponse x
-> UpdatePermissionGroupResponse
$cfrom :: forall x.
UpdatePermissionGroupResponse
-> Rep UpdatePermissionGroupResponse x
Prelude.Generic)
newUpdatePermissionGroupResponse ::
Prelude.Int ->
UpdatePermissionGroupResponse
newUpdatePermissionGroupResponse :: Int -> UpdatePermissionGroupResponse
newUpdatePermissionGroupResponse Int
pHttpStatus_ =
UpdatePermissionGroupResponse'
{ $sel:permissionGroupId:UpdatePermissionGroupResponse' :: Maybe Text
permissionGroupId =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:UpdatePermissionGroupResponse' :: Int
httpStatus = Int
pHttpStatus_
}
updatePermissionGroupResponse_permissionGroupId :: Lens.Lens' UpdatePermissionGroupResponse (Prelude.Maybe Prelude.Text)
updatePermissionGroupResponse_permissionGroupId :: Lens' UpdatePermissionGroupResponse (Maybe Text)
updatePermissionGroupResponse_permissionGroupId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdatePermissionGroupResponse' {Maybe Text
permissionGroupId :: Maybe Text
$sel:permissionGroupId:UpdatePermissionGroupResponse' :: UpdatePermissionGroupResponse -> Maybe Text
permissionGroupId} -> Maybe Text
permissionGroupId) (\s :: UpdatePermissionGroupResponse
s@UpdatePermissionGroupResponse' {} Maybe Text
a -> UpdatePermissionGroupResponse
s {$sel:permissionGroupId:UpdatePermissionGroupResponse' :: Maybe Text
permissionGroupId = Maybe Text
a} :: UpdatePermissionGroupResponse)
updatePermissionGroupResponse_httpStatus :: Lens.Lens' UpdatePermissionGroupResponse Prelude.Int
updatePermissionGroupResponse_httpStatus :: Lens' UpdatePermissionGroupResponse Int
updatePermissionGroupResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdatePermissionGroupResponse' {Int
httpStatus :: Int
$sel:httpStatus:UpdatePermissionGroupResponse' :: UpdatePermissionGroupResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: UpdatePermissionGroupResponse
s@UpdatePermissionGroupResponse' {} Int
a -> UpdatePermissionGroupResponse
s {$sel:httpStatus:UpdatePermissionGroupResponse' :: Int
httpStatus = Int
a} :: UpdatePermissionGroupResponse)
instance Prelude.NFData UpdatePermissionGroupResponse where
rnf :: UpdatePermissionGroupResponse -> ()
rnf UpdatePermissionGroupResponse' {Int
Maybe Text
httpStatus :: Int
permissionGroupId :: Maybe Text
$sel:httpStatus:UpdatePermissionGroupResponse' :: UpdatePermissionGroupResponse -> Int
$sel:permissionGroupId:UpdatePermissionGroupResponse' :: UpdatePermissionGroupResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
permissionGroupId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus