{-# 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.SageMaker.DescribeStudioLifecycleConfig
(
DescribeStudioLifecycleConfig (..),
newDescribeStudioLifecycleConfig,
describeStudioLifecycleConfig_studioLifecycleConfigName,
DescribeStudioLifecycleConfigResponse (..),
newDescribeStudioLifecycleConfigResponse,
describeStudioLifecycleConfigResponse_creationTime,
describeStudioLifecycleConfigResponse_studioLifecycleConfigContent,
describeStudioLifecycleConfigResponse_lastModifiedTime,
describeStudioLifecycleConfigResponse_studioLifecycleConfigArn,
describeStudioLifecycleConfigResponse_studioLifecycleConfigAppType,
describeStudioLifecycleConfigResponse_studioLifecycleConfigName,
describeStudioLifecycleConfigResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.SageMaker.Types
data DescribeStudioLifecycleConfig = DescribeStudioLifecycleConfig'
{
DescribeStudioLifecycleConfig -> Text
studioLifecycleConfigName :: Prelude.Text
}
deriving (DescribeStudioLifecycleConfig
-> DescribeStudioLifecycleConfig -> Bool
(DescribeStudioLifecycleConfig
-> DescribeStudioLifecycleConfig -> Bool)
-> (DescribeStudioLifecycleConfig
-> DescribeStudioLifecycleConfig -> Bool)
-> Eq DescribeStudioLifecycleConfig
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeStudioLifecycleConfig
-> DescribeStudioLifecycleConfig -> Bool
$c/= :: DescribeStudioLifecycleConfig
-> DescribeStudioLifecycleConfig -> Bool
== :: DescribeStudioLifecycleConfig
-> DescribeStudioLifecycleConfig -> Bool
$c== :: DescribeStudioLifecycleConfig
-> DescribeStudioLifecycleConfig -> Bool
Prelude.Eq, ReadPrec [DescribeStudioLifecycleConfig]
ReadPrec DescribeStudioLifecycleConfig
Int -> ReadS DescribeStudioLifecycleConfig
ReadS [DescribeStudioLifecycleConfig]
(Int -> ReadS DescribeStudioLifecycleConfig)
-> ReadS [DescribeStudioLifecycleConfig]
-> ReadPrec DescribeStudioLifecycleConfig
-> ReadPrec [DescribeStudioLifecycleConfig]
-> Read DescribeStudioLifecycleConfig
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeStudioLifecycleConfig]
$creadListPrec :: ReadPrec [DescribeStudioLifecycleConfig]
readPrec :: ReadPrec DescribeStudioLifecycleConfig
$creadPrec :: ReadPrec DescribeStudioLifecycleConfig
readList :: ReadS [DescribeStudioLifecycleConfig]
$creadList :: ReadS [DescribeStudioLifecycleConfig]
readsPrec :: Int -> ReadS DescribeStudioLifecycleConfig
$creadsPrec :: Int -> ReadS DescribeStudioLifecycleConfig
Prelude.Read, Int -> DescribeStudioLifecycleConfig -> ShowS
[DescribeStudioLifecycleConfig] -> ShowS
DescribeStudioLifecycleConfig -> String
(Int -> DescribeStudioLifecycleConfig -> ShowS)
-> (DescribeStudioLifecycleConfig -> String)
-> ([DescribeStudioLifecycleConfig] -> ShowS)
-> Show DescribeStudioLifecycleConfig
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeStudioLifecycleConfig] -> ShowS
$cshowList :: [DescribeStudioLifecycleConfig] -> ShowS
show :: DescribeStudioLifecycleConfig -> String
$cshow :: DescribeStudioLifecycleConfig -> String
showsPrec :: Int -> DescribeStudioLifecycleConfig -> ShowS
$cshowsPrec :: Int -> DescribeStudioLifecycleConfig -> ShowS
Prelude.Show, (forall x.
DescribeStudioLifecycleConfig
-> Rep DescribeStudioLifecycleConfig x)
-> (forall x.
Rep DescribeStudioLifecycleConfig x
-> DescribeStudioLifecycleConfig)
-> Generic DescribeStudioLifecycleConfig
forall x.
Rep DescribeStudioLifecycleConfig x
-> DescribeStudioLifecycleConfig
forall x.
DescribeStudioLifecycleConfig
-> Rep DescribeStudioLifecycleConfig x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeStudioLifecycleConfig x
-> DescribeStudioLifecycleConfig
$cfrom :: forall x.
DescribeStudioLifecycleConfig
-> Rep DescribeStudioLifecycleConfig x
Prelude.Generic)
newDescribeStudioLifecycleConfig ::
Prelude.Text ->
DescribeStudioLifecycleConfig
newDescribeStudioLifecycleConfig :: Text -> DescribeStudioLifecycleConfig
newDescribeStudioLifecycleConfig
Text
pStudioLifecycleConfigName_ =
DescribeStudioLifecycleConfig' :: Text -> DescribeStudioLifecycleConfig
DescribeStudioLifecycleConfig'
{ $sel:studioLifecycleConfigName:DescribeStudioLifecycleConfig' :: Text
studioLifecycleConfigName =
Text
pStudioLifecycleConfigName_
}
describeStudioLifecycleConfig_studioLifecycleConfigName :: Lens.Lens' DescribeStudioLifecycleConfig Prelude.Text
describeStudioLifecycleConfig_studioLifecycleConfigName :: (Text -> f Text)
-> DescribeStudioLifecycleConfig -> f DescribeStudioLifecycleConfig
describeStudioLifecycleConfig_studioLifecycleConfigName = (DescribeStudioLifecycleConfig -> Text)
-> (DescribeStudioLifecycleConfig
-> Text -> DescribeStudioLifecycleConfig)
-> Lens
DescribeStudioLifecycleConfig
DescribeStudioLifecycleConfig
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeStudioLifecycleConfig' {Text
studioLifecycleConfigName :: Text
$sel:studioLifecycleConfigName:DescribeStudioLifecycleConfig' :: DescribeStudioLifecycleConfig -> Text
studioLifecycleConfigName} -> Text
studioLifecycleConfigName) (\s :: DescribeStudioLifecycleConfig
s@DescribeStudioLifecycleConfig' {} Text
a -> DescribeStudioLifecycleConfig
s {$sel:studioLifecycleConfigName:DescribeStudioLifecycleConfig' :: Text
studioLifecycleConfigName = Text
a} :: DescribeStudioLifecycleConfig)
instance
Core.AWSRequest
DescribeStudioLifecycleConfig
where
type
AWSResponse DescribeStudioLifecycleConfig =
DescribeStudioLifecycleConfigResponse
request :: DescribeStudioLifecycleConfig
-> Request DescribeStudioLifecycleConfig
request = Service
-> DescribeStudioLifecycleConfig
-> Request DescribeStudioLifecycleConfig
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON Service
defaultService
response :: Logger
-> Service
-> Proxy DescribeStudioLifecycleConfig
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeStudioLifecycleConfig)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse DescribeStudioLifecycleConfig))
-> Logger
-> Service
-> Proxy DescribeStudioLifecycleConfig
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeStudioLifecycleConfig)))
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> Logger
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe POSIX
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe StudioLifecycleConfigAppType
-> Maybe Text
-> Int
-> DescribeStudioLifecycleConfigResponse
DescribeStudioLifecycleConfigResponse'
(Maybe POSIX
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe StudioLifecycleConfigAppType
-> Maybe Text
-> Int
-> DescribeStudioLifecycleConfigResponse)
-> Either String (Maybe POSIX)
-> Either
String
(Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe StudioLifecycleConfigAppType
-> Maybe Text
-> Int
-> DescribeStudioLifecycleConfigResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Either String (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"CreationTime")
Either
String
(Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe StudioLifecycleConfigAppType
-> Maybe Text
-> Int
-> DescribeStudioLifecycleConfigResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe POSIX
-> Maybe Text
-> Maybe StudioLifecycleConfigAppType
-> Maybe Text
-> Int
-> DescribeStudioLifecycleConfigResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"StudioLifecycleConfigContent")
Either
String
(Maybe POSIX
-> Maybe Text
-> Maybe StudioLifecycleConfigAppType
-> Maybe Text
-> Int
-> DescribeStudioLifecycleConfigResponse)
-> Either String (Maybe POSIX)
-> Either
String
(Maybe Text
-> Maybe StudioLifecycleConfigAppType
-> Maybe Text
-> Int
-> DescribeStudioLifecycleConfigResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"LastModifiedTime")
Either
String
(Maybe Text
-> Maybe StudioLifecycleConfigAppType
-> Maybe Text
-> Int
-> DescribeStudioLifecycleConfigResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe StudioLifecycleConfigAppType
-> Maybe Text -> Int -> DescribeStudioLifecycleConfigResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"StudioLifecycleConfigArn")
Either
String
(Maybe StudioLifecycleConfigAppType
-> Maybe Text -> Int -> DescribeStudioLifecycleConfigResponse)
-> Either String (Maybe StudioLifecycleConfigAppType)
-> Either
String (Maybe Text -> Int -> DescribeStudioLifecycleConfigResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object
-> Text -> Either String (Maybe StudioLifecycleConfigAppType)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"StudioLifecycleConfigAppType")
Either
String (Maybe Text -> Int -> DescribeStudioLifecycleConfigResponse)
-> Either String (Maybe Text)
-> Either String (Int -> DescribeStudioLifecycleConfigResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"StudioLifecycleConfigName")
Either String (Int -> DescribeStudioLifecycleConfigResponse)
-> Either String Int
-> Either String DescribeStudioLifecycleConfigResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Int -> Either String Int
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (Int -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance
Prelude.Hashable
DescribeStudioLifecycleConfig
instance Prelude.NFData DescribeStudioLifecycleConfig
instance Core.ToHeaders DescribeStudioLifecycleConfig where
toHeaders :: DescribeStudioLifecycleConfig -> ResponseHeaders
toHeaders =
ResponseHeaders -> DescribeStudioLifecycleConfig -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"SageMaker.DescribeStudioLifecycleConfig" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Core.ToJSON DescribeStudioLifecycleConfig where
toJSON :: DescribeStudioLifecycleConfig -> Value
toJSON DescribeStudioLifecycleConfig' {Text
studioLifecycleConfigName :: Text
$sel:studioLifecycleConfigName:DescribeStudioLifecycleConfig' :: DescribeStudioLifecycleConfig -> Text
..} =
[Pair] -> Value
Core.object
( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
( Text
"StudioLifecycleConfigName"
Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= Text
studioLifecycleConfigName
)
]
)
instance Core.ToPath DescribeStudioLifecycleConfig where
toPath :: DescribeStudioLifecycleConfig -> ByteString
toPath = ByteString -> DescribeStudioLifecycleConfig -> ByteString
forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Core.ToQuery DescribeStudioLifecycleConfig where
toQuery :: DescribeStudioLifecycleConfig -> QueryString
toQuery = QueryString -> DescribeStudioLifecycleConfig -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data DescribeStudioLifecycleConfigResponse = DescribeStudioLifecycleConfigResponse'
{
DescribeStudioLifecycleConfigResponse -> Maybe POSIX
creationTime :: Prelude.Maybe Core.POSIX,
DescribeStudioLifecycleConfigResponse -> Maybe Text
studioLifecycleConfigContent :: Prelude.Maybe Prelude.Text,
DescribeStudioLifecycleConfigResponse -> Maybe POSIX
lastModifiedTime :: Prelude.Maybe Core.POSIX,
DescribeStudioLifecycleConfigResponse -> Maybe Text
studioLifecycleConfigArn :: Prelude.Maybe Prelude.Text,
DescribeStudioLifecycleConfigResponse
-> Maybe StudioLifecycleConfigAppType
studioLifecycleConfigAppType :: Prelude.Maybe StudioLifecycleConfigAppType,
DescribeStudioLifecycleConfigResponse -> Maybe Text
studioLifecycleConfigName :: Prelude.Maybe Prelude.Text,
DescribeStudioLifecycleConfigResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeStudioLifecycleConfigResponse
-> DescribeStudioLifecycleConfigResponse -> Bool
(DescribeStudioLifecycleConfigResponse
-> DescribeStudioLifecycleConfigResponse -> Bool)
-> (DescribeStudioLifecycleConfigResponse
-> DescribeStudioLifecycleConfigResponse -> Bool)
-> Eq DescribeStudioLifecycleConfigResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeStudioLifecycleConfigResponse
-> DescribeStudioLifecycleConfigResponse -> Bool
$c/= :: DescribeStudioLifecycleConfigResponse
-> DescribeStudioLifecycleConfigResponse -> Bool
== :: DescribeStudioLifecycleConfigResponse
-> DescribeStudioLifecycleConfigResponse -> Bool
$c== :: DescribeStudioLifecycleConfigResponse
-> DescribeStudioLifecycleConfigResponse -> Bool
Prelude.Eq, ReadPrec [DescribeStudioLifecycleConfigResponse]
ReadPrec DescribeStudioLifecycleConfigResponse
Int -> ReadS DescribeStudioLifecycleConfigResponse
ReadS [DescribeStudioLifecycleConfigResponse]
(Int -> ReadS DescribeStudioLifecycleConfigResponse)
-> ReadS [DescribeStudioLifecycleConfigResponse]
-> ReadPrec DescribeStudioLifecycleConfigResponse
-> ReadPrec [DescribeStudioLifecycleConfigResponse]
-> Read DescribeStudioLifecycleConfigResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeStudioLifecycleConfigResponse]
$creadListPrec :: ReadPrec [DescribeStudioLifecycleConfigResponse]
readPrec :: ReadPrec DescribeStudioLifecycleConfigResponse
$creadPrec :: ReadPrec DescribeStudioLifecycleConfigResponse
readList :: ReadS [DescribeStudioLifecycleConfigResponse]
$creadList :: ReadS [DescribeStudioLifecycleConfigResponse]
readsPrec :: Int -> ReadS DescribeStudioLifecycleConfigResponse
$creadsPrec :: Int -> ReadS DescribeStudioLifecycleConfigResponse
Prelude.Read, Int -> DescribeStudioLifecycleConfigResponse -> ShowS
[DescribeStudioLifecycleConfigResponse] -> ShowS
DescribeStudioLifecycleConfigResponse -> String
(Int -> DescribeStudioLifecycleConfigResponse -> ShowS)
-> (DescribeStudioLifecycleConfigResponse -> String)
-> ([DescribeStudioLifecycleConfigResponse] -> ShowS)
-> Show DescribeStudioLifecycleConfigResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeStudioLifecycleConfigResponse] -> ShowS
$cshowList :: [DescribeStudioLifecycleConfigResponse] -> ShowS
show :: DescribeStudioLifecycleConfigResponse -> String
$cshow :: DescribeStudioLifecycleConfigResponse -> String
showsPrec :: Int -> DescribeStudioLifecycleConfigResponse -> ShowS
$cshowsPrec :: Int -> DescribeStudioLifecycleConfigResponse -> ShowS
Prelude.Show, (forall x.
DescribeStudioLifecycleConfigResponse
-> Rep DescribeStudioLifecycleConfigResponse x)
-> (forall x.
Rep DescribeStudioLifecycleConfigResponse x
-> DescribeStudioLifecycleConfigResponse)
-> Generic DescribeStudioLifecycleConfigResponse
forall x.
Rep DescribeStudioLifecycleConfigResponse x
-> DescribeStudioLifecycleConfigResponse
forall x.
DescribeStudioLifecycleConfigResponse
-> Rep DescribeStudioLifecycleConfigResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeStudioLifecycleConfigResponse x
-> DescribeStudioLifecycleConfigResponse
$cfrom :: forall x.
DescribeStudioLifecycleConfigResponse
-> Rep DescribeStudioLifecycleConfigResponse x
Prelude.Generic)
newDescribeStudioLifecycleConfigResponse ::
Prelude.Int ->
DescribeStudioLifecycleConfigResponse
newDescribeStudioLifecycleConfigResponse :: Int -> DescribeStudioLifecycleConfigResponse
newDescribeStudioLifecycleConfigResponse Int
pHttpStatus_ =
DescribeStudioLifecycleConfigResponse' :: Maybe POSIX
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe StudioLifecycleConfigAppType
-> Maybe Text
-> Int
-> DescribeStudioLifecycleConfigResponse
DescribeStudioLifecycleConfigResponse'
{ $sel:creationTime:DescribeStudioLifecycleConfigResponse' :: Maybe POSIX
creationTime =
Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:studioLifecycleConfigContent:DescribeStudioLifecycleConfigResponse' :: Maybe Text
studioLifecycleConfigContent =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:lastModifiedTime:DescribeStudioLifecycleConfigResponse' :: Maybe POSIX
lastModifiedTime = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:studioLifecycleConfigArn:DescribeStudioLifecycleConfigResponse' :: Maybe Text
studioLifecycleConfigArn =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:studioLifecycleConfigAppType:DescribeStudioLifecycleConfigResponse' :: Maybe StudioLifecycleConfigAppType
studioLifecycleConfigAppType =
Maybe StudioLifecycleConfigAppType
forall a. Maybe a
Prelude.Nothing,
$sel:studioLifecycleConfigName:DescribeStudioLifecycleConfigResponse' :: Maybe Text
studioLifecycleConfigName =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeStudioLifecycleConfigResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeStudioLifecycleConfigResponse_creationTime :: Lens.Lens' DescribeStudioLifecycleConfigResponse (Prelude.Maybe Prelude.UTCTime)
describeStudioLifecycleConfigResponse_creationTime :: (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse
describeStudioLifecycleConfigResponse_creationTime = (DescribeStudioLifecycleConfigResponse -> Maybe POSIX)
-> (DescribeStudioLifecycleConfigResponse
-> Maybe POSIX -> DescribeStudioLifecycleConfigResponse)
-> Lens
DescribeStudioLifecycleConfigResponse
DescribeStudioLifecycleConfigResponse
(Maybe POSIX)
(Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeStudioLifecycleConfigResponse' {Maybe POSIX
creationTime :: Maybe POSIX
$sel:creationTime:DescribeStudioLifecycleConfigResponse' :: DescribeStudioLifecycleConfigResponse -> Maybe POSIX
creationTime} -> Maybe POSIX
creationTime) (\s :: DescribeStudioLifecycleConfigResponse
s@DescribeStudioLifecycleConfigResponse' {} Maybe POSIX
a -> DescribeStudioLifecycleConfigResponse
s {$sel:creationTime:DescribeStudioLifecycleConfigResponse' :: Maybe POSIX
creationTime = Maybe POSIX
a} :: DescribeStudioLifecycleConfigResponse) ((Maybe POSIX -> f (Maybe POSIX))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
describeStudioLifecycleConfigResponse_studioLifecycleConfigContent :: Lens.Lens' DescribeStudioLifecycleConfigResponse (Prelude.Maybe Prelude.Text)
describeStudioLifecycleConfigResponse_studioLifecycleConfigContent :: (Maybe Text -> f (Maybe Text))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse
describeStudioLifecycleConfigResponse_studioLifecycleConfigContent = (DescribeStudioLifecycleConfigResponse -> Maybe Text)
-> (DescribeStudioLifecycleConfigResponse
-> Maybe Text -> DescribeStudioLifecycleConfigResponse)
-> Lens
DescribeStudioLifecycleConfigResponse
DescribeStudioLifecycleConfigResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeStudioLifecycleConfigResponse' {Maybe Text
studioLifecycleConfigContent :: Maybe Text
$sel:studioLifecycleConfigContent:DescribeStudioLifecycleConfigResponse' :: DescribeStudioLifecycleConfigResponse -> Maybe Text
studioLifecycleConfigContent} -> Maybe Text
studioLifecycleConfigContent) (\s :: DescribeStudioLifecycleConfigResponse
s@DescribeStudioLifecycleConfigResponse' {} Maybe Text
a -> DescribeStudioLifecycleConfigResponse
s {$sel:studioLifecycleConfigContent:DescribeStudioLifecycleConfigResponse' :: Maybe Text
studioLifecycleConfigContent = Maybe Text
a} :: DescribeStudioLifecycleConfigResponse)
describeStudioLifecycleConfigResponse_lastModifiedTime :: Lens.Lens' DescribeStudioLifecycleConfigResponse (Prelude.Maybe Prelude.UTCTime)
describeStudioLifecycleConfigResponse_lastModifiedTime :: (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse
describeStudioLifecycleConfigResponse_lastModifiedTime = (DescribeStudioLifecycleConfigResponse -> Maybe POSIX)
-> (DescribeStudioLifecycleConfigResponse
-> Maybe POSIX -> DescribeStudioLifecycleConfigResponse)
-> Lens
DescribeStudioLifecycleConfigResponse
DescribeStudioLifecycleConfigResponse
(Maybe POSIX)
(Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeStudioLifecycleConfigResponse' {Maybe POSIX
lastModifiedTime :: Maybe POSIX
$sel:lastModifiedTime:DescribeStudioLifecycleConfigResponse' :: DescribeStudioLifecycleConfigResponse -> Maybe POSIX
lastModifiedTime} -> Maybe POSIX
lastModifiedTime) (\s :: DescribeStudioLifecycleConfigResponse
s@DescribeStudioLifecycleConfigResponse' {} Maybe POSIX
a -> DescribeStudioLifecycleConfigResponse
s {$sel:lastModifiedTime:DescribeStudioLifecycleConfigResponse' :: Maybe POSIX
lastModifiedTime = Maybe POSIX
a} :: DescribeStudioLifecycleConfigResponse) ((Maybe POSIX -> f (Maybe POSIX))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
describeStudioLifecycleConfigResponse_studioLifecycleConfigArn :: Lens.Lens' DescribeStudioLifecycleConfigResponse (Prelude.Maybe Prelude.Text)
describeStudioLifecycleConfigResponse_studioLifecycleConfigArn :: (Maybe Text -> f (Maybe Text))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse
describeStudioLifecycleConfigResponse_studioLifecycleConfigArn = (DescribeStudioLifecycleConfigResponse -> Maybe Text)
-> (DescribeStudioLifecycleConfigResponse
-> Maybe Text -> DescribeStudioLifecycleConfigResponse)
-> Lens
DescribeStudioLifecycleConfigResponse
DescribeStudioLifecycleConfigResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeStudioLifecycleConfigResponse' {Maybe Text
studioLifecycleConfigArn :: Maybe Text
$sel:studioLifecycleConfigArn:DescribeStudioLifecycleConfigResponse' :: DescribeStudioLifecycleConfigResponse -> Maybe Text
studioLifecycleConfigArn} -> Maybe Text
studioLifecycleConfigArn) (\s :: DescribeStudioLifecycleConfigResponse
s@DescribeStudioLifecycleConfigResponse' {} Maybe Text
a -> DescribeStudioLifecycleConfigResponse
s {$sel:studioLifecycleConfigArn:DescribeStudioLifecycleConfigResponse' :: Maybe Text
studioLifecycleConfigArn = Maybe Text
a} :: DescribeStudioLifecycleConfigResponse)
describeStudioLifecycleConfigResponse_studioLifecycleConfigAppType :: Lens.Lens' DescribeStudioLifecycleConfigResponse (Prelude.Maybe StudioLifecycleConfigAppType)
describeStudioLifecycleConfigResponse_studioLifecycleConfigAppType :: (Maybe StudioLifecycleConfigAppType
-> f (Maybe StudioLifecycleConfigAppType))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse
describeStudioLifecycleConfigResponse_studioLifecycleConfigAppType = (DescribeStudioLifecycleConfigResponse
-> Maybe StudioLifecycleConfigAppType)
-> (DescribeStudioLifecycleConfigResponse
-> Maybe StudioLifecycleConfigAppType
-> DescribeStudioLifecycleConfigResponse)
-> Lens
DescribeStudioLifecycleConfigResponse
DescribeStudioLifecycleConfigResponse
(Maybe StudioLifecycleConfigAppType)
(Maybe StudioLifecycleConfigAppType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeStudioLifecycleConfigResponse' {Maybe StudioLifecycleConfigAppType
studioLifecycleConfigAppType :: Maybe StudioLifecycleConfigAppType
$sel:studioLifecycleConfigAppType:DescribeStudioLifecycleConfigResponse' :: DescribeStudioLifecycleConfigResponse
-> Maybe StudioLifecycleConfigAppType
studioLifecycleConfigAppType} -> Maybe StudioLifecycleConfigAppType
studioLifecycleConfigAppType) (\s :: DescribeStudioLifecycleConfigResponse
s@DescribeStudioLifecycleConfigResponse' {} Maybe StudioLifecycleConfigAppType
a -> DescribeStudioLifecycleConfigResponse
s {$sel:studioLifecycleConfigAppType:DescribeStudioLifecycleConfigResponse' :: Maybe StudioLifecycleConfigAppType
studioLifecycleConfigAppType = Maybe StudioLifecycleConfigAppType
a} :: DescribeStudioLifecycleConfigResponse)
describeStudioLifecycleConfigResponse_studioLifecycleConfigName :: Lens.Lens' DescribeStudioLifecycleConfigResponse (Prelude.Maybe Prelude.Text)
describeStudioLifecycleConfigResponse_studioLifecycleConfigName :: (Maybe Text -> f (Maybe Text))
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse
describeStudioLifecycleConfigResponse_studioLifecycleConfigName = (DescribeStudioLifecycleConfigResponse -> Maybe Text)
-> (DescribeStudioLifecycleConfigResponse
-> Maybe Text -> DescribeStudioLifecycleConfigResponse)
-> Lens
DescribeStudioLifecycleConfigResponse
DescribeStudioLifecycleConfigResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeStudioLifecycleConfigResponse' {Maybe Text
studioLifecycleConfigName :: Maybe Text
$sel:studioLifecycleConfigName:DescribeStudioLifecycleConfigResponse' :: DescribeStudioLifecycleConfigResponse -> Maybe Text
studioLifecycleConfigName} -> Maybe Text
studioLifecycleConfigName) (\s :: DescribeStudioLifecycleConfigResponse
s@DescribeStudioLifecycleConfigResponse' {} Maybe Text
a -> DescribeStudioLifecycleConfigResponse
s {$sel:studioLifecycleConfigName:DescribeStudioLifecycleConfigResponse' :: Maybe Text
studioLifecycleConfigName = Maybe Text
a} :: DescribeStudioLifecycleConfigResponse)
describeStudioLifecycleConfigResponse_httpStatus :: Lens.Lens' DescribeStudioLifecycleConfigResponse Prelude.Int
describeStudioLifecycleConfigResponse_httpStatus :: (Int -> f Int)
-> DescribeStudioLifecycleConfigResponse
-> f DescribeStudioLifecycleConfigResponse
describeStudioLifecycleConfigResponse_httpStatus = (DescribeStudioLifecycleConfigResponse -> Int)
-> (DescribeStudioLifecycleConfigResponse
-> Int -> DescribeStudioLifecycleConfigResponse)
-> Lens
DescribeStudioLifecycleConfigResponse
DescribeStudioLifecycleConfigResponse
Int
Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeStudioLifecycleConfigResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeStudioLifecycleConfigResponse' :: DescribeStudioLifecycleConfigResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeStudioLifecycleConfigResponse
s@DescribeStudioLifecycleConfigResponse' {} Int
a -> DescribeStudioLifecycleConfigResponse
s {$sel:httpStatus:DescribeStudioLifecycleConfigResponse' :: Int
httpStatus = Int
a} :: DescribeStudioLifecycleConfigResponse)
instance
Prelude.NFData
DescribeStudioLifecycleConfigResponse