{-# 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.Greengrass.GetLoggerDefinitionVersion
(
GetLoggerDefinitionVersion (..),
newGetLoggerDefinitionVersion,
getLoggerDefinitionVersion_nextToken,
getLoggerDefinitionVersion_loggerDefinitionVersionId,
getLoggerDefinitionVersion_loggerDefinitionId,
GetLoggerDefinitionVersionResponse (..),
newGetLoggerDefinitionVersionResponse,
getLoggerDefinitionVersionResponse_arn,
getLoggerDefinitionVersionResponse_creationTimestamp,
getLoggerDefinitionVersionResponse_definition,
getLoggerDefinitionVersionResponse_id,
getLoggerDefinitionVersionResponse_version,
getLoggerDefinitionVersionResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Greengrass.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data GetLoggerDefinitionVersion = GetLoggerDefinitionVersion'
{
GetLoggerDefinitionVersion -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
GetLoggerDefinitionVersion -> Text
loggerDefinitionVersionId :: Prelude.Text,
GetLoggerDefinitionVersion -> Text
loggerDefinitionId :: Prelude.Text
}
deriving (GetLoggerDefinitionVersion -> GetLoggerDefinitionVersion -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetLoggerDefinitionVersion -> GetLoggerDefinitionVersion -> Bool
$c/= :: GetLoggerDefinitionVersion -> GetLoggerDefinitionVersion -> Bool
== :: GetLoggerDefinitionVersion -> GetLoggerDefinitionVersion -> Bool
$c== :: GetLoggerDefinitionVersion -> GetLoggerDefinitionVersion -> Bool
Prelude.Eq, ReadPrec [GetLoggerDefinitionVersion]
ReadPrec GetLoggerDefinitionVersion
Int -> ReadS GetLoggerDefinitionVersion
ReadS [GetLoggerDefinitionVersion]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetLoggerDefinitionVersion]
$creadListPrec :: ReadPrec [GetLoggerDefinitionVersion]
readPrec :: ReadPrec GetLoggerDefinitionVersion
$creadPrec :: ReadPrec GetLoggerDefinitionVersion
readList :: ReadS [GetLoggerDefinitionVersion]
$creadList :: ReadS [GetLoggerDefinitionVersion]
readsPrec :: Int -> ReadS GetLoggerDefinitionVersion
$creadsPrec :: Int -> ReadS GetLoggerDefinitionVersion
Prelude.Read, Int -> GetLoggerDefinitionVersion -> ShowS
[GetLoggerDefinitionVersion] -> ShowS
GetLoggerDefinitionVersion -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetLoggerDefinitionVersion] -> ShowS
$cshowList :: [GetLoggerDefinitionVersion] -> ShowS
show :: GetLoggerDefinitionVersion -> String
$cshow :: GetLoggerDefinitionVersion -> String
showsPrec :: Int -> GetLoggerDefinitionVersion -> ShowS
$cshowsPrec :: Int -> GetLoggerDefinitionVersion -> ShowS
Prelude.Show, forall x.
Rep GetLoggerDefinitionVersion x -> GetLoggerDefinitionVersion
forall x.
GetLoggerDefinitionVersion -> Rep GetLoggerDefinitionVersion x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetLoggerDefinitionVersion x -> GetLoggerDefinitionVersion
$cfrom :: forall x.
GetLoggerDefinitionVersion -> Rep GetLoggerDefinitionVersion x
Prelude.Generic)
newGetLoggerDefinitionVersion ::
Prelude.Text ->
Prelude.Text ->
GetLoggerDefinitionVersion
newGetLoggerDefinitionVersion :: Text -> Text -> GetLoggerDefinitionVersion
newGetLoggerDefinitionVersion
Text
pLoggerDefinitionVersionId_
Text
pLoggerDefinitionId_ =
GetLoggerDefinitionVersion'
{ $sel:nextToken:GetLoggerDefinitionVersion' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:loggerDefinitionVersionId:GetLoggerDefinitionVersion' :: Text
loggerDefinitionVersionId =
Text
pLoggerDefinitionVersionId_,
$sel:loggerDefinitionId:GetLoggerDefinitionVersion' :: Text
loggerDefinitionId = Text
pLoggerDefinitionId_
}
getLoggerDefinitionVersion_nextToken :: Lens.Lens' GetLoggerDefinitionVersion (Prelude.Maybe Prelude.Text)
getLoggerDefinitionVersion_nextToken :: Lens' GetLoggerDefinitionVersion (Maybe Text)
getLoggerDefinitionVersion_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLoggerDefinitionVersion' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetLoggerDefinitionVersion
s@GetLoggerDefinitionVersion' {} Maybe Text
a -> GetLoggerDefinitionVersion
s {$sel:nextToken:GetLoggerDefinitionVersion' :: Maybe Text
nextToken = Maybe Text
a} :: GetLoggerDefinitionVersion)
getLoggerDefinitionVersion_loggerDefinitionVersionId :: Lens.Lens' GetLoggerDefinitionVersion Prelude.Text
getLoggerDefinitionVersion_loggerDefinitionVersionId :: Lens' GetLoggerDefinitionVersion Text
getLoggerDefinitionVersion_loggerDefinitionVersionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLoggerDefinitionVersion' {Text
loggerDefinitionVersionId :: Text
$sel:loggerDefinitionVersionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
loggerDefinitionVersionId} -> Text
loggerDefinitionVersionId) (\s :: GetLoggerDefinitionVersion
s@GetLoggerDefinitionVersion' {} Text
a -> GetLoggerDefinitionVersion
s {$sel:loggerDefinitionVersionId:GetLoggerDefinitionVersion' :: Text
loggerDefinitionVersionId = Text
a} :: GetLoggerDefinitionVersion)
getLoggerDefinitionVersion_loggerDefinitionId :: Lens.Lens' GetLoggerDefinitionVersion Prelude.Text
getLoggerDefinitionVersion_loggerDefinitionId :: Lens' GetLoggerDefinitionVersion Text
getLoggerDefinitionVersion_loggerDefinitionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLoggerDefinitionVersion' {Text
loggerDefinitionId :: Text
$sel:loggerDefinitionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
loggerDefinitionId} -> Text
loggerDefinitionId) (\s :: GetLoggerDefinitionVersion
s@GetLoggerDefinitionVersion' {} Text
a -> GetLoggerDefinitionVersion
s {$sel:loggerDefinitionId:GetLoggerDefinitionVersion' :: Text
loggerDefinitionId = Text
a} :: GetLoggerDefinitionVersion)
instance Core.AWSRequest GetLoggerDefinitionVersion where
type
AWSResponse GetLoggerDefinitionVersion =
GetLoggerDefinitionVersionResponse
request :: (Service -> Service)
-> GetLoggerDefinitionVersion -> Request GetLoggerDefinitionVersion
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy GetLoggerDefinitionVersion
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetLoggerDefinitionVersion)))
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
-> Maybe Text
-> Maybe LoggerDefinitionVersion
-> Maybe Text
-> Maybe Text
-> Int
-> GetLoggerDefinitionVersionResponse
GetLoggerDefinitionVersionResponse'
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
"Arn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"CreationTimestamp")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"Definition")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"Id")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"Version")
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 GetLoggerDefinitionVersion where
hashWithSalt :: Int -> GetLoggerDefinitionVersion -> Int
hashWithSalt Int
_salt GetLoggerDefinitionVersion' {Maybe Text
Text
loggerDefinitionId :: Text
loggerDefinitionVersionId :: Text
nextToken :: Maybe Text
$sel:loggerDefinitionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
$sel:loggerDefinitionVersionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
$sel:nextToken:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
loggerDefinitionVersionId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
loggerDefinitionId
instance Prelude.NFData GetLoggerDefinitionVersion where
rnf :: GetLoggerDefinitionVersion -> ()
rnf GetLoggerDefinitionVersion' {Maybe Text
Text
loggerDefinitionId :: Text
loggerDefinitionVersionId :: Text
nextToken :: Maybe Text
$sel:loggerDefinitionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
$sel:loggerDefinitionVersionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
$sel:nextToken:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
loggerDefinitionVersionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
loggerDefinitionId
instance Data.ToHeaders GetLoggerDefinitionVersion where
toHeaders :: GetLoggerDefinitionVersion -> 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.ToPath GetLoggerDefinitionVersion where
toPath :: GetLoggerDefinitionVersion -> ByteString
toPath GetLoggerDefinitionVersion' {Maybe Text
Text
loggerDefinitionId :: Text
loggerDefinitionVersionId :: Text
nextToken :: Maybe Text
$sel:loggerDefinitionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
$sel:loggerDefinitionVersionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
$sel:nextToken:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/greengrass/definition/loggers/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
loggerDefinitionId,
ByteString
"/versions/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
loggerDefinitionVersionId
]
instance Data.ToQuery GetLoggerDefinitionVersion where
toQuery :: GetLoggerDefinitionVersion -> QueryString
toQuery GetLoggerDefinitionVersion' {Maybe Text
Text
loggerDefinitionId :: Text
loggerDefinitionVersionId :: Text
nextToken :: Maybe Text
$sel:loggerDefinitionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
$sel:loggerDefinitionVersionId:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Text
$sel:nextToken:GetLoggerDefinitionVersion' :: GetLoggerDefinitionVersion -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat [ByteString
"NextToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken]
data GetLoggerDefinitionVersionResponse = GetLoggerDefinitionVersionResponse'
{
GetLoggerDefinitionVersionResponse -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
GetLoggerDefinitionVersionResponse -> Maybe Text
creationTimestamp :: Prelude.Maybe Prelude.Text,
GetLoggerDefinitionVersionResponse -> Maybe LoggerDefinitionVersion
definition :: Prelude.Maybe LoggerDefinitionVersion,
GetLoggerDefinitionVersionResponse -> Maybe Text
id :: Prelude.Maybe Prelude.Text,
GetLoggerDefinitionVersionResponse -> Maybe Text
version :: Prelude.Maybe Prelude.Text,
GetLoggerDefinitionVersionResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetLoggerDefinitionVersionResponse
-> GetLoggerDefinitionVersionResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetLoggerDefinitionVersionResponse
-> GetLoggerDefinitionVersionResponse -> Bool
$c/= :: GetLoggerDefinitionVersionResponse
-> GetLoggerDefinitionVersionResponse -> Bool
== :: GetLoggerDefinitionVersionResponse
-> GetLoggerDefinitionVersionResponse -> Bool
$c== :: GetLoggerDefinitionVersionResponse
-> GetLoggerDefinitionVersionResponse -> Bool
Prelude.Eq, ReadPrec [GetLoggerDefinitionVersionResponse]
ReadPrec GetLoggerDefinitionVersionResponse
Int -> ReadS GetLoggerDefinitionVersionResponse
ReadS [GetLoggerDefinitionVersionResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetLoggerDefinitionVersionResponse]
$creadListPrec :: ReadPrec [GetLoggerDefinitionVersionResponse]
readPrec :: ReadPrec GetLoggerDefinitionVersionResponse
$creadPrec :: ReadPrec GetLoggerDefinitionVersionResponse
readList :: ReadS [GetLoggerDefinitionVersionResponse]
$creadList :: ReadS [GetLoggerDefinitionVersionResponse]
readsPrec :: Int -> ReadS GetLoggerDefinitionVersionResponse
$creadsPrec :: Int -> ReadS GetLoggerDefinitionVersionResponse
Prelude.Read, Int -> GetLoggerDefinitionVersionResponse -> ShowS
[GetLoggerDefinitionVersionResponse] -> ShowS
GetLoggerDefinitionVersionResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetLoggerDefinitionVersionResponse] -> ShowS
$cshowList :: [GetLoggerDefinitionVersionResponse] -> ShowS
show :: GetLoggerDefinitionVersionResponse -> String
$cshow :: GetLoggerDefinitionVersionResponse -> String
showsPrec :: Int -> GetLoggerDefinitionVersionResponse -> ShowS
$cshowsPrec :: Int -> GetLoggerDefinitionVersionResponse -> ShowS
Prelude.Show, forall x.
Rep GetLoggerDefinitionVersionResponse x
-> GetLoggerDefinitionVersionResponse
forall x.
GetLoggerDefinitionVersionResponse
-> Rep GetLoggerDefinitionVersionResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetLoggerDefinitionVersionResponse x
-> GetLoggerDefinitionVersionResponse
$cfrom :: forall x.
GetLoggerDefinitionVersionResponse
-> Rep GetLoggerDefinitionVersionResponse x
Prelude.Generic)
newGetLoggerDefinitionVersionResponse ::
Prelude.Int ->
GetLoggerDefinitionVersionResponse
newGetLoggerDefinitionVersionResponse :: Int -> GetLoggerDefinitionVersionResponse
newGetLoggerDefinitionVersionResponse Int
pHttpStatus_ =
GetLoggerDefinitionVersionResponse'
{ $sel:arn:GetLoggerDefinitionVersionResponse' :: Maybe Text
arn =
forall a. Maybe a
Prelude.Nothing,
$sel:creationTimestamp:GetLoggerDefinitionVersionResponse' :: Maybe Text
creationTimestamp = forall a. Maybe a
Prelude.Nothing,
$sel:definition:GetLoggerDefinitionVersionResponse' :: Maybe LoggerDefinitionVersion
definition = forall a. Maybe a
Prelude.Nothing,
$sel:id:GetLoggerDefinitionVersionResponse' :: Maybe Text
id = forall a. Maybe a
Prelude.Nothing,
$sel:version:GetLoggerDefinitionVersionResponse' :: Maybe Text
version = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetLoggerDefinitionVersionResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getLoggerDefinitionVersionResponse_arn :: Lens.Lens' GetLoggerDefinitionVersionResponse (Prelude.Maybe Prelude.Text)
getLoggerDefinitionVersionResponse_arn :: Lens' GetLoggerDefinitionVersionResponse (Maybe Text)
getLoggerDefinitionVersionResponse_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLoggerDefinitionVersionResponse' {Maybe Text
arn :: Maybe Text
$sel:arn:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe Text
arn} -> Maybe Text
arn) (\s :: GetLoggerDefinitionVersionResponse
s@GetLoggerDefinitionVersionResponse' {} Maybe Text
a -> GetLoggerDefinitionVersionResponse
s {$sel:arn:GetLoggerDefinitionVersionResponse' :: Maybe Text
arn = Maybe Text
a} :: GetLoggerDefinitionVersionResponse)
getLoggerDefinitionVersionResponse_creationTimestamp :: Lens.Lens' GetLoggerDefinitionVersionResponse (Prelude.Maybe Prelude.Text)
getLoggerDefinitionVersionResponse_creationTimestamp :: Lens' GetLoggerDefinitionVersionResponse (Maybe Text)
getLoggerDefinitionVersionResponse_creationTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLoggerDefinitionVersionResponse' {Maybe Text
creationTimestamp :: Maybe Text
$sel:creationTimestamp:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe Text
creationTimestamp} -> Maybe Text
creationTimestamp) (\s :: GetLoggerDefinitionVersionResponse
s@GetLoggerDefinitionVersionResponse' {} Maybe Text
a -> GetLoggerDefinitionVersionResponse
s {$sel:creationTimestamp:GetLoggerDefinitionVersionResponse' :: Maybe Text
creationTimestamp = Maybe Text
a} :: GetLoggerDefinitionVersionResponse)
getLoggerDefinitionVersionResponse_definition :: Lens.Lens' GetLoggerDefinitionVersionResponse (Prelude.Maybe LoggerDefinitionVersion)
getLoggerDefinitionVersionResponse_definition :: Lens'
GetLoggerDefinitionVersionResponse (Maybe LoggerDefinitionVersion)
getLoggerDefinitionVersionResponse_definition = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLoggerDefinitionVersionResponse' {Maybe LoggerDefinitionVersion
definition :: Maybe LoggerDefinitionVersion
$sel:definition:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe LoggerDefinitionVersion
definition} -> Maybe LoggerDefinitionVersion
definition) (\s :: GetLoggerDefinitionVersionResponse
s@GetLoggerDefinitionVersionResponse' {} Maybe LoggerDefinitionVersion
a -> GetLoggerDefinitionVersionResponse
s {$sel:definition:GetLoggerDefinitionVersionResponse' :: Maybe LoggerDefinitionVersion
definition = Maybe LoggerDefinitionVersion
a} :: GetLoggerDefinitionVersionResponse)
getLoggerDefinitionVersionResponse_id :: Lens.Lens' GetLoggerDefinitionVersionResponse (Prelude.Maybe Prelude.Text)
getLoggerDefinitionVersionResponse_id :: Lens' GetLoggerDefinitionVersionResponse (Maybe Text)
getLoggerDefinitionVersionResponse_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLoggerDefinitionVersionResponse' {Maybe Text
id :: Maybe Text
$sel:id:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe Text
id} -> Maybe Text
id) (\s :: GetLoggerDefinitionVersionResponse
s@GetLoggerDefinitionVersionResponse' {} Maybe Text
a -> GetLoggerDefinitionVersionResponse
s {$sel:id:GetLoggerDefinitionVersionResponse' :: Maybe Text
id = Maybe Text
a} :: GetLoggerDefinitionVersionResponse)
getLoggerDefinitionVersionResponse_version :: Lens.Lens' GetLoggerDefinitionVersionResponse (Prelude.Maybe Prelude.Text)
getLoggerDefinitionVersionResponse_version :: Lens' GetLoggerDefinitionVersionResponse (Maybe Text)
getLoggerDefinitionVersionResponse_version = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLoggerDefinitionVersionResponse' {Maybe Text
version :: Maybe Text
$sel:version:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe Text
version} -> Maybe Text
version) (\s :: GetLoggerDefinitionVersionResponse
s@GetLoggerDefinitionVersionResponse' {} Maybe Text
a -> GetLoggerDefinitionVersionResponse
s {$sel:version:GetLoggerDefinitionVersionResponse' :: Maybe Text
version = Maybe Text
a} :: GetLoggerDefinitionVersionResponse)
getLoggerDefinitionVersionResponse_httpStatus :: Lens.Lens' GetLoggerDefinitionVersionResponse Prelude.Int
getLoggerDefinitionVersionResponse_httpStatus :: Lens' GetLoggerDefinitionVersionResponse Int
getLoggerDefinitionVersionResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetLoggerDefinitionVersionResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetLoggerDefinitionVersionResponse
s@GetLoggerDefinitionVersionResponse' {} Int
a -> GetLoggerDefinitionVersionResponse
s {$sel:httpStatus:GetLoggerDefinitionVersionResponse' :: Int
httpStatus = Int
a} :: GetLoggerDefinitionVersionResponse)
instance
Prelude.NFData
GetLoggerDefinitionVersionResponse
where
rnf :: GetLoggerDefinitionVersionResponse -> ()
rnf GetLoggerDefinitionVersionResponse' {Int
Maybe Text
Maybe LoggerDefinitionVersion
httpStatus :: Int
version :: Maybe Text
id :: Maybe Text
definition :: Maybe LoggerDefinitionVersion
creationTimestamp :: Maybe Text
arn :: Maybe Text
$sel:httpStatus:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Int
$sel:version:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe Text
$sel:id:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe Text
$sel:definition:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe LoggerDefinitionVersion
$sel:creationTimestamp:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe Text
$sel:arn:GetLoggerDefinitionVersionResponse' :: GetLoggerDefinitionVersionResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
arn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
creationTimestamp
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe LoggerDefinitionVersion
definition
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
id
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
version
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus