{-# 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.Proton.UpdateTemplateSyncConfig
(
UpdateTemplateSyncConfig (..),
newUpdateTemplateSyncConfig,
updateTemplateSyncConfig_subdirectory,
updateTemplateSyncConfig_branch,
updateTemplateSyncConfig_repositoryName,
updateTemplateSyncConfig_repositoryProvider,
updateTemplateSyncConfig_templateName,
updateTemplateSyncConfig_templateType,
UpdateTemplateSyncConfigResponse (..),
newUpdateTemplateSyncConfigResponse,
updateTemplateSyncConfigResponse_templateSyncConfig,
updateTemplateSyncConfigResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import Amazonka.Proton.Types
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data UpdateTemplateSyncConfig = UpdateTemplateSyncConfig'
{
UpdateTemplateSyncConfig -> Maybe Text
subdirectory :: Prelude.Maybe Prelude.Text,
UpdateTemplateSyncConfig -> Text
branch :: Prelude.Text,
UpdateTemplateSyncConfig -> Text
repositoryName :: Prelude.Text,
UpdateTemplateSyncConfig -> RepositoryProvider
repositoryProvider :: RepositoryProvider,
UpdateTemplateSyncConfig -> Text
templateName :: Prelude.Text,
UpdateTemplateSyncConfig -> TemplateType
templateType :: TemplateType
}
deriving (UpdateTemplateSyncConfig -> UpdateTemplateSyncConfig -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateTemplateSyncConfig -> UpdateTemplateSyncConfig -> Bool
$c/= :: UpdateTemplateSyncConfig -> UpdateTemplateSyncConfig -> Bool
== :: UpdateTemplateSyncConfig -> UpdateTemplateSyncConfig -> Bool
$c== :: UpdateTemplateSyncConfig -> UpdateTemplateSyncConfig -> Bool
Prelude.Eq, ReadPrec [UpdateTemplateSyncConfig]
ReadPrec UpdateTemplateSyncConfig
Int -> ReadS UpdateTemplateSyncConfig
ReadS [UpdateTemplateSyncConfig]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdateTemplateSyncConfig]
$creadListPrec :: ReadPrec [UpdateTemplateSyncConfig]
readPrec :: ReadPrec UpdateTemplateSyncConfig
$creadPrec :: ReadPrec UpdateTemplateSyncConfig
readList :: ReadS [UpdateTemplateSyncConfig]
$creadList :: ReadS [UpdateTemplateSyncConfig]
readsPrec :: Int -> ReadS UpdateTemplateSyncConfig
$creadsPrec :: Int -> ReadS UpdateTemplateSyncConfig
Prelude.Read, Int -> UpdateTemplateSyncConfig -> ShowS
[UpdateTemplateSyncConfig] -> ShowS
UpdateTemplateSyncConfig -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateTemplateSyncConfig] -> ShowS
$cshowList :: [UpdateTemplateSyncConfig] -> ShowS
show :: UpdateTemplateSyncConfig -> String
$cshow :: UpdateTemplateSyncConfig -> String
showsPrec :: Int -> UpdateTemplateSyncConfig -> ShowS
$cshowsPrec :: Int -> UpdateTemplateSyncConfig -> ShowS
Prelude.Show, forall x.
Rep UpdateTemplateSyncConfig x -> UpdateTemplateSyncConfig
forall x.
UpdateTemplateSyncConfig -> Rep UpdateTemplateSyncConfig x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep UpdateTemplateSyncConfig x -> UpdateTemplateSyncConfig
$cfrom :: forall x.
UpdateTemplateSyncConfig -> Rep UpdateTemplateSyncConfig x
Prelude.Generic)
newUpdateTemplateSyncConfig ::
Prelude.Text ->
Prelude.Text ->
RepositoryProvider ->
Prelude.Text ->
TemplateType ->
UpdateTemplateSyncConfig
newUpdateTemplateSyncConfig :: Text
-> Text
-> RepositoryProvider
-> Text
-> TemplateType
-> UpdateTemplateSyncConfig
newUpdateTemplateSyncConfig
Text
pBranch_
Text
pRepositoryName_
RepositoryProvider
pRepositoryProvider_
Text
pTemplateName_
TemplateType
pTemplateType_ =
UpdateTemplateSyncConfig'
{ $sel:subdirectory:UpdateTemplateSyncConfig' :: Maybe Text
subdirectory =
forall a. Maybe a
Prelude.Nothing,
$sel:branch:UpdateTemplateSyncConfig' :: Text
branch = Text
pBranch_,
$sel:repositoryName:UpdateTemplateSyncConfig' :: Text
repositoryName = Text
pRepositoryName_,
$sel:repositoryProvider:UpdateTemplateSyncConfig' :: RepositoryProvider
repositoryProvider = RepositoryProvider
pRepositoryProvider_,
$sel:templateName:UpdateTemplateSyncConfig' :: Text
templateName = Text
pTemplateName_,
$sel:templateType:UpdateTemplateSyncConfig' :: TemplateType
templateType = TemplateType
pTemplateType_
}
updateTemplateSyncConfig_subdirectory :: Lens.Lens' UpdateTemplateSyncConfig (Prelude.Maybe Prelude.Text)
updateTemplateSyncConfig_subdirectory :: Lens' UpdateTemplateSyncConfig (Maybe Text)
updateTemplateSyncConfig_subdirectory = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateTemplateSyncConfig' {Maybe Text
subdirectory :: Maybe Text
$sel:subdirectory:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Maybe Text
subdirectory} -> Maybe Text
subdirectory) (\s :: UpdateTemplateSyncConfig
s@UpdateTemplateSyncConfig' {} Maybe Text
a -> UpdateTemplateSyncConfig
s {$sel:subdirectory:UpdateTemplateSyncConfig' :: Maybe Text
subdirectory = Maybe Text
a} :: UpdateTemplateSyncConfig)
updateTemplateSyncConfig_branch :: Lens.Lens' UpdateTemplateSyncConfig Prelude.Text
updateTemplateSyncConfig_branch :: Lens' UpdateTemplateSyncConfig Text
updateTemplateSyncConfig_branch = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateTemplateSyncConfig' {Text
branch :: Text
$sel:branch:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
branch} -> Text
branch) (\s :: UpdateTemplateSyncConfig
s@UpdateTemplateSyncConfig' {} Text
a -> UpdateTemplateSyncConfig
s {$sel:branch:UpdateTemplateSyncConfig' :: Text
branch = Text
a} :: UpdateTemplateSyncConfig)
updateTemplateSyncConfig_repositoryName :: Lens.Lens' UpdateTemplateSyncConfig Prelude.Text
updateTemplateSyncConfig_repositoryName :: Lens' UpdateTemplateSyncConfig Text
updateTemplateSyncConfig_repositoryName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateTemplateSyncConfig' {Text
repositoryName :: Text
$sel:repositoryName:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
repositoryName} -> Text
repositoryName) (\s :: UpdateTemplateSyncConfig
s@UpdateTemplateSyncConfig' {} Text
a -> UpdateTemplateSyncConfig
s {$sel:repositoryName:UpdateTemplateSyncConfig' :: Text
repositoryName = Text
a} :: UpdateTemplateSyncConfig)
updateTemplateSyncConfig_repositoryProvider :: Lens.Lens' UpdateTemplateSyncConfig RepositoryProvider
updateTemplateSyncConfig_repositoryProvider :: Lens' UpdateTemplateSyncConfig RepositoryProvider
updateTemplateSyncConfig_repositoryProvider = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateTemplateSyncConfig' {RepositoryProvider
repositoryProvider :: RepositoryProvider
$sel:repositoryProvider:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> RepositoryProvider
repositoryProvider} -> RepositoryProvider
repositoryProvider) (\s :: UpdateTemplateSyncConfig
s@UpdateTemplateSyncConfig' {} RepositoryProvider
a -> UpdateTemplateSyncConfig
s {$sel:repositoryProvider:UpdateTemplateSyncConfig' :: RepositoryProvider
repositoryProvider = RepositoryProvider
a} :: UpdateTemplateSyncConfig)
updateTemplateSyncConfig_templateName :: Lens.Lens' UpdateTemplateSyncConfig Prelude.Text
updateTemplateSyncConfig_templateName :: Lens' UpdateTemplateSyncConfig Text
updateTemplateSyncConfig_templateName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateTemplateSyncConfig' {Text
templateName :: Text
$sel:templateName:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
templateName} -> Text
templateName) (\s :: UpdateTemplateSyncConfig
s@UpdateTemplateSyncConfig' {} Text
a -> UpdateTemplateSyncConfig
s {$sel:templateName:UpdateTemplateSyncConfig' :: Text
templateName = Text
a} :: UpdateTemplateSyncConfig)
updateTemplateSyncConfig_templateType :: Lens.Lens' UpdateTemplateSyncConfig TemplateType
updateTemplateSyncConfig_templateType :: Lens' UpdateTemplateSyncConfig TemplateType
updateTemplateSyncConfig_templateType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateTemplateSyncConfig' {TemplateType
templateType :: TemplateType
$sel:templateType:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> TemplateType
templateType} -> TemplateType
templateType) (\s :: UpdateTemplateSyncConfig
s@UpdateTemplateSyncConfig' {} TemplateType
a -> UpdateTemplateSyncConfig
s {$sel:templateType:UpdateTemplateSyncConfig' :: TemplateType
templateType = TemplateType
a} :: UpdateTemplateSyncConfig)
instance Core.AWSRequest UpdateTemplateSyncConfig where
type
AWSResponse UpdateTemplateSyncConfig =
UpdateTemplateSyncConfigResponse
request :: (Service -> Service)
-> UpdateTemplateSyncConfig -> Request UpdateTemplateSyncConfig
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy UpdateTemplateSyncConfig
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse UpdateTemplateSyncConfig)))
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 TemplateSyncConfig -> Int -> UpdateTemplateSyncConfigResponse
UpdateTemplateSyncConfigResponse'
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
"templateSyncConfig")
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 UpdateTemplateSyncConfig where
hashWithSalt :: Int -> UpdateTemplateSyncConfig -> Int
hashWithSalt Int
_salt UpdateTemplateSyncConfig' {Maybe Text
Text
RepositoryProvider
TemplateType
templateType :: TemplateType
templateName :: Text
repositoryProvider :: RepositoryProvider
repositoryName :: Text
branch :: Text
subdirectory :: Maybe Text
$sel:templateType:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> TemplateType
$sel:templateName:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
$sel:repositoryProvider:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> RepositoryProvider
$sel:repositoryName:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
$sel:branch:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
$sel:subdirectory:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
subdirectory
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
branch
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
repositoryName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` RepositoryProvider
repositoryProvider
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
templateName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` TemplateType
templateType
instance Prelude.NFData UpdateTemplateSyncConfig where
rnf :: UpdateTemplateSyncConfig -> ()
rnf UpdateTemplateSyncConfig' {Maybe Text
Text
RepositoryProvider
TemplateType
templateType :: TemplateType
templateName :: Text
repositoryProvider :: RepositoryProvider
repositoryName :: Text
branch :: Text
subdirectory :: Maybe Text
$sel:templateType:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> TemplateType
$sel:templateName:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
$sel:repositoryProvider:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> RepositoryProvider
$sel:repositoryName:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
$sel:branch:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
$sel:subdirectory:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
subdirectory
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
branch
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
repositoryName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf RepositoryProvider
repositoryProvider
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
templateName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf TemplateType
templateType
instance Data.ToHeaders UpdateTemplateSyncConfig where
toHeaders :: UpdateTemplateSyncConfig -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"AwsProton20200720.UpdateTemplateSyncConfig" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.0" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON UpdateTemplateSyncConfig where
toJSON :: UpdateTemplateSyncConfig -> Value
toJSON UpdateTemplateSyncConfig' {Maybe Text
Text
RepositoryProvider
TemplateType
templateType :: TemplateType
templateName :: Text
repositoryProvider :: RepositoryProvider
repositoryName :: Text
branch :: Text
subdirectory :: Maybe Text
$sel:templateType:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> TemplateType
$sel:templateName:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
$sel:repositoryProvider:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> RepositoryProvider
$sel:repositoryName:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
$sel:branch:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Text
$sel:subdirectory:UpdateTemplateSyncConfig' :: UpdateTemplateSyncConfig -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"subdirectory" 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
subdirectory,
forall a. a -> Maybe a
Prelude.Just (Key
"branch" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
branch),
forall a. a -> Maybe a
Prelude.Just
(Key
"repositoryName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
repositoryName),
forall a. a -> Maybe a
Prelude.Just
(Key
"repositoryProvider" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= RepositoryProvider
repositoryProvider),
forall a. a -> Maybe a
Prelude.Just (Key
"templateName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
templateName),
forall a. a -> Maybe a
Prelude.Just (Key
"templateType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= TemplateType
templateType)
]
)
instance Data.ToPath UpdateTemplateSyncConfig where
toPath :: UpdateTemplateSyncConfig -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery UpdateTemplateSyncConfig where
toQuery :: UpdateTemplateSyncConfig -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data UpdateTemplateSyncConfigResponse = UpdateTemplateSyncConfigResponse'
{
UpdateTemplateSyncConfigResponse -> Maybe TemplateSyncConfig
templateSyncConfig :: Prelude.Maybe TemplateSyncConfig,
UpdateTemplateSyncConfigResponse -> Int
httpStatus :: Prelude.Int
}
deriving (UpdateTemplateSyncConfigResponse
-> UpdateTemplateSyncConfigResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateTemplateSyncConfigResponse
-> UpdateTemplateSyncConfigResponse -> Bool
$c/= :: UpdateTemplateSyncConfigResponse
-> UpdateTemplateSyncConfigResponse -> Bool
== :: UpdateTemplateSyncConfigResponse
-> UpdateTemplateSyncConfigResponse -> Bool
$c== :: UpdateTemplateSyncConfigResponse
-> UpdateTemplateSyncConfigResponse -> Bool
Prelude.Eq, ReadPrec [UpdateTemplateSyncConfigResponse]
ReadPrec UpdateTemplateSyncConfigResponse
Int -> ReadS UpdateTemplateSyncConfigResponse
ReadS [UpdateTemplateSyncConfigResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdateTemplateSyncConfigResponse]
$creadListPrec :: ReadPrec [UpdateTemplateSyncConfigResponse]
readPrec :: ReadPrec UpdateTemplateSyncConfigResponse
$creadPrec :: ReadPrec UpdateTemplateSyncConfigResponse
readList :: ReadS [UpdateTemplateSyncConfigResponse]
$creadList :: ReadS [UpdateTemplateSyncConfigResponse]
readsPrec :: Int -> ReadS UpdateTemplateSyncConfigResponse
$creadsPrec :: Int -> ReadS UpdateTemplateSyncConfigResponse
Prelude.Read, Int -> UpdateTemplateSyncConfigResponse -> ShowS
[UpdateTemplateSyncConfigResponse] -> ShowS
UpdateTemplateSyncConfigResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateTemplateSyncConfigResponse] -> ShowS
$cshowList :: [UpdateTemplateSyncConfigResponse] -> ShowS
show :: UpdateTemplateSyncConfigResponse -> String
$cshow :: UpdateTemplateSyncConfigResponse -> String
showsPrec :: Int -> UpdateTemplateSyncConfigResponse -> ShowS
$cshowsPrec :: Int -> UpdateTemplateSyncConfigResponse -> ShowS
Prelude.Show, forall x.
Rep UpdateTemplateSyncConfigResponse x
-> UpdateTemplateSyncConfigResponse
forall x.
UpdateTemplateSyncConfigResponse
-> Rep UpdateTemplateSyncConfigResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep UpdateTemplateSyncConfigResponse x
-> UpdateTemplateSyncConfigResponse
$cfrom :: forall x.
UpdateTemplateSyncConfigResponse
-> Rep UpdateTemplateSyncConfigResponse x
Prelude.Generic)
newUpdateTemplateSyncConfigResponse ::
Prelude.Int ->
UpdateTemplateSyncConfigResponse
newUpdateTemplateSyncConfigResponse :: Int -> UpdateTemplateSyncConfigResponse
newUpdateTemplateSyncConfigResponse Int
pHttpStatus_ =
UpdateTemplateSyncConfigResponse'
{ $sel:templateSyncConfig:UpdateTemplateSyncConfigResponse' :: Maybe TemplateSyncConfig
templateSyncConfig =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:UpdateTemplateSyncConfigResponse' :: Int
httpStatus = Int
pHttpStatus_
}
updateTemplateSyncConfigResponse_templateSyncConfig :: Lens.Lens' UpdateTemplateSyncConfigResponse (Prelude.Maybe TemplateSyncConfig)
updateTemplateSyncConfigResponse_templateSyncConfig :: Lens' UpdateTemplateSyncConfigResponse (Maybe TemplateSyncConfig)
updateTemplateSyncConfigResponse_templateSyncConfig = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateTemplateSyncConfigResponse' {Maybe TemplateSyncConfig
templateSyncConfig :: Maybe TemplateSyncConfig
$sel:templateSyncConfig:UpdateTemplateSyncConfigResponse' :: UpdateTemplateSyncConfigResponse -> Maybe TemplateSyncConfig
templateSyncConfig} -> Maybe TemplateSyncConfig
templateSyncConfig) (\s :: UpdateTemplateSyncConfigResponse
s@UpdateTemplateSyncConfigResponse' {} Maybe TemplateSyncConfig
a -> UpdateTemplateSyncConfigResponse
s {$sel:templateSyncConfig:UpdateTemplateSyncConfigResponse' :: Maybe TemplateSyncConfig
templateSyncConfig = Maybe TemplateSyncConfig
a} :: UpdateTemplateSyncConfigResponse)
updateTemplateSyncConfigResponse_httpStatus :: Lens.Lens' UpdateTemplateSyncConfigResponse Prelude.Int
updateTemplateSyncConfigResponse_httpStatus :: Lens' UpdateTemplateSyncConfigResponse Int
updateTemplateSyncConfigResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateTemplateSyncConfigResponse' {Int
httpStatus :: Int
$sel:httpStatus:UpdateTemplateSyncConfigResponse' :: UpdateTemplateSyncConfigResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: UpdateTemplateSyncConfigResponse
s@UpdateTemplateSyncConfigResponse' {} Int
a -> UpdateTemplateSyncConfigResponse
s {$sel:httpStatus:UpdateTemplateSyncConfigResponse' :: Int
httpStatus = Int
a} :: UpdateTemplateSyncConfigResponse)
instance
Prelude.NFData
UpdateTemplateSyncConfigResponse
where
rnf :: UpdateTemplateSyncConfigResponse -> ()
rnf UpdateTemplateSyncConfigResponse' {Int
Maybe TemplateSyncConfig
httpStatus :: Int
templateSyncConfig :: Maybe TemplateSyncConfig
$sel:httpStatus:UpdateTemplateSyncConfigResponse' :: UpdateTemplateSyncConfigResponse -> Int
$sel:templateSyncConfig:UpdateTemplateSyncConfigResponse' :: UpdateTemplateSyncConfigResponse -> Maybe TemplateSyncConfig
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe TemplateSyncConfig
templateSyncConfig
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus