{-# 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.AppConfig.ListHostedConfigurationVersions
(
ListHostedConfigurationVersions (..),
newListHostedConfigurationVersions,
listHostedConfigurationVersions_nextToken,
listHostedConfigurationVersions_maxResults,
listHostedConfigurationVersions_applicationId,
listHostedConfigurationVersions_configurationProfileId,
ListHostedConfigurationVersionsResponse (..),
newListHostedConfigurationVersionsResponse,
listHostedConfigurationVersionsResponse_items,
listHostedConfigurationVersionsResponse_nextToken,
listHostedConfigurationVersionsResponse_httpStatus,
)
where
import Amazonka.AppConfig.Types
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
data ListHostedConfigurationVersions = ListHostedConfigurationVersions'
{
ListHostedConfigurationVersions -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListHostedConfigurationVersions -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListHostedConfigurationVersions -> Text
applicationId :: Prelude.Text,
ListHostedConfigurationVersions -> Text
configurationProfileId :: Prelude.Text
}
deriving (ListHostedConfigurationVersions
-> ListHostedConfigurationVersions -> Bool
(ListHostedConfigurationVersions
-> ListHostedConfigurationVersions -> Bool)
-> (ListHostedConfigurationVersions
-> ListHostedConfigurationVersions -> Bool)
-> Eq ListHostedConfigurationVersions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListHostedConfigurationVersions
-> ListHostedConfigurationVersions -> Bool
$c/= :: ListHostedConfigurationVersions
-> ListHostedConfigurationVersions -> Bool
== :: ListHostedConfigurationVersions
-> ListHostedConfigurationVersions -> Bool
$c== :: ListHostedConfigurationVersions
-> ListHostedConfigurationVersions -> Bool
Prelude.Eq, ReadPrec [ListHostedConfigurationVersions]
ReadPrec ListHostedConfigurationVersions
Int -> ReadS ListHostedConfigurationVersions
ReadS [ListHostedConfigurationVersions]
(Int -> ReadS ListHostedConfigurationVersions)
-> ReadS [ListHostedConfigurationVersions]
-> ReadPrec ListHostedConfigurationVersions
-> ReadPrec [ListHostedConfigurationVersions]
-> Read ListHostedConfigurationVersions
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListHostedConfigurationVersions]
$creadListPrec :: ReadPrec [ListHostedConfigurationVersions]
readPrec :: ReadPrec ListHostedConfigurationVersions
$creadPrec :: ReadPrec ListHostedConfigurationVersions
readList :: ReadS [ListHostedConfigurationVersions]
$creadList :: ReadS [ListHostedConfigurationVersions]
readsPrec :: Int -> ReadS ListHostedConfigurationVersions
$creadsPrec :: Int -> ReadS ListHostedConfigurationVersions
Prelude.Read, Int -> ListHostedConfigurationVersions -> ShowS
[ListHostedConfigurationVersions] -> ShowS
ListHostedConfigurationVersions -> String
(Int -> ListHostedConfigurationVersions -> ShowS)
-> (ListHostedConfigurationVersions -> String)
-> ([ListHostedConfigurationVersions] -> ShowS)
-> Show ListHostedConfigurationVersions
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListHostedConfigurationVersions] -> ShowS
$cshowList :: [ListHostedConfigurationVersions] -> ShowS
show :: ListHostedConfigurationVersions -> String
$cshow :: ListHostedConfigurationVersions -> String
showsPrec :: Int -> ListHostedConfigurationVersions -> ShowS
$cshowsPrec :: Int -> ListHostedConfigurationVersions -> ShowS
Prelude.Show, (forall x.
ListHostedConfigurationVersions
-> Rep ListHostedConfigurationVersions x)
-> (forall x.
Rep ListHostedConfigurationVersions x
-> ListHostedConfigurationVersions)
-> Generic ListHostedConfigurationVersions
forall x.
Rep ListHostedConfigurationVersions x
-> ListHostedConfigurationVersions
forall x.
ListHostedConfigurationVersions
-> Rep ListHostedConfigurationVersions x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListHostedConfigurationVersions x
-> ListHostedConfigurationVersions
$cfrom :: forall x.
ListHostedConfigurationVersions
-> Rep ListHostedConfigurationVersions x
Prelude.Generic)
newListHostedConfigurationVersions ::
Prelude.Text ->
Prelude.Text ->
ListHostedConfigurationVersions
newListHostedConfigurationVersions :: Text -> Text -> ListHostedConfigurationVersions
newListHostedConfigurationVersions
Text
pApplicationId_
Text
pConfigurationProfileId_ =
ListHostedConfigurationVersions' :: Maybe Text
-> Maybe Natural -> Text -> Text -> ListHostedConfigurationVersions
ListHostedConfigurationVersions'
{ $sel:nextToken:ListHostedConfigurationVersions' :: Maybe Text
nextToken =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:ListHostedConfigurationVersions' :: Maybe Natural
maxResults = Maybe Natural
forall a. Maybe a
Prelude.Nothing,
$sel:applicationId:ListHostedConfigurationVersions' :: Text
applicationId = Text
pApplicationId_,
$sel:configurationProfileId:ListHostedConfigurationVersions' :: Text
configurationProfileId =
Text
pConfigurationProfileId_
}
listHostedConfigurationVersions_nextToken :: Lens.Lens' ListHostedConfigurationVersions (Prelude.Maybe Prelude.Text)
listHostedConfigurationVersions_nextToken :: (Maybe Text -> f (Maybe Text))
-> ListHostedConfigurationVersions
-> f ListHostedConfigurationVersions
listHostedConfigurationVersions_nextToken = (ListHostedConfigurationVersions -> Maybe Text)
-> (ListHostedConfigurationVersions
-> Maybe Text -> ListHostedConfigurationVersions)
-> Lens
ListHostedConfigurationVersions
ListHostedConfigurationVersions
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListHostedConfigurationVersions' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListHostedConfigurationVersions
s@ListHostedConfigurationVersions' {} Maybe Text
a -> ListHostedConfigurationVersions
s {$sel:nextToken:ListHostedConfigurationVersions' :: Maybe Text
nextToken = Maybe Text
a} :: ListHostedConfigurationVersions)
listHostedConfigurationVersions_maxResults :: Lens.Lens' ListHostedConfigurationVersions (Prelude.Maybe Prelude.Natural)
listHostedConfigurationVersions_maxResults :: (Maybe Natural -> f (Maybe Natural))
-> ListHostedConfigurationVersions
-> f ListHostedConfigurationVersions
listHostedConfigurationVersions_maxResults = (ListHostedConfigurationVersions -> Maybe Natural)
-> (ListHostedConfigurationVersions
-> Maybe Natural -> ListHostedConfigurationVersions)
-> Lens
ListHostedConfigurationVersions
ListHostedConfigurationVersions
(Maybe Natural)
(Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListHostedConfigurationVersions' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListHostedConfigurationVersions
s@ListHostedConfigurationVersions' {} Maybe Natural
a -> ListHostedConfigurationVersions
s {$sel:maxResults:ListHostedConfigurationVersions' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListHostedConfigurationVersions)
listHostedConfigurationVersions_applicationId :: Lens.Lens' ListHostedConfigurationVersions Prelude.Text
listHostedConfigurationVersions_applicationId :: (Text -> f Text)
-> ListHostedConfigurationVersions
-> f ListHostedConfigurationVersions
listHostedConfigurationVersions_applicationId = (ListHostedConfigurationVersions -> Text)
-> (ListHostedConfigurationVersions
-> Text -> ListHostedConfigurationVersions)
-> Lens
ListHostedConfigurationVersions
ListHostedConfigurationVersions
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListHostedConfigurationVersions' {Text
applicationId :: Text
$sel:applicationId:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Text
applicationId} -> Text
applicationId) (\s :: ListHostedConfigurationVersions
s@ListHostedConfigurationVersions' {} Text
a -> ListHostedConfigurationVersions
s {$sel:applicationId:ListHostedConfigurationVersions' :: Text
applicationId = Text
a} :: ListHostedConfigurationVersions)
listHostedConfigurationVersions_configurationProfileId :: Lens.Lens' ListHostedConfigurationVersions Prelude.Text
listHostedConfigurationVersions_configurationProfileId :: (Text -> f Text)
-> ListHostedConfigurationVersions
-> f ListHostedConfigurationVersions
listHostedConfigurationVersions_configurationProfileId = (ListHostedConfigurationVersions -> Text)
-> (ListHostedConfigurationVersions
-> Text -> ListHostedConfigurationVersions)
-> Lens
ListHostedConfigurationVersions
ListHostedConfigurationVersions
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListHostedConfigurationVersions' {Text
configurationProfileId :: Text
$sel:configurationProfileId:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Text
configurationProfileId} -> Text
configurationProfileId) (\s :: ListHostedConfigurationVersions
s@ListHostedConfigurationVersions' {} Text
a -> ListHostedConfigurationVersions
s {$sel:configurationProfileId:ListHostedConfigurationVersions' :: Text
configurationProfileId = Text
a} :: ListHostedConfigurationVersions)
instance
Core.AWSRequest
ListHostedConfigurationVersions
where
type
AWSResponse ListHostedConfigurationVersions =
ListHostedConfigurationVersionsResponse
request :: ListHostedConfigurationVersions
-> Request ListHostedConfigurationVersions
request = Service
-> ListHostedConfigurationVersions
-> Request ListHostedConfigurationVersions
forall a. ToRequest a => Service -> a -> Request a
Request.get Service
defaultService
response :: Logger
-> Service
-> Proxy ListHostedConfigurationVersions
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse ListHostedConfigurationVersions)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse ListHostedConfigurationVersions))
-> Logger
-> Service
-> Proxy ListHostedConfigurationVersions
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse ListHostedConfigurationVersions)))
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 [HostedConfigurationVersionSummary]
-> Maybe Text -> Int -> ListHostedConfigurationVersionsResponse
ListHostedConfigurationVersionsResponse'
(Maybe [HostedConfigurationVersionSummary]
-> Maybe Text -> Int -> ListHostedConfigurationVersionsResponse)
-> Either String (Maybe [HostedConfigurationVersionSummary])
-> Either
String
(Maybe Text -> Int -> ListHostedConfigurationVersionsResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object
-> Text
-> Either
String (Maybe (Maybe [HostedConfigurationVersionSummary]))
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"Items" Either String (Maybe (Maybe [HostedConfigurationVersionSummary]))
-> Maybe [HostedConfigurationVersionSummary]
-> Either String (Maybe [HostedConfigurationVersionSummary])
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ Maybe [HostedConfigurationVersionSummary]
forall a. Monoid a => a
Prelude.mempty)
Either
String
(Maybe Text -> Int -> ListHostedConfigurationVersionsResponse)
-> Either String (Maybe Text)
-> Either String (Int -> ListHostedConfigurationVersionsResponse)
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
"NextToken")
Either String (Int -> ListHostedConfigurationVersionsResponse)
-> Either String Int
-> Either String ListHostedConfigurationVersionsResponse
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
ListHostedConfigurationVersions
instance
Prelude.NFData
ListHostedConfigurationVersions
instance
Core.ToHeaders
ListHostedConfigurationVersions
where
toHeaders :: ListHostedConfigurationVersions -> ResponseHeaders
toHeaders =
ResponseHeaders
-> ListHostedConfigurationVersions -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ 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.ToPath ListHostedConfigurationVersions where
toPath :: ListHostedConfigurationVersions -> ByteString
toPath ListHostedConfigurationVersions' {Maybe Natural
Maybe Text
Text
configurationProfileId :: Text
applicationId :: Text
maxResults :: Maybe Natural
nextToken :: Maybe Text
$sel:configurationProfileId:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Text
$sel:applicationId:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Text
$sel:maxResults:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Maybe Natural
$sel:nextToken:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Maybe Text
..} =
[ByteString] -> ByteString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/applications/",
Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
applicationId,
ByteString
"/configurationprofiles/",
Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
configurationProfileId,
ByteString
"/hostedconfigurationversions"
]
instance Core.ToQuery ListHostedConfigurationVersions where
toQuery :: ListHostedConfigurationVersions -> QueryString
toQuery ListHostedConfigurationVersions' {Maybe Natural
Maybe Text
Text
configurationProfileId :: Text
applicationId :: Text
maxResults :: Maybe Natural
nextToken :: Maybe Text
$sel:configurationProfileId:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Text
$sel:applicationId:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Text
$sel:maxResults:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Maybe Natural
$sel:nextToken:ListHostedConfigurationVersions' :: ListHostedConfigurationVersions -> Maybe Text
..} =
[QueryString] -> QueryString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"next_token" ByteString -> Maybe Text -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe Text
nextToken,
ByteString
"max_results" ByteString -> Maybe Natural -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe Natural
maxResults
]
data ListHostedConfigurationVersionsResponse = ListHostedConfigurationVersionsResponse'
{
ListHostedConfigurationVersionsResponse
-> Maybe [HostedConfigurationVersionSummary]
items :: Prelude.Maybe [HostedConfigurationVersionSummary],
ListHostedConfigurationVersionsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListHostedConfigurationVersionsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListHostedConfigurationVersionsResponse
-> ListHostedConfigurationVersionsResponse -> Bool
(ListHostedConfigurationVersionsResponse
-> ListHostedConfigurationVersionsResponse -> Bool)
-> (ListHostedConfigurationVersionsResponse
-> ListHostedConfigurationVersionsResponse -> Bool)
-> Eq ListHostedConfigurationVersionsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListHostedConfigurationVersionsResponse
-> ListHostedConfigurationVersionsResponse -> Bool
$c/= :: ListHostedConfigurationVersionsResponse
-> ListHostedConfigurationVersionsResponse -> Bool
== :: ListHostedConfigurationVersionsResponse
-> ListHostedConfigurationVersionsResponse -> Bool
$c== :: ListHostedConfigurationVersionsResponse
-> ListHostedConfigurationVersionsResponse -> Bool
Prelude.Eq, ReadPrec [ListHostedConfigurationVersionsResponse]
ReadPrec ListHostedConfigurationVersionsResponse
Int -> ReadS ListHostedConfigurationVersionsResponse
ReadS [ListHostedConfigurationVersionsResponse]
(Int -> ReadS ListHostedConfigurationVersionsResponse)
-> ReadS [ListHostedConfigurationVersionsResponse]
-> ReadPrec ListHostedConfigurationVersionsResponse
-> ReadPrec [ListHostedConfigurationVersionsResponse]
-> Read ListHostedConfigurationVersionsResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListHostedConfigurationVersionsResponse]
$creadListPrec :: ReadPrec [ListHostedConfigurationVersionsResponse]
readPrec :: ReadPrec ListHostedConfigurationVersionsResponse
$creadPrec :: ReadPrec ListHostedConfigurationVersionsResponse
readList :: ReadS [ListHostedConfigurationVersionsResponse]
$creadList :: ReadS [ListHostedConfigurationVersionsResponse]
readsPrec :: Int -> ReadS ListHostedConfigurationVersionsResponse
$creadsPrec :: Int -> ReadS ListHostedConfigurationVersionsResponse
Prelude.Read, Int -> ListHostedConfigurationVersionsResponse -> ShowS
[ListHostedConfigurationVersionsResponse] -> ShowS
ListHostedConfigurationVersionsResponse -> String
(Int -> ListHostedConfigurationVersionsResponse -> ShowS)
-> (ListHostedConfigurationVersionsResponse -> String)
-> ([ListHostedConfigurationVersionsResponse] -> ShowS)
-> Show ListHostedConfigurationVersionsResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListHostedConfigurationVersionsResponse] -> ShowS
$cshowList :: [ListHostedConfigurationVersionsResponse] -> ShowS
show :: ListHostedConfigurationVersionsResponse -> String
$cshow :: ListHostedConfigurationVersionsResponse -> String
showsPrec :: Int -> ListHostedConfigurationVersionsResponse -> ShowS
$cshowsPrec :: Int -> ListHostedConfigurationVersionsResponse -> ShowS
Prelude.Show, (forall x.
ListHostedConfigurationVersionsResponse
-> Rep ListHostedConfigurationVersionsResponse x)
-> (forall x.
Rep ListHostedConfigurationVersionsResponse x
-> ListHostedConfigurationVersionsResponse)
-> Generic ListHostedConfigurationVersionsResponse
forall x.
Rep ListHostedConfigurationVersionsResponse x
-> ListHostedConfigurationVersionsResponse
forall x.
ListHostedConfigurationVersionsResponse
-> Rep ListHostedConfigurationVersionsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListHostedConfigurationVersionsResponse x
-> ListHostedConfigurationVersionsResponse
$cfrom :: forall x.
ListHostedConfigurationVersionsResponse
-> Rep ListHostedConfigurationVersionsResponse x
Prelude.Generic)
newListHostedConfigurationVersionsResponse ::
Prelude.Int ->
ListHostedConfigurationVersionsResponse
newListHostedConfigurationVersionsResponse :: Int -> ListHostedConfigurationVersionsResponse
newListHostedConfigurationVersionsResponse
Int
pHttpStatus_ =
ListHostedConfigurationVersionsResponse' :: Maybe [HostedConfigurationVersionSummary]
-> Maybe Text -> Int -> ListHostedConfigurationVersionsResponse
ListHostedConfigurationVersionsResponse'
{ $sel:items:ListHostedConfigurationVersionsResponse' :: Maybe [HostedConfigurationVersionSummary]
items =
Maybe [HostedConfigurationVersionSummary]
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListHostedConfigurationVersionsResponse' :: Maybe Text
nextToken = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListHostedConfigurationVersionsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listHostedConfigurationVersionsResponse_items :: Lens.Lens' ListHostedConfigurationVersionsResponse (Prelude.Maybe [HostedConfigurationVersionSummary])
listHostedConfigurationVersionsResponse_items :: (Maybe [HostedConfigurationVersionSummary]
-> f (Maybe [HostedConfigurationVersionSummary]))
-> ListHostedConfigurationVersionsResponse
-> f ListHostedConfigurationVersionsResponse
listHostedConfigurationVersionsResponse_items = (ListHostedConfigurationVersionsResponse
-> Maybe [HostedConfigurationVersionSummary])
-> (ListHostedConfigurationVersionsResponse
-> Maybe [HostedConfigurationVersionSummary]
-> ListHostedConfigurationVersionsResponse)
-> Lens
ListHostedConfigurationVersionsResponse
ListHostedConfigurationVersionsResponse
(Maybe [HostedConfigurationVersionSummary])
(Maybe [HostedConfigurationVersionSummary])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListHostedConfigurationVersionsResponse' {Maybe [HostedConfigurationVersionSummary]
items :: Maybe [HostedConfigurationVersionSummary]
$sel:items:ListHostedConfigurationVersionsResponse' :: ListHostedConfigurationVersionsResponse
-> Maybe [HostedConfigurationVersionSummary]
items} -> Maybe [HostedConfigurationVersionSummary]
items) (\s :: ListHostedConfigurationVersionsResponse
s@ListHostedConfigurationVersionsResponse' {} Maybe [HostedConfigurationVersionSummary]
a -> ListHostedConfigurationVersionsResponse
s {$sel:items:ListHostedConfigurationVersionsResponse' :: Maybe [HostedConfigurationVersionSummary]
items = Maybe [HostedConfigurationVersionSummary]
a} :: ListHostedConfigurationVersionsResponse) ((Maybe [HostedConfigurationVersionSummary]
-> f (Maybe [HostedConfigurationVersionSummary]))
-> ListHostedConfigurationVersionsResponse
-> f ListHostedConfigurationVersionsResponse)
-> ((Maybe [HostedConfigurationVersionSummary]
-> f (Maybe [HostedConfigurationVersionSummary]))
-> Maybe [HostedConfigurationVersionSummary]
-> f (Maybe [HostedConfigurationVersionSummary]))
-> (Maybe [HostedConfigurationVersionSummary]
-> f (Maybe [HostedConfigurationVersionSummary]))
-> ListHostedConfigurationVersionsResponse
-> f ListHostedConfigurationVersionsResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
[HostedConfigurationVersionSummary]
[HostedConfigurationVersionSummary]
[HostedConfigurationVersionSummary]
[HostedConfigurationVersionSummary]
-> Iso
(Maybe [HostedConfigurationVersionSummary])
(Maybe [HostedConfigurationVersionSummary])
(Maybe [HostedConfigurationVersionSummary])
(Maybe [HostedConfigurationVersionSummary])
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
[HostedConfigurationVersionSummary]
[HostedConfigurationVersionSummary]
[HostedConfigurationVersionSummary]
[HostedConfigurationVersionSummary]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
listHostedConfigurationVersionsResponse_nextToken :: Lens.Lens' ListHostedConfigurationVersionsResponse (Prelude.Maybe Prelude.Text)
listHostedConfigurationVersionsResponse_nextToken :: (Maybe Text -> f (Maybe Text))
-> ListHostedConfigurationVersionsResponse
-> f ListHostedConfigurationVersionsResponse
listHostedConfigurationVersionsResponse_nextToken = (ListHostedConfigurationVersionsResponse -> Maybe Text)
-> (ListHostedConfigurationVersionsResponse
-> Maybe Text -> ListHostedConfigurationVersionsResponse)
-> Lens
ListHostedConfigurationVersionsResponse
ListHostedConfigurationVersionsResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListHostedConfigurationVersionsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListHostedConfigurationVersionsResponse' :: ListHostedConfigurationVersionsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListHostedConfigurationVersionsResponse
s@ListHostedConfigurationVersionsResponse' {} Maybe Text
a -> ListHostedConfigurationVersionsResponse
s {$sel:nextToken:ListHostedConfigurationVersionsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListHostedConfigurationVersionsResponse)
listHostedConfigurationVersionsResponse_httpStatus :: Lens.Lens' ListHostedConfigurationVersionsResponse Prelude.Int
listHostedConfigurationVersionsResponse_httpStatus :: (Int -> f Int)
-> ListHostedConfigurationVersionsResponse
-> f ListHostedConfigurationVersionsResponse
listHostedConfigurationVersionsResponse_httpStatus = (ListHostedConfigurationVersionsResponse -> Int)
-> (ListHostedConfigurationVersionsResponse
-> Int -> ListHostedConfigurationVersionsResponse)
-> Lens
ListHostedConfigurationVersionsResponse
ListHostedConfigurationVersionsResponse
Int
Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListHostedConfigurationVersionsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListHostedConfigurationVersionsResponse' :: ListHostedConfigurationVersionsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListHostedConfigurationVersionsResponse
s@ListHostedConfigurationVersionsResponse' {} Int
a -> ListHostedConfigurationVersionsResponse
s {$sel:httpStatus:ListHostedConfigurationVersionsResponse' :: Int
httpStatus = Int
a} :: ListHostedConfigurationVersionsResponse)
instance
Prelude.NFData
ListHostedConfigurationVersionsResponse