{-# 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.ResilienceHub.ListUnsupportedAppVersionResources
(
ListUnsupportedAppVersionResources (..),
newListUnsupportedAppVersionResources,
listUnsupportedAppVersionResources_maxResults,
listUnsupportedAppVersionResources_nextToken,
listUnsupportedAppVersionResources_resolutionId,
listUnsupportedAppVersionResources_appArn,
listUnsupportedAppVersionResources_appVersion,
ListUnsupportedAppVersionResourcesResponse (..),
newListUnsupportedAppVersionResourcesResponse,
listUnsupportedAppVersionResourcesResponse_nextToken,
listUnsupportedAppVersionResourcesResponse_httpStatus,
listUnsupportedAppVersionResourcesResponse_resolutionId,
listUnsupportedAppVersionResourcesResponse_unsupportedResources,
)
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 Amazonka.ResilienceHub.Types
import qualified Amazonka.Response as Response
data ListUnsupportedAppVersionResources = ListUnsupportedAppVersionResources'
{
ListUnsupportedAppVersionResources -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListUnsupportedAppVersionResources -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListUnsupportedAppVersionResources -> Maybe Text
resolutionId :: Prelude.Maybe Prelude.Text,
ListUnsupportedAppVersionResources -> Text
appArn :: Prelude.Text,
ListUnsupportedAppVersionResources -> Text
appVersion :: Prelude.Text
}
deriving (ListUnsupportedAppVersionResources
-> ListUnsupportedAppVersionResources -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListUnsupportedAppVersionResources
-> ListUnsupportedAppVersionResources -> Bool
$c/= :: ListUnsupportedAppVersionResources
-> ListUnsupportedAppVersionResources -> Bool
== :: ListUnsupportedAppVersionResources
-> ListUnsupportedAppVersionResources -> Bool
$c== :: ListUnsupportedAppVersionResources
-> ListUnsupportedAppVersionResources -> Bool
Prelude.Eq, ReadPrec [ListUnsupportedAppVersionResources]
ReadPrec ListUnsupportedAppVersionResources
Int -> ReadS ListUnsupportedAppVersionResources
ReadS [ListUnsupportedAppVersionResources]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListUnsupportedAppVersionResources]
$creadListPrec :: ReadPrec [ListUnsupportedAppVersionResources]
readPrec :: ReadPrec ListUnsupportedAppVersionResources
$creadPrec :: ReadPrec ListUnsupportedAppVersionResources
readList :: ReadS [ListUnsupportedAppVersionResources]
$creadList :: ReadS [ListUnsupportedAppVersionResources]
readsPrec :: Int -> ReadS ListUnsupportedAppVersionResources
$creadsPrec :: Int -> ReadS ListUnsupportedAppVersionResources
Prelude.Read, Int -> ListUnsupportedAppVersionResources -> ShowS
[ListUnsupportedAppVersionResources] -> ShowS
ListUnsupportedAppVersionResources -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListUnsupportedAppVersionResources] -> ShowS
$cshowList :: [ListUnsupportedAppVersionResources] -> ShowS
show :: ListUnsupportedAppVersionResources -> String
$cshow :: ListUnsupportedAppVersionResources -> String
showsPrec :: Int -> ListUnsupportedAppVersionResources -> ShowS
$cshowsPrec :: Int -> ListUnsupportedAppVersionResources -> ShowS
Prelude.Show, forall x.
Rep ListUnsupportedAppVersionResources x
-> ListUnsupportedAppVersionResources
forall x.
ListUnsupportedAppVersionResources
-> Rep ListUnsupportedAppVersionResources x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListUnsupportedAppVersionResources x
-> ListUnsupportedAppVersionResources
$cfrom :: forall x.
ListUnsupportedAppVersionResources
-> Rep ListUnsupportedAppVersionResources x
Prelude.Generic)
newListUnsupportedAppVersionResources ::
Prelude.Text ->
Prelude.Text ->
ListUnsupportedAppVersionResources
newListUnsupportedAppVersionResources :: Text -> Text -> ListUnsupportedAppVersionResources
newListUnsupportedAppVersionResources
Text
pAppArn_
Text
pAppVersion_ =
ListUnsupportedAppVersionResources'
{ $sel:maxResults:ListUnsupportedAppVersionResources' :: Maybe Natural
maxResults =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListUnsupportedAppVersionResources' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:resolutionId:ListUnsupportedAppVersionResources' :: Maybe Text
resolutionId = forall a. Maybe a
Prelude.Nothing,
$sel:appArn:ListUnsupportedAppVersionResources' :: Text
appArn = Text
pAppArn_,
$sel:appVersion:ListUnsupportedAppVersionResources' :: Text
appVersion = Text
pAppVersion_
}
listUnsupportedAppVersionResources_maxResults :: Lens.Lens' ListUnsupportedAppVersionResources (Prelude.Maybe Prelude.Natural)
listUnsupportedAppVersionResources_maxResults :: Lens' ListUnsupportedAppVersionResources (Maybe Natural)
listUnsupportedAppVersionResources_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUnsupportedAppVersionResources' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListUnsupportedAppVersionResources
s@ListUnsupportedAppVersionResources' {} Maybe Natural
a -> ListUnsupportedAppVersionResources
s {$sel:maxResults:ListUnsupportedAppVersionResources' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListUnsupportedAppVersionResources)
listUnsupportedAppVersionResources_nextToken :: Lens.Lens' ListUnsupportedAppVersionResources (Prelude.Maybe Prelude.Text)
listUnsupportedAppVersionResources_nextToken :: Lens' ListUnsupportedAppVersionResources (Maybe Text)
listUnsupportedAppVersionResources_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUnsupportedAppVersionResources' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListUnsupportedAppVersionResources
s@ListUnsupportedAppVersionResources' {} Maybe Text
a -> ListUnsupportedAppVersionResources
s {$sel:nextToken:ListUnsupportedAppVersionResources' :: Maybe Text
nextToken = Maybe Text
a} :: ListUnsupportedAppVersionResources)
listUnsupportedAppVersionResources_resolutionId :: Lens.Lens' ListUnsupportedAppVersionResources (Prelude.Maybe Prelude.Text)
listUnsupportedAppVersionResources_resolutionId :: Lens' ListUnsupportedAppVersionResources (Maybe Text)
listUnsupportedAppVersionResources_resolutionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUnsupportedAppVersionResources' {Maybe Text
resolutionId :: Maybe Text
$sel:resolutionId:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Text
resolutionId} -> Maybe Text
resolutionId) (\s :: ListUnsupportedAppVersionResources
s@ListUnsupportedAppVersionResources' {} Maybe Text
a -> ListUnsupportedAppVersionResources
s {$sel:resolutionId:ListUnsupportedAppVersionResources' :: Maybe Text
resolutionId = Maybe Text
a} :: ListUnsupportedAppVersionResources)
listUnsupportedAppVersionResources_appArn :: Lens.Lens' ListUnsupportedAppVersionResources Prelude.Text
listUnsupportedAppVersionResources_appArn :: Lens' ListUnsupportedAppVersionResources Text
listUnsupportedAppVersionResources_appArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUnsupportedAppVersionResources' {Text
appArn :: Text
$sel:appArn:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Text
appArn} -> Text
appArn) (\s :: ListUnsupportedAppVersionResources
s@ListUnsupportedAppVersionResources' {} Text
a -> ListUnsupportedAppVersionResources
s {$sel:appArn:ListUnsupportedAppVersionResources' :: Text
appArn = Text
a} :: ListUnsupportedAppVersionResources)
listUnsupportedAppVersionResources_appVersion :: Lens.Lens' ListUnsupportedAppVersionResources Prelude.Text
listUnsupportedAppVersionResources_appVersion :: Lens' ListUnsupportedAppVersionResources Text
listUnsupportedAppVersionResources_appVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUnsupportedAppVersionResources' {Text
appVersion :: Text
$sel:appVersion:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Text
appVersion} -> Text
appVersion) (\s :: ListUnsupportedAppVersionResources
s@ListUnsupportedAppVersionResources' {} Text
a -> ListUnsupportedAppVersionResources
s {$sel:appVersion:ListUnsupportedAppVersionResources' :: Text
appVersion = Text
a} :: ListUnsupportedAppVersionResources)
instance
Core.AWSRequest
ListUnsupportedAppVersionResources
where
type
AWSResponse ListUnsupportedAppVersionResources =
ListUnsupportedAppVersionResourcesResponse
request :: (Service -> Service)
-> ListUnsupportedAppVersionResources
-> Request ListUnsupportedAppVersionResources
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 ListUnsupportedAppVersionResources
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse (AWSResponse ListUnsupportedAppVersionResources)))
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
-> Int
-> Text
-> [UnsupportedResource]
-> ListUnsupportedAppVersionResourcesResponse
ListUnsupportedAppVersionResourcesResponse'
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
"nextToken")
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
"resolutionId")
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
"unsupportedResources"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
)
instance
Prelude.Hashable
ListUnsupportedAppVersionResources
where
hashWithSalt :: Int -> ListUnsupportedAppVersionResources -> Int
hashWithSalt
Int
_salt
ListUnsupportedAppVersionResources' {Maybe Natural
Maybe Text
Text
appVersion :: Text
appArn :: Text
resolutionId :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:appVersion:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Text
$sel:appArn:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Text
$sel:resolutionId:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Text
$sel:nextToken:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Text
$sel:maxResults:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Natural
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
resolutionId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
appArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
appVersion
instance
Prelude.NFData
ListUnsupportedAppVersionResources
where
rnf :: ListUnsupportedAppVersionResources -> ()
rnf ListUnsupportedAppVersionResources' {Maybe Natural
Maybe Text
Text
appVersion :: Text
appArn :: Text
resolutionId :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:appVersion:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Text
$sel:appArn:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Text
$sel:resolutionId:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Text
$sel:nextToken:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Text
$sel:maxResults:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Natural
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
resolutionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
appArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
appVersion
instance
Data.ToHeaders
ListUnsupportedAppVersionResources
where
toHeaders :: ListUnsupportedAppVersionResources -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance
Data.ToJSON
ListUnsupportedAppVersionResources
where
toJSON :: ListUnsupportedAppVersionResources -> Value
toJSON ListUnsupportedAppVersionResources' {Maybe Natural
Maybe Text
Text
appVersion :: Text
appArn :: Text
resolutionId :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:appVersion:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Text
$sel:appArn:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Text
$sel:resolutionId:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Text
$sel:nextToken:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Text
$sel:maxResults:ListUnsupportedAppVersionResources' :: ListUnsupportedAppVersionResources -> Maybe Natural
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"maxResults" 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 Natural
maxResults,
(Key
"nextToken" 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
nextToken,
(Key
"resolutionId" 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
resolutionId,
forall a. a -> Maybe a
Prelude.Just (Key
"appArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
appArn),
forall a. a -> Maybe a
Prelude.Just (Key
"appVersion" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
appVersion)
]
)
instance
Data.ToPath
ListUnsupportedAppVersionResources
where
toPath :: ListUnsupportedAppVersionResources -> ByteString
toPath =
forall a b. a -> b -> a
Prelude.const
ByteString
"/list-unsupported-app-version-resources"
instance
Data.ToQuery
ListUnsupportedAppVersionResources
where
toQuery :: ListUnsupportedAppVersionResources -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data ListUnsupportedAppVersionResourcesResponse = ListUnsupportedAppVersionResourcesResponse'
{
ListUnsupportedAppVersionResourcesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListUnsupportedAppVersionResourcesResponse -> Int
httpStatus :: Prelude.Int,
ListUnsupportedAppVersionResourcesResponse -> Text
resolutionId :: Prelude.Text,
ListUnsupportedAppVersionResourcesResponse -> [UnsupportedResource]
unsupportedResources :: [UnsupportedResource]
}
deriving (ListUnsupportedAppVersionResourcesResponse
-> ListUnsupportedAppVersionResourcesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListUnsupportedAppVersionResourcesResponse
-> ListUnsupportedAppVersionResourcesResponse -> Bool
$c/= :: ListUnsupportedAppVersionResourcesResponse
-> ListUnsupportedAppVersionResourcesResponse -> Bool
== :: ListUnsupportedAppVersionResourcesResponse
-> ListUnsupportedAppVersionResourcesResponse -> Bool
$c== :: ListUnsupportedAppVersionResourcesResponse
-> ListUnsupportedAppVersionResourcesResponse -> Bool
Prelude.Eq, ReadPrec [ListUnsupportedAppVersionResourcesResponse]
ReadPrec ListUnsupportedAppVersionResourcesResponse
Int -> ReadS ListUnsupportedAppVersionResourcesResponse
ReadS [ListUnsupportedAppVersionResourcesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListUnsupportedAppVersionResourcesResponse]
$creadListPrec :: ReadPrec [ListUnsupportedAppVersionResourcesResponse]
readPrec :: ReadPrec ListUnsupportedAppVersionResourcesResponse
$creadPrec :: ReadPrec ListUnsupportedAppVersionResourcesResponse
readList :: ReadS [ListUnsupportedAppVersionResourcesResponse]
$creadList :: ReadS [ListUnsupportedAppVersionResourcesResponse]
readsPrec :: Int -> ReadS ListUnsupportedAppVersionResourcesResponse
$creadsPrec :: Int -> ReadS ListUnsupportedAppVersionResourcesResponse
Prelude.Read, Int -> ListUnsupportedAppVersionResourcesResponse -> ShowS
[ListUnsupportedAppVersionResourcesResponse] -> ShowS
ListUnsupportedAppVersionResourcesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListUnsupportedAppVersionResourcesResponse] -> ShowS
$cshowList :: [ListUnsupportedAppVersionResourcesResponse] -> ShowS
show :: ListUnsupportedAppVersionResourcesResponse -> String
$cshow :: ListUnsupportedAppVersionResourcesResponse -> String
showsPrec :: Int -> ListUnsupportedAppVersionResourcesResponse -> ShowS
$cshowsPrec :: Int -> ListUnsupportedAppVersionResourcesResponse -> ShowS
Prelude.Show, forall x.
Rep ListUnsupportedAppVersionResourcesResponse x
-> ListUnsupportedAppVersionResourcesResponse
forall x.
ListUnsupportedAppVersionResourcesResponse
-> Rep ListUnsupportedAppVersionResourcesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListUnsupportedAppVersionResourcesResponse x
-> ListUnsupportedAppVersionResourcesResponse
$cfrom :: forall x.
ListUnsupportedAppVersionResourcesResponse
-> Rep ListUnsupportedAppVersionResourcesResponse x
Prelude.Generic)
newListUnsupportedAppVersionResourcesResponse ::
Prelude.Int ->
Prelude.Text ->
ListUnsupportedAppVersionResourcesResponse
newListUnsupportedAppVersionResourcesResponse :: Int -> Text -> ListUnsupportedAppVersionResourcesResponse
newListUnsupportedAppVersionResourcesResponse
Int
pHttpStatus_
Text
pResolutionId_ =
ListUnsupportedAppVersionResourcesResponse'
{ $sel:nextToken:ListUnsupportedAppVersionResourcesResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListUnsupportedAppVersionResourcesResponse' :: Int
httpStatus = Int
pHttpStatus_,
$sel:resolutionId:ListUnsupportedAppVersionResourcesResponse' :: Text
resolutionId = Text
pResolutionId_,
$sel:unsupportedResources:ListUnsupportedAppVersionResourcesResponse' :: [UnsupportedResource]
unsupportedResources =
forall a. Monoid a => a
Prelude.mempty
}
listUnsupportedAppVersionResourcesResponse_nextToken :: Lens.Lens' ListUnsupportedAppVersionResourcesResponse (Prelude.Maybe Prelude.Text)
listUnsupportedAppVersionResourcesResponse_nextToken :: Lens' ListUnsupportedAppVersionResourcesResponse (Maybe Text)
listUnsupportedAppVersionResourcesResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUnsupportedAppVersionResourcesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListUnsupportedAppVersionResourcesResponse' :: ListUnsupportedAppVersionResourcesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListUnsupportedAppVersionResourcesResponse
s@ListUnsupportedAppVersionResourcesResponse' {} Maybe Text
a -> ListUnsupportedAppVersionResourcesResponse
s {$sel:nextToken:ListUnsupportedAppVersionResourcesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListUnsupportedAppVersionResourcesResponse)
listUnsupportedAppVersionResourcesResponse_httpStatus :: Lens.Lens' ListUnsupportedAppVersionResourcesResponse Prelude.Int
listUnsupportedAppVersionResourcesResponse_httpStatus :: Lens' ListUnsupportedAppVersionResourcesResponse Int
listUnsupportedAppVersionResourcesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUnsupportedAppVersionResourcesResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListUnsupportedAppVersionResourcesResponse' :: ListUnsupportedAppVersionResourcesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListUnsupportedAppVersionResourcesResponse
s@ListUnsupportedAppVersionResourcesResponse' {} Int
a -> ListUnsupportedAppVersionResourcesResponse
s {$sel:httpStatus:ListUnsupportedAppVersionResourcesResponse' :: Int
httpStatus = Int
a} :: ListUnsupportedAppVersionResourcesResponse)
listUnsupportedAppVersionResourcesResponse_resolutionId :: Lens.Lens' ListUnsupportedAppVersionResourcesResponse Prelude.Text
listUnsupportedAppVersionResourcesResponse_resolutionId :: Lens' ListUnsupportedAppVersionResourcesResponse Text
listUnsupportedAppVersionResourcesResponse_resolutionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUnsupportedAppVersionResourcesResponse' {Text
resolutionId :: Text
$sel:resolutionId:ListUnsupportedAppVersionResourcesResponse' :: ListUnsupportedAppVersionResourcesResponse -> Text
resolutionId} -> Text
resolutionId) (\s :: ListUnsupportedAppVersionResourcesResponse
s@ListUnsupportedAppVersionResourcesResponse' {} Text
a -> ListUnsupportedAppVersionResourcesResponse
s {$sel:resolutionId:ListUnsupportedAppVersionResourcesResponse' :: Text
resolutionId = Text
a} :: ListUnsupportedAppVersionResourcesResponse)
listUnsupportedAppVersionResourcesResponse_unsupportedResources :: Lens.Lens' ListUnsupportedAppVersionResourcesResponse [UnsupportedResource]
listUnsupportedAppVersionResourcesResponse_unsupportedResources :: Lens'
ListUnsupportedAppVersionResourcesResponse [UnsupportedResource]
listUnsupportedAppVersionResourcesResponse_unsupportedResources = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListUnsupportedAppVersionResourcesResponse' {[UnsupportedResource]
unsupportedResources :: [UnsupportedResource]
$sel:unsupportedResources:ListUnsupportedAppVersionResourcesResponse' :: ListUnsupportedAppVersionResourcesResponse -> [UnsupportedResource]
unsupportedResources} -> [UnsupportedResource]
unsupportedResources) (\s :: ListUnsupportedAppVersionResourcesResponse
s@ListUnsupportedAppVersionResourcesResponse' {} [UnsupportedResource]
a -> ListUnsupportedAppVersionResourcesResponse
s {$sel:unsupportedResources:ListUnsupportedAppVersionResourcesResponse' :: [UnsupportedResource]
unsupportedResources = [UnsupportedResource]
a} :: ListUnsupportedAppVersionResourcesResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
instance
Prelude.NFData
ListUnsupportedAppVersionResourcesResponse
where
rnf :: ListUnsupportedAppVersionResourcesResponse -> ()
rnf ListUnsupportedAppVersionResourcesResponse' {Int
[UnsupportedResource]
Maybe Text
Text
unsupportedResources :: [UnsupportedResource]
resolutionId :: Text
httpStatus :: Int
nextToken :: Maybe Text
$sel:unsupportedResources:ListUnsupportedAppVersionResourcesResponse' :: ListUnsupportedAppVersionResourcesResponse -> [UnsupportedResource]
$sel:resolutionId:ListUnsupportedAppVersionResourcesResponse' :: ListUnsupportedAppVersionResourcesResponse -> Text
$sel:httpStatus:ListUnsupportedAppVersionResourcesResponse' :: ListUnsupportedAppVersionResourcesResponse -> Int
$sel:nextToken:ListUnsupportedAppVersionResourcesResponse' :: ListUnsupportedAppVersionResourcesResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
resolutionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf [UnsupportedResource]
unsupportedResources