{-# 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.DescribeHubContent
(
DescribeHubContent (..),
newDescribeHubContent,
describeHubContent_hubContentVersion,
describeHubContent_hubName,
describeHubContent_hubContentType,
describeHubContent_hubContentName,
DescribeHubContentResponse (..),
newDescribeHubContentResponse,
describeHubContentResponse_failureReason,
describeHubContentResponse_hubContentDependencies,
describeHubContentResponse_hubContentDescription,
describeHubContentResponse_hubContentDisplayName,
describeHubContentResponse_hubContentMarkdown,
describeHubContentResponse_hubContentSearchKeywords,
describeHubContentResponse_httpStatus,
describeHubContentResponse_hubContentName,
describeHubContentResponse_hubContentArn,
describeHubContentResponse_hubContentVersion,
describeHubContentResponse_hubContentType,
describeHubContentResponse_documentSchemaVersion,
describeHubContentResponse_hubName,
describeHubContentResponse_hubArn,
describeHubContentResponse_hubContentDocument,
describeHubContentResponse_hubContentStatus,
describeHubContentResponse_creationTime,
)
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 qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.SageMaker.Types
data DescribeHubContent = DescribeHubContent'
{
DescribeHubContent -> Maybe Text
hubContentVersion :: Prelude.Maybe Prelude.Text,
DescribeHubContent -> Text
hubName :: Prelude.Text,
DescribeHubContent -> HubContentType
hubContentType :: HubContentType,
DescribeHubContent -> Text
hubContentName :: Prelude.Text
}
deriving (DescribeHubContent -> DescribeHubContent -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeHubContent -> DescribeHubContent -> Bool
$c/= :: DescribeHubContent -> DescribeHubContent -> Bool
== :: DescribeHubContent -> DescribeHubContent -> Bool
$c== :: DescribeHubContent -> DescribeHubContent -> Bool
Prelude.Eq, ReadPrec [DescribeHubContent]
ReadPrec DescribeHubContent
Int -> ReadS DescribeHubContent
ReadS [DescribeHubContent]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeHubContent]
$creadListPrec :: ReadPrec [DescribeHubContent]
readPrec :: ReadPrec DescribeHubContent
$creadPrec :: ReadPrec DescribeHubContent
readList :: ReadS [DescribeHubContent]
$creadList :: ReadS [DescribeHubContent]
readsPrec :: Int -> ReadS DescribeHubContent
$creadsPrec :: Int -> ReadS DescribeHubContent
Prelude.Read, Int -> DescribeHubContent -> ShowS
[DescribeHubContent] -> ShowS
DescribeHubContent -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeHubContent] -> ShowS
$cshowList :: [DescribeHubContent] -> ShowS
show :: DescribeHubContent -> String
$cshow :: DescribeHubContent -> String
showsPrec :: Int -> DescribeHubContent -> ShowS
$cshowsPrec :: Int -> DescribeHubContent -> ShowS
Prelude.Show, forall x. Rep DescribeHubContent x -> DescribeHubContent
forall x. DescribeHubContent -> Rep DescribeHubContent x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DescribeHubContent x -> DescribeHubContent
$cfrom :: forall x. DescribeHubContent -> Rep DescribeHubContent x
Prelude.Generic)
newDescribeHubContent ::
Prelude.Text ->
HubContentType ->
Prelude.Text ->
DescribeHubContent
newDescribeHubContent :: Text -> HubContentType -> Text -> DescribeHubContent
newDescribeHubContent
Text
pHubName_
HubContentType
pHubContentType_
Text
pHubContentName_ =
DescribeHubContent'
{ $sel:hubContentVersion:DescribeHubContent' :: Maybe Text
hubContentVersion =
forall a. Maybe a
Prelude.Nothing,
$sel:hubName:DescribeHubContent' :: Text
hubName = Text
pHubName_,
$sel:hubContentType:DescribeHubContent' :: HubContentType
hubContentType = HubContentType
pHubContentType_,
$sel:hubContentName:DescribeHubContent' :: Text
hubContentName = Text
pHubContentName_
}
describeHubContent_hubContentVersion :: Lens.Lens' DescribeHubContent (Prelude.Maybe Prelude.Text)
describeHubContent_hubContentVersion :: Lens' DescribeHubContent (Maybe Text)
describeHubContent_hubContentVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContent' {Maybe Text
hubContentVersion :: Maybe Text
$sel:hubContentVersion:DescribeHubContent' :: DescribeHubContent -> Maybe Text
hubContentVersion} -> Maybe Text
hubContentVersion) (\s :: DescribeHubContent
s@DescribeHubContent' {} Maybe Text
a -> DescribeHubContent
s {$sel:hubContentVersion:DescribeHubContent' :: Maybe Text
hubContentVersion = Maybe Text
a} :: DescribeHubContent)
describeHubContent_hubName :: Lens.Lens' DescribeHubContent Prelude.Text
describeHubContent_hubName :: Lens' DescribeHubContent Text
describeHubContent_hubName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContent' {Text
hubName :: Text
$sel:hubName:DescribeHubContent' :: DescribeHubContent -> Text
hubName} -> Text
hubName) (\s :: DescribeHubContent
s@DescribeHubContent' {} Text
a -> DescribeHubContent
s {$sel:hubName:DescribeHubContent' :: Text
hubName = Text
a} :: DescribeHubContent)
describeHubContent_hubContentType :: Lens.Lens' DescribeHubContent HubContentType
describeHubContent_hubContentType :: Lens' DescribeHubContent HubContentType
describeHubContent_hubContentType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContent' {HubContentType
hubContentType :: HubContentType
$sel:hubContentType:DescribeHubContent' :: DescribeHubContent -> HubContentType
hubContentType} -> HubContentType
hubContentType) (\s :: DescribeHubContent
s@DescribeHubContent' {} HubContentType
a -> DescribeHubContent
s {$sel:hubContentType:DescribeHubContent' :: HubContentType
hubContentType = HubContentType
a} :: DescribeHubContent)
describeHubContent_hubContentName :: Lens.Lens' DescribeHubContent Prelude.Text
describeHubContent_hubContentName :: Lens' DescribeHubContent Text
describeHubContent_hubContentName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContent' {Text
hubContentName :: Text
$sel:hubContentName:DescribeHubContent' :: DescribeHubContent -> Text
hubContentName} -> Text
hubContentName) (\s :: DescribeHubContent
s@DescribeHubContent' {} Text
a -> DescribeHubContent
s {$sel:hubContentName:DescribeHubContent' :: Text
hubContentName = Text
a} :: DescribeHubContent)
instance Core.AWSRequest DescribeHubContent where
type
AWSResponse DescribeHubContent =
DescribeHubContentResponse
request :: (Service -> Service)
-> DescribeHubContent -> Request DescribeHubContent
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 DescribeHubContent
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeHubContent)))
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 [HubContentDependency]
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe [Text]
-> Int
-> Text
-> Text
-> Text
-> HubContentType
-> Text
-> Text
-> Text
-> Text
-> HubContentStatus
-> POSIX
-> DescribeHubContentResponse
DescribeHubContentResponse'
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
"FailureReason")
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
"HubContentDependencies"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
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
"HubContentDescription")
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
"HubContentDisplayName")
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
"HubContentMarkdown")
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
"HubContentSearchKeywords"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
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))
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"HubContentName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"HubContentArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"HubContentVersion")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"HubContentType")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"DocumentSchemaVersion")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"HubName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"HubArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"HubContentDocument")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"HubContentStatus")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"CreationTime")
)
instance Prelude.Hashable DescribeHubContent where
hashWithSalt :: Int -> DescribeHubContent -> Int
hashWithSalt Int
_salt DescribeHubContent' {Maybe Text
Text
HubContentType
hubContentName :: Text
hubContentType :: HubContentType
hubName :: Text
hubContentVersion :: Maybe Text
$sel:hubContentName:DescribeHubContent' :: DescribeHubContent -> Text
$sel:hubContentType:DescribeHubContent' :: DescribeHubContent -> HubContentType
$sel:hubName:DescribeHubContent' :: DescribeHubContent -> Text
$sel:hubContentVersion:DescribeHubContent' :: DescribeHubContent -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
hubContentVersion
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
hubName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` HubContentType
hubContentType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
hubContentName
instance Prelude.NFData DescribeHubContent where
rnf :: DescribeHubContent -> ()
rnf DescribeHubContent' {Maybe Text
Text
HubContentType
hubContentName :: Text
hubContentType :: HubContentType
hubName :: Text
hubContentVersion :: Maybe Text
$sel:hubContentName:DescribeHubContent' :: DescribeHubContent -> Text
$sel:hubContentType:DescribeHubContent' :: DescribeHubContent -> HubContentType
$sel:hubName:DescribeHubContent' :: DescribeHubContent -> Text
$sel:hubContentVersion:DescribeHubContent' :: DescribeHubContent -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
hubContentVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
hubName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf HubContentType
hubContentType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
hubContentName
instance Data.ToHeaders DescribeHubContent where
toHeaders :: DescribeHubContent -> 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
"SageMaker.DescribeHubContent" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON DescribeHubContent where
toJSON :: DescribeHubContent -> Value
toJSON DescribeHubContent' {Maybe Text
Text
HubContentType
hubContentName :: Text
hubContentType :: HubContentType
hubName :: Text
hubContentVersion :: Maybe Text
$sel:hubContentName:DescribeHubContent' :: DescribeHubContent -> Text
$sel:hubContentType:DescribeHubContent' :: DescribeHubContent -> HubContentType
$sel:hubName:DescribeHubContent' :: DescribeHubContent -> Text
$sel:hubContentVersion:DescribeHubContent' :: DescribeHubContent -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"HubContentVersion" 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
hubContentVersion,
forall a. a -> Maybe a
Prelude.Just (Key
"HubName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
hubName),
forall a. a -> Maybe a
Prelude.Just
(Key
"HubContentType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= HubContentType
hubContentType),
forall a. a -> Maybe a
Prelude.Just
(Key
"HubContentName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
hubContentName)
]
)
instance Data.ToPath DescribeHubContent where
toPath :: DescribeHubContent -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeHubContent where
toQuery :: DescribeHubContent -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeHubContentResponse = DescribeHubContentResponse'
{
DescribeHubContentResponse -> Maybe Text
failureReason :: Prelude.Maybe Prelude.Text,
DescribeHubContentResponse -> Maybe [HubContentDependency]
hubContentDependencies :: Prelude.Maybe [HubContentDependency],
DescribeHubContentResponse -> Maybe Text
hubContentDescription :: Prelude.Maybe Prelude.Text,
DescribeHubContentResponse -> Maybe Text
hubContentDisplayName :: Prelude.Maybe Prelude.Text,
DescribeHubContentResponse -> Maybe Text
hubContentMarkdown :: Prelude.Maybe Prelude.Text,
DescribeHubContentResponse -> Maybe [Text]
hubContentSearchKeywords :: Prelude.Maybe [Prelude.Text],
DescribeHubContentResponse -> Int
httpStatus :: Prelude.Int,
DescribeHubContentResponse -> Text
hubContentName :: Prelude.Text,
DescribeHubContentResponse -> Text
hubContentArn :: Prelude.Text,
DescribeHubContentResponse -> Text
hubContentVersion :: Prelude.Text,
DescribeHubContentResponse -> HubContentType
hubContentType :: HubContentType,
DescribeHubContentResponse -> Text
documentSchemaVersion :: Prelude.Text,
DescribeHubContentResponse -> Text
hubName :: Prelude.Text,
DescribeHubContentResponse -> Text
hubArn :: Prelude.Text,
DescribeHubContentResponse -> Text
hubContentDocument :: Prelude.Text,
DescribeHubContentResponse -> HubContentStatus
hubContentStatus :: HubContentStatus,
DescribeHubContentResponse -> POSIX
creationTime :: Data.POSIX
}
deriving (DescribeHubContentResponse -> DescribeHubContentResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeHubContentResponse -> DescribeHubContentResponse -> Bool
$c/= :: DescribeHubContentResponse -> DescribeHubContentResponse -> Bool
== :: DescribeHubContentResponse -> DescribeHubContentResponse -> Bool
$c== :: DescribeHubContentResponse -> DescribeHubContentResponse -> Bool
Prelude.Eq, ReadPrec [DescribeHubContentResponse]
ReadPrec DescribeHubContentResponse
Int -> ReadS DescribeHubContentResponse
ReadS [DescribeHubContentResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeHubContentResponse]
$creadListPrec :: ReadPrec [DescribeHubContentResponse]
readPrec :: ReadPrec DescribeHubContentResponse
$creadPrec :: ReadPrec DescribeHubContentResponse
readList :: ReadS [DescribeHubContentResponse]
$creadList :: ReadS [DescribeHubContentResponse]
readsPrec :: Int -> ReadS DescribeHubContentResponse
$creadsPrec :: Int -> ReadS DescribeHubContentResponse
Prelude.Read, Int -> DescribeHubContentResponse -> ShowS
[DescribeHubContentResponse] -> ShowS
DescribeHubContentResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeHubContentResponse] -> ShowS
$cshowList :: [DescribeHubContentResponse] -> ShowS
show :: DescribeHubContentResponse -> String
$cshow :: DescribeHubContentResponse -> String
showsPrec :: Int -> DescribeHubContentResponse -> ShowS
$cshowsPrec :: Int -> DescribeHubContentResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeHubContentResponse x -> DescribeHubContentResponse
forall x.
DescribeHubContentResponse -> Rep DescribeHubContentResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeHubContentResponse x -> DescribeHubContentResponse
$cfrom :: forall x.
DescribeHubContentResponse -> Rep DescribeHubContentResponse x
Prelude.Generic)
newDescribeHubContentResponse ::
Prelude.Int ->
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
HubContentType ->
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
HubContentStatus ->
Prelude.UTCTime ->
DescribeHubContentResponse
newDescribeHubContentResponse :: Int
-> Text
-> Text
-> Text
-> HubContentType
-> Text
-> Text
-> Text
-> Text
-> HubContentStatus
-> UTCTime
-> DescribeHubContentResponse
newDescribeHubContentResponse
Int
pHttpStatus_
Text
pHubContentName_
Text
pHubContentArn_
Text
pHubContentVersion_
HubContentType
pHubContentType_
Text
pDocumentSchemaVersion_
Text
pHubName_
Text
pHubArn_
Text
pHubContentDocument_
HubContentStatus
pHubContentStatus_
UTCTime
pCreationTime_ =
DescribeHubContentResponse'
{ $sel:failureReason:DescribeHubContentResponse' :: Maybe Text
failureReason =
forall a. Maybe a
Prelude.Nothing,
$sel:hubContentDependencies:DescribeHubContentResponse' :: Maybe [HubContentDependency]
hubContentDependencies = forall a. Maybe a
Prelude.Nothing,
$sel:hubContentDescription:DescribeHubContentResponse' :: Maybe Text
hubContentDescription = forall a. Maybe a
Prelude.Nothing,
$sel:hubContentDisplayName:DescribeHubContentResponse' :: Maybe Text
hubContentDisplayName = forall a. Maybe a
Prelude.Nothing,
$sel:hubContentMarkdown:DescribeHubContentResponse' :: Maybe Text
hubContentMarkdown = forall a. Maybe a
Prelude.Nothing,
$sel:hubContentSearchKeywords:DescribeHubContentResponse' :: Maybe [Text]
hubContentSearchKeywords = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeHubContentResponse' :: Int
httpStatus = Int
pHttpStatus_,
$sel:hubContentName:DescribeHubContentResponse' :: Text
hubContentName = Text
pHubContentName_,
$sel:hubContentArn:DescribeHubContentResponse' :: Text
hubContentArn = Text
pHubContentArn_,
$sel:hubContentVersion:DescribeHubContentResponse' :: Text
hubContentVersion = Text
pHubContentVersion_,
$sel:hubContentType:DescribeHubContentResponse' :: HubContentType
hubContentType = HubContentType
pHubContentType_,
$sel:documentSchemaVersion:DescribeHubContentResponse' :: Text
documentSchemaVersion = Text
pDocumentSchemaVersion_,
$sel:hubName:DescribeHubContentResponse' :: Text
hubName = Text
pHubName_,
$sel:hubArn:DescribeHubContentResponse' :: Text
hubArn = Text
pHubArn_,
$sel:hubContentDocument:DescribeHubContentResponse' :: Text
hubContentDocument = Text
pHubContentDocument_,
$sel:hubContentStatus:DescribeHubContentResponse' :: HubContentStatus
hubContentStatus = HubContentStatus
pHubContentStatus_,
$sel:creationTime:DescribeHubContentResponse' :: POSIX
creationTime = forall (a :: Format). Iso' (Time a) UTCTime
Data._Time forall t b. AReview t b -> b -> t
Lens.# UTCTime
pCreationTime_
}
describeHubContentResponse_failureReason :: Lens.Lens' DescribeHubContentResponse (Prelude.Maybe Prelude.Text)
describeHubContentResponse_failureReason :: Lens' DescribeHubContentResponse (Maybe Text)
describeHubContentResponse_failureReason = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Maybe Text
failureReason :: Maybe Text
$sel:failureReason:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe Text
failureReason} -> Maybe Text
failureReason) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Maybe Text
a -> DescribeHubContentResponse
s {$sel:failureReason:DescribeHubContentResponse' :: Maybe Text
failureReason = Maybe Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentDependencies :: Lens.Lens' DescribeHubContentResponse (Prelude.Maybe [HubContentDependency])
describeHubContentResponse_hubContentDependencies :: Lens' DescribeHubContentResponse (Maybe [HubContentDependency])
describeHubContentResponse_hubContentDependencies = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Maybe [HubContentDependency]
hubContentDependencies :: Maybe [HubContentDependency]
$sel:hubContentDependencies:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe [HubContentDependency]
hubContentDependencies} -> Maybe [HubContentDependency]
hubContentDependencies) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Maybe [HubContentDependency]
a -> DescribeHubContentResponse
s {$sel:hubContentDependencies:DescribeHubContentResponse' :: Maybe [HubContentDependency]
hubContentDependencies = Maybe [HubContentDependency]
a} :: DescribeHubContentResponse) 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
describeHubContentResponse_hubContentDescription :: Lens.Lens' DescribeHubContentResponse (Prelude.Maybe Prelude.Text)
describeHubContentResponse_hubContentDescription :: Lens' DescribeHubContentResponse (Maybe Text)
describeHubContentResponse_hubContentDescription = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Maybe Text
hubContentDescription :: Maybe Text
$sel:hubContentDescription:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe Text
hubContentDescription} -> Maybe Text
hubContentDescription) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Maybe Text
a -> DescribeHubContentResponse
s {$sel:hubContentDescription:DescribeHubContentResponse' :: Maybe Text
hubContentDescription = Maybe Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentDisplayName :: Lens.Lens' DescribeHubContentResponse (Prelude.Maybe Prelude.Text)
describeHubContentResponse_hubContentDisplayName :: Lens' DescribeHubContentResponse (Maybe Text)
describeHubContentResponse_hubContentDisplayName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Maybe Text
hubContentDisplayName :: Maybe Text
$sel:hubContentDisplayName:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe Text
hubContentDisplayName} -> Maybe Text
hubContentDisplayName) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Maybe Text
a -> DescribeHubContentResponse
s {$sel:hubContentDisplayName:DescribeHubContentResponse' :: Maybe Text
hubContentDisplayName = Maybe Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentMarkdown :: Lens.Lens' DescribeHubContentResponse (Prelude.Maybe Prelude.Text)
describeHubContentResponse_hubContentMarkdown :: Lens' DescribeHubContentResponse (Maybe Text)
describeHubContentResponse_hubContentMarkdown = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Maybe Text
hubContentMarkdown :: Maybe Text
$sel:hubContentMarkdown:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe Text
hubContentMarkdown} -> Maybe Text
hubContentMarkdown) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Maybe Text
a -> DescribeHubContentResponse
s {$sel:hubContentMarkdown:DescribeHubContentResponse' :: Maybe Text
hubContentMarkdown = Maybe Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentSearchKeywords :: Lens.Lens' DescribeHubContentResponse (Prelude.Maybe [Prelude.Text])
describeHubContentResponse_hubContentSearchKeywords :: Lens' DescribeHubContentResponse (Maybe [Text])
describeHubContentResponse_hubContentSearchKeywords = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Maybe [Text]
hubContentSearchKeywords :: Maybe [Text]
$sel:hubContentSearchKeywords:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe [Text]
hubContentSearchKeywords} -> Maybe [Text]
hubContentSearchKeywords) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Maybe [Text]
a -> DescribeHubContentResponse
s {$sel:hubContentSearchKeywords:DescribeHubContentResponse' :: Maybe [Text]
hubContentSearchKeywords = Maybe [Text]
a} :: DescribeHubContentResponse) 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
describeHubContentResponse_httpStatus :: Lens.Lens' DescribeHubContentResponse Prelude.Int
describeHubContentResponse_httpStatus :: Lens' DescribeHubContentResponse Int
describeHubContentResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeHubContentResponse' :: DescribeHubContentResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Int
a -> DescribeHubContentResponse
s {$sel:httpStatus:DescribeHubContentResponse' :: Int
httpStatus = Int
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentName :: Lens.Lens' DescribeHubContentResponse Prelude.Text
describeHubContentResponse_hubContentName :: Lens' DescribeHubContentResponse Text
describeHubContentResponse_hubContentName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Text
hubContentName :: Text
$sel:hubContentName:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
hubContentName} -> Text
hubContentName) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Text
a -> DescribeHubContentResponse
s {$sel:hubContentName:DescribeHubContentResponse' :: Text
hubContentName = Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentArn :: Lens.Lens' DescribeHubContentResponse Prelude.Text
describeHubContentResponse_hubContentArn :: Lens' DescribeHubContentResponse Text
describeHubContentResponse_hubContentArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Text
hubContentArn :: Text
$sel:hubContentArn:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
hubContentArn} -> Text
hubContentArn) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Text
a -> DescribeHubContentResponse
s {$sel:hubContentArn:DescribeHubContentResponse' :: Text
hubContentArn = Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentVersion :: Lens.Lens' DescribeHubContentResponse Prelude.Text
describeHubContentResponse_hubContentVersion :: Lens' DescribeHubContentResponse Text
describeHubContentResponse_hubContentVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Text
hubContentVersion :: Text
$sel:hubContentVersion:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
hubContentVersion} -> Text
hubContentVersion) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Text
a -> DescribeHubContentResponse
s {$sel:hubContentVersion:DescribeHubContentResponse' :: Text
hubContentVersion = Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentType :: Lens.Lens' DescribeHubContentResponse HubContentType
describeHubContentResponse_hubContentType :: Lens' DescribeHubContentResponse HubContentType
describeHubContentResponse_hubContentType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {HubContentType
hubContentType :: HubContentType
$sel:hubContentType:DescribeHubContentResponse' :: DescribeHubContentResponse -> HubContentType
hubContentType} -> HubContentType
hubContentType) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} HubContentType
a -> DescribeHubContentResponse
s {$sel:hubContentType:DescribeHubContentResponse' :: HubContentType
hubContentType = HubContentType
a} :: DescribeHubContentResponse)
describeHubContentResponse_documentSchemaVersion :: Lens.Lens' DescribeHubContentResponse Prelude.Text
describeHubContentResponse_documentSchemaVersion :: Lens' DescribeHubContentResponse Text
describeHubContentResponse_documentSchemaVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Text
documentSchemaVersion :: Text
$sel:documentSchemaVersion:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
documentSchemaVersion} -> Text
documentSchemaVersion) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Text
a -> DescribeHubContentResponse
s {$sel:documentSchemaVersion:DescribeHubContentResponse' :: Text
documentSchemaVersion = Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubName :: Lens.Lens' DescribeHubContentResponse Prelude.Text
describeHubContentResponse_hubName :: Lens' DescribeHubContentResponse Text
describeHubContentResponse_hubName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Text
hubName :: Text
$sel:hubName:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
hubName} -> Text
hubName) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Text
a -> DescribeHubContentResponse
s {$sel:hubName:DescribeHubContentResponse' :: Text
hubName = Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubArn :: Lens.Lens' DescribeHubContentResponse Prelude.Text
describeHubContentResponse_hubArn :: Lens' DescribeHubContentResponse Text
describeHubContentResponse_hubArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Text
hubArn :: Text
$sel:hubArn:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
hubArn} -> Text
hubArn) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Text
a -> DescribeHubContentResponse
s {$sel:hubArn:DescribeHubContentResponse' :: Text
hubArn = Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentDocument :: Lens.Lens' DescribeHubContentResponse Prelude.Text
describeHubContentResponse_hubContentDocument :: Lens' DescribeHubContentResponse Text
describeHubContentResponse_hubContentDocument = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {Text
hubContentDocument :: Text
$sel:hubContentDocument:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
hubContentDocument} -> Text
hubContentDocument) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} Text
a -> DescribeHubContentResponse
s {$sel:hubContentDocument:DescribeHubContentResponse' :: Text
hubContentDocument = Text
a} :: DescribeHubContentResponse)
describeHubContentResponse_hubContentStatus :: Lens.Lens' DescribeHubContentResponse HubContentStatus
describeHubContentResponse_hubContentStatus :: Lens' DescribeHubContentResponse HubContentStatus
describeHubContentResponse_hubContentStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {HubContentStatus
hubContentStatus :: HubContentStatus
$sel:hubContentStatus:DescribeHubContentResponse' :: DescribeHubContentResponse -> HubContentStatus
hubContentStatus} -> HubContentStatus
hubContentStatus) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} HubContentStatus
a -> DescribeHubContentResponse
s {$sel:hubContentStatus:DescribeHubContentResponse' :: HubContentStatus
hubContentStatus = HubContentStatus
a} :: DescribeHubContentResponse)
describeHubContentResponse_creationTime :: Lens.Lens' DescribeHubContentResponse Prelude.UTCTime
describeHubContentResponse_creationTime :: Lens' DescribeHubContentResponse UTCTime
describeHubContentResponse_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeHubContentResponse' {POSIX
creationTime :: POSIX
$sel:creationTime:DescribeHubContentResponse' :: DescribeHubContentResponse -> POSIX
creationTime} -> POSIX
creationTime) (\s :: DescribeHubContentResponse
s@DescribeHubContentResponse' {} POSIX
a -> DescribeHubContentResponse
s {$sel:creationTime:DescribeHubContentResponse' :: POSIX
creationTime = POSIX
a} :: DescribeHubContentResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (a :: Format). Iso' (Time a) UTCTime
Data._Time
instance Prelude.NFData DescribeHubContentResponse where
rnf :: DescribeHubContentResponse -> ()
rnf DescribeHubContentResponse' {Int
Maybe [Text]
Maybe [HubContentDependency]
Maybe Text
Text
POSIX
HubContentStatus
HubContentType
creationTime :: POSIX
hubContentStatus :: HubContentStatus
hubContentDocument :: Text
hubArn :: Text
hubName :: Text
documentSchemaVersion :: Text
hubContentType :: HubContentType
hubContentVersion :: Text
hubContentArn :: Text
hubContentName :: Text
httpStatus :: Int
hubContentSearchKeywords :: Maybe [Text]
hubContentMarkdown :: Maybe Text
hubContentDisplayName :: Maybe Text
hubContentDescription :: Maybe Text
hubContentDependencies :: Maybe [HubContentDependency]
failureReason :: Maybe Text
$sel:creationTime:DescribeHubContentResponse' :: DescribeHubContentResponse -> POSIX
$sel:hubContentStatus:DescribeHubContentResponse' :: DescribeHubContentResponse -> HubContentStatus
$sel:hubContentDocument:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
$sel:hubArn:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
$sel:hubName:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
$sel:documentSchemaVersion:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
$sel:hubContentType:DescribeHubContentResponse' :: DescribeHubContentResponse -> HubContentType
$sel:hubContentVersion:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
$sel:hubContentArn:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
$sel:hubContentName:DescribeHubContentResponse' :: DescribeHubContentResponse -> Text
$sel:httpStatus:DescribeHubContentResponse' :: DescribeHubContentResponse -> Int
$sel:hubContentSearchKeywords:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe [Text]
$sel:hubContentMarkdown:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe Text
$sel:hubContentDisplayName:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe Text
$sel:hubContentDescription:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe Text
$sel:hubContentDependencies:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe [HubContentDependency]
$sel:failureReason:DescribeHubContentResponse' :: DescribeHubContentResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
failureReason
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [HubContentDependency]
hubContentDependencies
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
hubContentDescription
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
hubContentDisplayName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
hubContentMarkdown
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
hubContentSearchKeywords
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
hubContentName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
hubContentArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
hubContentVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf HubContentType
hubContentType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
documentSchemaVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
hubName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
hubArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
hubContentDocument
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf HubContentStatus
hubContentStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf POSIX
creationTime