{-# 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.AmplifyBackend.RemoveAllBackends
(
RemoveAllBackends (..),
newRemoveAllBackends,
removeAllBackends_cleanAmplifyApp,
removeAllBackends_appId,
RemoveAllBackendsResponse (..),
newRemoveAllBackendsResponse,
removeAllBackendsResponse_status,
removeAllBackendsResponse_jobId,
removeAllBackendsResponse_operation,
removeAllBackendsResponse_error,
removeAllBackendsResponse_appId,
removeAllBackendsResponse_httpStatus,
)
where
import Amazonka.AmplifyBackend.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 RemoveAllBackends = RemoveAllBackends'
{
RemoveAllBackends -> Maybe Bool
cleanAmplifyApp :: Prelude.Maybe Prelude.Bool,
RemoveAllBackends -> Text
appId :: Prelude.Text
}
deriving (RemoveAllBackends -> RemoveAllBackends -> Bool
(RemoveAllBackends -> RemoveAllBackends -> Bool)
-> (RemoveAllBackends -> RemoveAllBackends -> Bool)
-> Eq RemoveAllBackends
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RemoveAllBackends -> RemoveAllBackends -> Bool
$c/= :: RemoveAllBackends -> RemoveAllBackends -> Bool
== :: RemoveAllBackends -> RemoveAllBackends -> Bool
$c== :: RemoveAllBackends -> RemoveAllBackends -> Bool
Prelude.Eq, ReadPrec [RemoveAllBackends]
ReadPrec RemoveAllBackends
Int -> ReadS RemoveAllBackends
ReadS [RemoveAllBackends]
(Int -> ReadS RemoveAllBackends)
-> ReadS [RemoveAllBackends]
-> ReadPrec RemoveAllBackends
-> ReadPrec [RemoveAllBackends]
-> Read RemoveAllBackends
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RemoveAllBackends]
$creadListPrec :: ReadPrec [RemoveAllBackends]
readPrec :: ReadPrec RemoveAllBackends
$creadPrec :: ReadPrec RemoveAllBackends
readList :: ReadS [RemoveAllBackends]
$creadList :: ReadS [RemoveAllBackends]
readsPrec :: Int -> ReadS RemoveAllBackends
$creadsPrec :: Int -> ReadS RemoveAllBackends
Prelude.Read, Int -> RemoveAllBackends -> ShowS
[RemoveAllBackends] -> ShowS
RemoveAllBackends -> String
(Int -> RemoveAllBackends -> ShowS)
-> (RemoveAllBackends -> String)
-> ([RemoveAllBackends] -> ShowS)
-> Show RemoveAllBackends
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RemoveAllBackends] -> ShowS
$cshowList :: [RemoveAllBackends] -> ShowS
show :: RemoveAllBackends -> String
$cshow :: RemoveAllBackends -> String
showsPrec :: Int -> RemoveAllBackends -> ShowS
$cshowsPrec :: Int -> RemoveAllBackends -> ShowS
Prelude.Show, (forall x. RemoveAllBackends -> Rep RemoveAllBackends x)
-> (forall x. Rep RemoveAllBackends x -> RemoveAllBackends)
-> Generic RemoveAllBackends
forall x. Rep RemoveAllBackends x -> RemoveAllBackends
forall x. RemoveAllBackends -> Rep RemoveAllBackends x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RemoveAllBackends x -> RemoveAllBackends
$cfrom :: forall x. RemoveAllBackends -> Rep RemoveAllBackends x
Prelude.Generic)
newRemoveAllBackends ::
Prelude.Text ->
RemoveAllBackends
newRemoveAllBackends :: Text -> RemoveAllBackends
newRemoveAllBackends Text
pAppId_ =
RemoveAllBackends' :: Maybe Bool -> Text -> RemoveAllBackends
RemoveAllBackends'
{ $sel:cleanAmplifyApp:RemoveAllBackends' :: Maybe Bool
cleanAmplifyApp =
Maybe Bool
forall a. Maybe a
Prelude.Nothing,
$sel:appId:RemoveAllBackends' :: Text
appId = Text
pAppId_
}
removeAllBackends_cleanAmplifyApp :: Lens.Lens' RemoveAllBackends (Prelude.Maybe Prelude.Bool)
removeAllBackends_cleanAmplifyApp :: (Maybe Bool -> f (Maybe Bool))
-> RemoveAllBackends -> f RemoveAllBackends
removeAllBackends_cleanAmplifyApp = (RemoveAllBackends -> Maybe Bool)
-> (RemoveAllBackends -> Maybe Bool -> RemoveAllBackends)
-> Lens
RemoveAllBackends RemoveAllBackends (Maybe Bool) (Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveAllBackends' {Maybe Bool
cleanAmplifyApp :: Maybe Bool
$sel:cleanAmplifyApp:RemoveAllBackends' :: RemoveAllBackends -> Maybe Bool
cleanAmplifyApp} -> Maybe Bool
cleanAmplifyApp) (\s :: RemoveAllBackends
s@RemoveAllBackends' {} Maybe Bool
a -> RemoveAllBackends
s {$sel:cleanAmplifyApp:RemoveAllBackends' :: Maybe Bool
cleanAmplifyApp = Maybe Bool
a} :: RemoveAllBackends)
removeAllBackends_appId :: Lens.Lens' RemoveAllBackends Prelude.Text
removeAllBackends_appId :: (Text -> f Text) -> RemoveAllBackends -> f RemoveAllBackends
removeAllBackends_appId = (RemoveAllBackends -> Text)
-> (RemoveAllBackends -> Text -> RemoveAllBackends)
-> Lens RemoveAllBackends RemoveAllBackends Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveAllBackends' {Text
appId :: Text
$sel:appId:RemoveAllBackends' :: RemoveAllBackends -> Text
appId} -> Text
appId) (\s :: RemoveAllBackends
s@RemoveAllBackends' {} Text
a -> RemoveAllBackends
s {$sel:appId:RemoveAllBackends' :: Text
appId = Text
a} :: RemoveAllBackends)
instance Core.AWSRequest RemoveAllBackends where
type
AWSResponse RemoveAllBackends =
RemoveAllBackendsResponse
request :: RemoveAllBackends -> Request RemoveAllBackends
request = Service -> RemoveAllBackends -> Request RemoveAllBackends
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON Service
defaultService
response :: Logger
-> Service
-> Proxy RemoveAllBackends
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse RemoveAllBackends)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse RemoveAllBackends))
-> Logger
-> Service
-> Proxy RemoveAllBackends
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse RemoveAllBackends)))
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 Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> RemoveAllBackendsResponse
RemoveAllBackendsResponse'
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> RemoveAllBackendsResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> RemoveAllBackendsResponse)
forall (f :: * -> *) a b. Functor 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
"status")
Either
String
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> RemoveAllBackendsResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text
-> Maybe Text -> Maybe Text -> Int -> RemoveAllBackendsResponse)
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
"jobId")
Either
String
(Maybe Text
-> Maybe Text -> Maybe Text -> Int -> RemoveAllBackendsResponse)
-> Either String (Maybe Text)
-> Either
String
(Maybe Text -> Maybe Text -> Int -> RemoveAllBackendsResponse)
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
"operation")
Either
String
(Maybe Text -> Maybe Text -> Int -> RemoveAllBackendsResponse)
-> Either String (Maybe Text)
-> Either String (Maybe Text -> Int -> RemoveAllBackendsResponse)
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
"error")
Either String (Maybe Text -> Int -> RemoveAllBackendsResponse)
-> Either String (Maybe Text)
-> Either String (Int -> RemoveAllBackendsResponse)
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
"appId")
Either String (Int -> RemoveAllBackendsResponse)
-> Either String Int -> Either String RemoveAllBackendsResponse
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 RemoveAllBackends
instance Prelude.NFData RemoveAllBackends
instance Core.ToHeaders RemoveAllBackends where
toHeaders :: RemoveAllBackends -> ResponseHeaders
toHeaders =
ResponseHeaders -> RemoveAllBackends -> 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.ToJSON RemoveAllBackends where
toJSON :: RemoveAllBackends -> Value
toJSON RemoveAllBackends' {Maybe Bool
Text
appId :: Text
cleanAmplifyApp :: Maybe Bool
$sel:appId:RemoveAllBackends' :: RemoveAllBackends -> Text
$sel:cleanAmplifyApp:RemoveAllBackends' :: RemoveAllBackends -> Maybe Bool
..} =
[Pair] -> Value
Core.object
( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Text
"cleanAmplifyApp" Text -> Bool -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(Bool -> Pair) -> Maybe Bool -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
cleanAmplifyApp
]
)
instance Core.ToPath RemoveAllBackends where
toPath :: RemoveAllBackends -> ByteString
toPath RemoveAllBackends' {Maybe Bool
Text
appId :: Text
cleanAmplifyApp :: Maybe Bool
$sel:appId:RemoveAllBackends' :: RemoveAllBackends -> Text
$sel:cleanAmplifyApp:RemoveAllBackends' :: RemoveAllBackends -> Maybe Bool
..} =
[ByteString] -> ByteString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ByteString
"/backend/", Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
appId, ByteString
"/remove"]
instance Core.ToQuery RemoveAllBackends where
toQuery :: RemoveAllBackends -> QueryString
toQuery = QueryString -> RemoveAllBackends -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data RemoveAllBackendsResponse = RemoveAllBackendsResponse'
{
RemoveAllBackendsResponse -> Maybe Text
status :: Prelude.Maybe Prelude.Text,
RemoveAllBackendsResponse -> Maybe Text
jobId :: Prelude.Maybe Prelude.Text,
RemoveAllBackendsResponse -> Maybe Text
operation :: Prelude.Maybe Prelude.Text,
RemoveAllBackendsResponse -> Maybe Text
error :: Prelude.Maybe Prelude.Text,
RemoveAllBackendsResponse -> Maybe Text
appId :: Prelude.Maybe Prelude.Text,
RemoveAllBackendsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (RemoveAllBackendsResponse -> RemoveAllBackendsResponse -> Bool
(RemoveAllBackendsResponse -> RemoveAllBackendsResponse -> Bool)
-> (RemoveAllBackendsResponse -> RemoveAllBackendsResponse -> Bool)
-> Eq RemoveAllBackendsResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RemoveAllBackendsResponse -> RemoveAllBackendsResponse -> Bool
$c/= :: RemoveAllBackendsResponse -> RemoveAllBackendsResponse -> Bool
== :: RemoveAllBackendsResponse -> RemoveAllBackendsResponse -> Bool
$c== :: RemoveAllBackendsResponse -> RemoveAllBackendsResponse -> Bool
Prelude.Eq, ReadPrec [RemoveAllBackendsResponse]
ReadPrec RemoveAllBackendsResponse
Int -> ReadS RemoveAllBackendsResponse
ReadS [RemoveAllBackendsResponse]
(Int -> ReadS RemoveAllBackendsResponse)
-> ReadS [RemoveAllBackendsResponse]
-> ReadPrec RemoveAllBackendsResponse
-> ReadPrec [RemoveAllBackendsResponse]
-> Read RemoveAllBackendsResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RemoveAllBackendsResponse]
$creadListPrec :: ReadPrec [RemoveAllBackendsResponse]
readPrec :: ReadPrec RemoveAllBackendsResponse
$creadPrec :: ReadPrec RemoveAllBackendsResponse
readList :: ReadS [RemoveAllBackendsResponse]
$creadList :: ReadS [RemoveAllBackendsResponse]
readsPrec :: Int -> ReadS RemoveAllBackendsResponse
$creadsPrec :: Int -> ReadS RemoveAllBackendsResponse
Prelude.Read, Int -> RemoveAllBackendsResponse -> ShowS
[RemoveAllBackendsResponse] -> ShowS
RemoveAllBackendsResponse -> String
(Int -> RemoveAllBackendsResponse -> ShowS)
-> (RemoveAllBackendsResponse -> String)
-> ([RemoveAllBackendsResponse] -> ShowS)
-> Show RemoveAllBackendsResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RemoveAllBackendsResponse] -> ShowS
$cshowList :: [RemoveAllBackendsResponse] -> ShowS
show :: RemoveAllBackendsResponse -> String
$cshow :: RemoveAllBackendsResponse -> String
showsPrec :: Int -> RemoveAllBackendsResponse -> ShowS
$cshowsPrec :: Int -> RemoveAllBackendsResponse -> ShowS
Prelude.Show, (forall x.
RemoveAllBackendsResponse -> Rep RemoveAllBackendsResponse x)
-> (forall x.
Rep RemoveAllBackendsResponse x -> RemoveAllBackendsResponse)
-> Generic RemoveAllBackendsResponse
forall x.
Rep RemoveAllBackendsResponse x -> RemoveAllBackendsResponse
forall x.
RemoveAllBackendsResponse -> Rep RemoveAllBackendsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep RemoveAllBackendsResponse x -> RemoveAllBackendsResponse
$cfrom :: forall x.
RemoveAllBackendsResponse -> Rep RemoveAllBackendsResponse x
Prelude.Generic)
newRemoveAllBackendsResponse ::
Prelude.Int ->
RemoveAllBackendsResponse
newRemoveAllBackendsResponse :: Int -> RemoveAllBackendsResponse
newRemoveAllBackendsResponse Int
pHttpStatus_ =
RemoveAllBackendsResponse' :: Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Int
-> RemoveAllBackendsResponse
RemoveAllBackendsResponse'
{ $sel:status:RemoveAllBackendsResponse' :: Maybe Text
status =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:jobId:RemoveAllBackendsResponse' :: Maybe Text
jobId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:operation:RemoveAllBackendsResponse' :: Maybe Text
operation = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:error:RemoveAllBackendsResponse' :: Maybe Text
error = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:appId:RemoveAllBackendsResponse' :: Maybe Text
appId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:RemoveAllBackendsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
removeAllBackendsResponse_status :: Lens.Lens' RemoveAllBackendsResponse (Prelude.Maybe Prelude.Text)
removeAllBackendsResponse_status :: (Maybe Text -> f (Maybe Text))
-> RemoveAllBackendsResponse -> f RemoveAllBackendsResponse
removeAllBackendsResponse_status = (RemoveAllBackendsResponse -> Maybe Text)
-> (RemoveAllBackendsResponse
-> Maybe Text -> RemoveAllBackendsResponse)
-> Lens
RemoveAllBackendsResponse
RemoveAllBackendsResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveAllBackendsResponse' {Maybe Text
status :: Maybe Text
$sel:status:RemoveAllBackendsResponse' :: RemoveAllBackendsResponse -> Maybe Text
status} -> Maybe Text
status) (\s :: RemoveAllBackendsResponse
s@RemoveAllBackendsResponse' {} Maybe Text
a -> RemoveAllBackendsResponse
s {$sel:status:RemoveAllBackendsResponse' :: Maybe Text
status = Maybe Text
a} :: RemoveAllBackendsResponse)
removeAllBackendsResponse_jobId :: Lens.Lens' RemoveAllBackendsResponse (Prelude.Maybe Prelude.Text)
removeAllBackendsResponse_jobId :: (Maybe Text -> f (Maybe Text))
-> RemoveAllBackendsResponse -> f RemoveAllBackendsResponse
removeAllBackendsResponse_jobId = (RemoveAllBackendsResponse -> Maybe Text)
-> (RemoveAllBackendsResponse
-> Maybe Text -> RemoveAllBackendsResponse)
-> Lens
RemoveAllBackendsResponse
RemoveAllBackendsResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveAllBackendsResponse' {Maybe Text
jobId :: Maybe Text
$sel:jobId:RemoveAllBackendsResponse' :: RemoveAllBackendsResponse -> Maybe Text
jobId} -> Maybe Text
jobId) (\s :: RemoveAllBackendsResponse
s@RemoveAllBackendsResponse' {} Maybe Text
a -> RemoveAllBackendsResponse
s {$sel:jobId:RemoveAllBackendsResponse' :: Maybe Text
jobId = Maybe Text
a} :: RemoveAllBackendsResponse)
removeAllBackendsResponse_operation :: Lens.Lens' RemoveAllBackendsResponse (Prelude.Maybe Prelude.Text)
removeAllBackendsResponse_operation :: (Maybe Text -> f (Maybe Text))
-> RemoveAllBackendsResponse -> f RemoveAllBackendsResponse
removeAllBackendsResponse_operation = (RemoveAllBackendsResponse -> Maybe Text)
-> (RemoveAllBackendsResponse
-> Maybe Text -> RemoveAllBackendsResponse)
-> Lens
RemoveAllBackendsResponse
RemoveAllBackendsResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveAllBackendsResponse' {Maybe Text
operation :: Maybe Text
$sel:operation:RemoveAllBackendsResponse' :: RemoveAllBackendsResponse -> Maybe Text
operation} -> Maybe Text
operation) (\s :: RemoveAllBackendsResponse
s@RemoveAllBackendsResponse' {} Maybe Text
a -> RemoveAllBackendsResponse
s {$sel:operation:RemoveAllBackendsResponse' :: Maybe Text
operation = Maybe Text
a} :: RemoveAllBackendsResponse)
removeAllBackendsResponse_error :: Lens.Lens' RemoveAllBackendsResponse (Prelude.Maybe Prelude.Text)
removeAllBackendsResponse_error :: (Maybe Text -> f (Maybe Text))
-> RemoveAllBackendsResponse -> f RemoveAllBackendsResponse
removeAllBackendsResponse_error = (RemoveAllBackendsResponse -> Maybe Text)
-> (RemoveAllBackendsResponse
-> Maybe Text -> RemoveAllBackendsResponse)
-> Lens
RemoveAllBackendsResponse
RemoveAllBackendsResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveAllBackendsResponse' {Maybe Text
error :: Maybe Text
$sel:error:RemoveAllBackendsResponse' :: RemoveAllBackendsResponse -> Maybe Text
error} -> Maybe Text
error) (\s :: RemoveAllBackendsResponse
s@RemoveAllBackendsResponse' {} Maybe Text
a -> RemoveAllBackendsResponse
s {$sel:error:RemoveAllBackendsResponse' :: Maybe Text
error = Maybe Text
a} :: RemoveAllBackendsResponse)
removeAllBackendsResponse_appId :: Lens.Lens' RemoveAllBackendsResponse (Prelude.Maybe Prelude.Text)
removeAllBackendsResponse_appId :: (Maybe Text -> f (Maybe Text))
-> RemoveAllBackendsResponse -> f RemoveAllBackendsResponse
removeAllBackendsResponse_appId = (RemoveAllBackendsResponse -> Maybe Text)
-> (RemoveAllBackendsResponse
-> Maybe Text -> RemoveAllBackendsResponse)
-> Lens
RemoveAllBackendsResponse
RemoveAllBackendsResponse
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveAllBackendsResponse' {Maybe Text
appId :: Maybe Text
$sel:appId:RemoveAllBackendsResponse' :: RemoveAllBackendsResponse -> Maybe Text
appId} -> Maybe Text
appId) (\s :: RemoveAllBackendsResponse
s@RemoveAllBackendsResponse' {} Maybe Text
a -> RemoveAllBackendsResponse
s {$sel:appId:RemoveAllBackendsResponse' :: Maybe Text
appId = Maybe Text
a} :: RemoveAllBackendsResponse)
removeAllBackendsResponse_httpStatus :: Lens.Lens' RemoveAllBackendsResponse Prelude.Int
removeAllBackendsResponse_httpStatus :: (Int -> f Int)
-> RemoveAllBackendsResponse -> f RemoveAllBackendsResponse
removeAllBackendsResponse_httpStatus = (RemoveAllBackendsResponse -> Int)
-> (RemoveAllBackendsResponse -> Int -> RemoveAllBackendsResponse)
-> Lens RemoveAllBackendsResponse RemoveAllBackendsResponse Int Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveAllBackendsResponse' {Int
httpStatus :: Int
$sel:httpStatus:RemoveAllBackendsResponse' :: RemoveAllBackendsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: RemoveAllBackendsResponse
s@RemoveAllBackendsResponse' {} Int
a -> RemoveAllBackendsResponse
s {$sel:httpStatus:RemoveAllBackendsResponse' :: Int
httpStatus = Int
a} :: RemoveAllBackendsResponse)
instance Prelude.NFData RemoveAllBackendsResponse