{-# 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.WorkDocs.DeleteCustomMetadata
(
DeleteCustomMetadata (..),
newDeleteCustomMetadata,
deleteCustomMetadata_versionId,
deleteCustomMetadata_deleteAll,
deleteCustomMetadata_authenticationToken,
deleteCustomMetadata_keys,
deleteCustomMetadata_resourceId,
DeleteCustomMetadataResponse (..),
newDeleteCustomMetadataResponse,
deleteCustomMetadataResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.WorkDocs.Types
data DeleteCustomMetadata = DeleteCustomMetadata'
{
DeleteCustomMetadata -> Maybe Text
versionId :: Prelude.Maybe Prelude.Text,
DeleteCustomMetadata -> Maybe Bool
deleteAll :: Prelude.Maybe Prelude.Bool,
DeleteCustomMetadata -> Maybe (Sensitive Text)
authenticationToken :: Prelude.Maybe (Core.Sensitive Prelude.Text),
DeleteCustomMetadata -> Maybe [Text]
keys :: Prelude.Maybe [Prelude.Text],
DeleteCustomMetadata -> Text
resourceId :: Prelude.Text
}
deriving (DeleteCustomMetadata -> DeleteCustomMetadata -> Bool
(DeleteCustomMetadata -> DeleteCustomMetadata -> Bool)
-> (DeleteCustomMetadata -> DeleteCustomMetadata -> Bool)
-> Eq DeleteCustomMetadata
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteCustomMetadata -> DeleteCustomMetadata -> Bool
$c/= :: DeleteCustomMetadata -> DeleteCustomMetadata -> Bool
== :: DeleteCustomMetadata -> DeleteCustomMetadata -> Bool
$c== :: DeleteCustomMetadata -> DeleteCustomMetadata -> Bool
Prelude.Eq, Int -> DeleteCustomMetadata -> ShowS
[DeleteCustomMetadata] -> ShowS
DeleteCustomMetadata -> String
(Int -> DeleteCustomMetadata -> ShowS)
-> (DeleteCustomMetadata -> String)
-> ([DeleteCustomMetadata] -> ShowS)
-> Show DeleteCustomMetadata
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteCustomMetadata] -> ShowS
$cshowList :: [DeleteCustomMetadata] -> ShowS
show :: DeleteCustomMetadata -> String
$cshow :: DeleteCustomMetadata -> String
showsPrec :: Int -> DeleteCustomMetadata -> ShowS
$cshowsPrec :: Int -> DeleteCustomMetadata -> ShowS
Prelude.Show, (forall x. DeleteCustomMetadata -> Rep DeleteCustomMetadata x)
-> (forall x. Rep DeleteCustomMetadata x -> DeleteCustomMetadata)
-> Generic DeleteCustomMetadata
forall x. Rep DeleteCustomMetadata x -> DeleteCustomMetadata
forall x. DeleteCustomMetadata -> Rep DeleteCustomMetadata x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DeleteCustomMetadata x -> DeleteCustomMetadata
$cfrom :: forall x. DeleteCustomMetadata -> Rep DeleteCustomMetadata x
Prelude.Generic)
newDeleteCustomMetadata ::
Prelude.Text ->
DeleteCustomMetadata
newDeleteCustomMetadata :: Text -> DeleteCustomMetadata
newDeleteCustomMetadata Text
pResourceId_ =
DeleteCustomMetadata' :: Maybe Text
-> Maybe Bool
-> Maybe (Sensitive Text)
-> Maybe [Text]
-> Text
-> DeleteCustomMetadata
DeleteCustomMetadata'
{ $sel:versionId:DeleteCustomMetadata' :: Maybe Text
versionId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:deleteAll:DeleteCustomMetadata' :: Maybe Bool
deleteAll = Maybe Bool
forall a. Maybe a
Prelude.Nothing,
$sel:authenticationToken:DeleteCustomMetadata' :: Maybe (Sensitive Text)
authenticationToken = Maybe (Sensitive Text)
forall a. Maybe a
Prelude.Nothing,
$sel:keys:DeleteCustomMetadata' :: Maybe [Text]
keys = Maybe [Text]
forall a. Maybe a
Prelude.Nothing,
$sel:resourceId:DeleteCustomMetadata' :: Text
resourceId = Text
pResourceId_
}
deleteCustomMetadata_versionId :: Lens.Lens' DeleteCustomMetadata (Prelude.Maybe Prelude.Text)
deleteCustomMetadata_versionId :: (Maybe Text -> f (Maybe Text))
-> DeleteCustomMetadata -> f DeleteCustomMetadata
deleteCustomMetadata_versionId = (DeleteCustomMetadata -> Maybe Text)
-> (DeleteCustomMetadata -> Maybe Text -> DeleteCustomMetadata)
-> Lens
DeleteCustomMetadata DeleteCustomMetadata (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteCustomMetadata' {Maybe Text
versionId :: Maybe Text
$sel:versionId:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe Text
versionId} -> Maybe Text
versionId) (\s :: DeleteCustomMetadata
s@DeleteCustomMetadata' {} Maybe Text
a -> DeleteCustomMetadata
s {$sel:versionId:DeleteCustomMetadata' :: Maybe Text
versionId = Maybe Text
a} :: DeleteCustomMetadata)
deleteCustomMetadata_deleteAll :: Lens.Lens' DeleteCustomMetadata (Prelude.Maybe Prelude.Bool)
deleteCustomMetadata_deleteAll :: (Maybe Bool -> f (Maybe Bool))
-> DeleteCustomMetadata -> f DeleteCustomMetadata
deleteCustomMetadata_deleteAll = (DeleteCustomMetadata -> Maybe Bool)
-> (DeleteCustomMetadata -> Maybe Bool -> DeleteCustomMetadata)
-> Lens
DeleteCustomMetadata DeleteCustomMetadata (Maybe Bool) (Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteCustomMetadata' {Maybe Bool
deleteAll :: Maybe Bool
$sel:deleteAll:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe Bool
deleteAll} -> Maybe Bool
deleteAll) (\s :: DeleteCustomMetadata
s@DeleteCustomMetadata' {} Maybe Bool
a -> DeleteCustomMetadata
s {$sel:deleteAll:DeleteCustomMetadata' :: Maybe Bool
deleteAll = Maybe Bool
a} :: DeleteCustomMetadata)
deleteCustomMetadata_authenticationToken :: Lens.Lens' DeleteCustomMetadata (Prelude.Maybe Prelude.Text)
deleteCustomMetadata_authenticationToken :: (Maybe Text -> f (Maybe Text))
-> DeleteCustomMetadata -> f DeleteCustomMetadata
deleteCustomMetadata_authenticationToken = (DeleteCustomMetadata -> Maybe (Sensitive Text))
-> (DeleteCustomMetadata
-> Maybe (Sensitive Text) -> DeleteCustomMetadata)
-> Lens
DeleteCustomMetadata
DeleteCustomMetadata
(Maybe (Sensitive Text))
(Maybe (Sensitive Text))
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteCustomMetadata' {Maybe (Sensitive Text)
authenticationToken :: Maybe (Sensitive Text)
$sel:authenticationToken:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe (Sensitive Text)
authenticationToken} -> Maybe (Sensitive Text)
authenticationToken) (\s :: DeleteCustomMetadata
s@DeleteCustomMetadata' {} Maybe (Sensitive Text)
a -> DeleteCustomMetadata
s {$sel:authenticationToken:DeleteCustomMetadata' :: Maybe (Sensitive Text)
authenticationToken = Maybe (Sensitive Text)
a} :: DeleteCustomMetadata) ((Maybe (Sensitive Text) -> f (Maybe (Sensitive Text)))
-> DeleteCustomMetadata -> f DeleteCustomMetadata)
-> ((Maybe Text -> f (Maybe Text))
-> Maybe (Sensitive Text) -> f (Maybe (Sensitive Text)))
-> (Maybe Text -> f (Maybe Text))
-> DeleteCustomMetadata
-> f DeleteCustomMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso (Sensitive Text) (Sensitive Text) Text Text
-> Iso
(Maybe (Sensitive Text))
(Maybe (Sensitive Text))
(Maybe Text)
(Maybe Text)
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 (Sensitive Text) (Sensitive Text) Text Text
forall a. Iso' (Sensitive a) a
Core._Sensitive
deleteCustomMetadata_keys :: Lens.Lens' DeleteCustomMetadata (Prelude.Maybe [Prelude.Text])
deleteCustomMetadata_keys :: (Maybe [Text] -> f (Maybe [Text]))
-> DeleteCustomMetadata -> f DeleteCustomMetadata
deleteCustomMetadata_keys = (DeleteCustomMetadata -> Maybe [Text])
-> (DeleteCustomMetadata -> Maybe [Text] -> DeleteCustomMetadata)
-> Lens
DeleteCustomMetadata
DeleteCustomMetadata
(Maybe [Text])
(Maybe [Text])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteCustomMetadata' {Maybe [Text]
keys :: Maybe [Text]
$sel:keys:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe [Text]
keys} -> Maybe [Text]
keys) (\s :: DeleteCustomMetadata
s@DeleteCustomMetadata' {} Maybe [Text]
a -> DeleteCustomMetadata
s {$sel:keys:DeleteCustomMetadata' :: Maybe [Text]
keys = Maybe [Text]
a} :: DeleteCustomMetadata) ((Maybe [Text] -> f (Maybe [Text]))
-> DeleteCustomMetadata -> f DeleteCustomMetadata)
-> ((Maybe [Text] -> f (Maybe [Text]))
-> Maybe [Text] -> f (Maybe [Text]))
-> (Maybe [Text] -> f (Maybe [Text]))
-> DeleteCustomMetadata
-> f DeleteCustomMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso [Text] [Text] [Text] [Text]
-> Iso (Maybe [Text]) (Maybe [Text]) (Maybe [Text]) (Maybe [Text])
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 [Text] [Text] [Text] [Text]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
deleteCustomMetadata_resourceId :: Lens.Lens' DeleteCustomMetadata Prelude.Text
deleteCustomMetadata_resourceId :: (Text -> f Text) -> DeleteCustomMetadata -> f DeleteCustomMetadata
deleteCustomMetadata_resourceId = (DeleteCustomMetadata -> Text)
-> (DeleteCustomMetadata -> Text -> DeleteCustomMetadata)
-> Lens DeleteCustomMetadata DeleteCustomMetadata Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteCustomMetadata' {Text
resourceId :: Text
$sel:resourceId:DeleteCustomMetadata' :: DeleteCustomMetadata -> Text
resourceId} -> Text
resourceId) (\s :: DeleteCustomMetadata
s@DeleteCustomMetadata' {} Text
a -> DeleteCustomMetadata
s {$sel:resourceId:DeleteCustomMetadata' :: Text
resourceId = Text
a} :: DeleteCustomMetadata)
instance Core.AWSRequest DeleteCustomMetadata where
type
AWSResponse DeleteCustomMetadata =
DeleteCustomMetadataResponse
request :: DeleteCustomMetadata -> Request DeleteCustomMetadata
request = Service -> DeleteCustomMetadata -> Request DeleteCustomMetadata
forall a. ToRequest a => Service -> a -> Request a
Request.delete Service
defaultService
response :: Logger
-> Service
-> Proxy DeleteCustomMetadata
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DeleteCustomMetadata)))
response =
(Int
-> ResponseHeaders
-> ()
-> Either String (AWSResponse DeleteCustomMetadata))
-> Logger
-> Service
-> Proxy DeleteCustomMetadata
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DeleteCustomMetadata)))
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> () -> Either String (AWSResponse a))
-> Logger
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveEmpty
( \Int
s ResponseHeaders
h ()
x ->
Int -> DeleteCustomMetadataResponse
DeleteCustomMetadataResponse'
(Int -> DeleteCustomMetadataResponse)
-> Either String Int -> Either String DeleteCustomMetadataResponse
forall (f :: * -> *) a b. Functor 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 DeleteCustomMetadata
instance Prelude.NFData DeleteCustomMetadata
instance Core.ToHeaders DeleteCustomMetadata where
toHeaders :: DeleteCustomMetadata -> ResponseHeaders
toHeaders DeleteCustomMetadata' {Maybe Bool
Maybe [Text]
Maybe Text
Maybe (Sensitive Text)
Text
resourceId :: Text
keys :: Maybe [Text]
authenticationToken :: Maybe (Sensitive Text)
deleteAll :: Maybe Bool
versionId :: Maybe Text
$sel:resourceId:DeleteCustomMetadata' :: DeleteCustomMetadata -> Text
$sel:keys:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe [Text]
$sel:authenticationToken:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe (Sensitive Text)
$sel:deleteAll:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe Bool
$sel:versionId:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe Text
..} =
[ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Authentication" HeaderName -> Maybe (Sensitive Text) -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# Maybe (Sensitive Text)
authenticationToken,
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 DeleteCustomMetadata where
toPath :: DeleteCustomMetadata -> ByteString
toPath DeleteCustomMetadata' {Maybe Bool
Maybe [Text]
Maybe Text
Maybe (Sensitive Text)
Text
resourceId :: Text
keys :: Maybe [Text]
authenticationToken :: Maybe (Sensitive Text)
deleteAll :: Maybe Bool
versionId :: Maybe Text
$sel:resourceId:DeleteCustomMetadata' :: DeleteCustomMetadata -> Text
$sel:keys:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe [Text]
$sel:authenticationToken:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe (Sensitive Text)
$sel:deleteAll:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe Bool
$sel:versionId:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe Text
..} =
[ByteString] -> ByteString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/api/v1/resources/",
Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
resourceId,
ByteString
"/customMetadata"
]
instance Core.ToQuery DeleteCustomMetadata where
toQuery :: DeleteCustomMetadata -> QueryString
toQuery DeleteCustomMetadata' {Maybe Bool
Maybe [Text]
Maybe Text
Maybe (Sensitive Text)
Text
resourceId :: Text
keys :: Maybe [Text]
authenticationToken :: Maybe (Sensitive Text)
deleteAll :: Maybe Bool
versionId :: Maybe Text
$sel:resourceId:DeleteCustomMetadata' :: DeleteCustomMetadata -> Text
$sel:keys:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe [Text]
$sel:authenticationToken:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe (Sensitive Text)
$sel:deleteAll:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe Bool
$sel:versionId:DeleteCustomMetadata' :: DeleteCustomMetadata -> Maybe Text
..} =
[QueryString] -> QueryString
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"versionId" ByteString -> Maybe Text -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe Text
versionId,
ByteString
"deleteAll" ByteString -> Maybe Bool -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe Bool
deleteAll,
ByteString
"keys"
ByteString -> QueryString -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe QueryString -> QueryString
forall a. ToQuery a => a -> QueryString
Core.toQuery
(ByteString -> [Text] -> QueryString
forall a.
(IsList a, ToQuery (Item a)) =>
ByteString -> a -> QueryString
Core.toQueryList ByteString
"member" ([Text] -> QueryString) -> Maybe [Text] -> Maybe QueryString
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
keys)
]
data DeleteCustomMetadataResponse = DeleteCustomMetadataResponse'
{
DeleteCustomMetadataResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DeleteCustomMetadataResponse
-> DeleteCustomMetadataResponse -> Bool
(DeleteCustomMetadataResponse
-> DeleteCustomMetadataResponse -> Bool)
-> (DeleteCustomMetadataResponse
-> DeleteCustomMetadataResponse -> Bool)
-> Eq DeleteCustomMetadataResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteCustomMetadataResponse
-> DeleteCustomMetadataResponse -> Bool
$c/= :: DeleteCustomMetadataResponse
-> DeleteCustomMetadataResponse -> Bool
== :: DeleteCustomMetadataResponse
-> DeleteCustomMetadataResponse -> Bool
$c== :: DeleteCustomMetadataResponse
-> DeleteCustomMetadataResponse -> Bool
Prelude.Eq, ReadPrec [DeleteCustomMetadataResponse]
ReadPrec DeleteCustomMetadataResponse
Int -> ReadS DeleteCustomMetadataResponse
ReadS [DeleteCustomMetadataResponse]
(Int -> ReadS DeleteCustomMetadataResponse)
-> ReadS [DeleteCustomMetadataResponse]
-> ReadPrec DeleteCustomMetadataResponse
-> ReadPrec [DeleteCustomMetadataResponse]
-> Read DeleteCustomMetadataResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteCustomMetadataResponse]
$creadListPrec :: ReadPrec [DeleteCustomMetadataResponse]
readPrec :: ReadPrec DeleteCustomMetadataResponse
$creadPrec :: ReadPrec DeleteCustomMetadataResponse
readList :: ReadS [DeleteCustomMetadataResponse]
$creadList :: ReadS [DeleteCustomMetadataResponse]
readsPrec :: Int -> ReadS DeleteCustomMetadataResponse
$creadsPrec :: Int -> ReadS DeleteCustomMetadataResponse
Prelude.Read, Int -> DeleteCustomMetadataResponse -> ShowS
[DeleteCustomMetadataResponse] -> ShowS
DeleteCustomMetadataResponse -> String
(Int -> DeleteCustomMetadataResponse -> ShowS)
-> (DeleteCustomMetadataResponse -> String)
-> ([DeleteCustomMetadataResponse] -> ShowS)
-> Show DeleteCustomMetadataResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteCustomMetadataResponse] -> ShowS
$cshowList :: [DeleteCustomMetadataResponse] -> ShowS
show :: DeleteCustomMetadataResponse -> String
$cshow :: DeleteCustomMetadataResponse -> String
showsPrec :: Int -> DeleteCustomMetadataResponse -> ShowS
$cshowsPrec :: Int -> DeleteCustomMetadataResponse -> ShowS
Prelude.Show, (forall x.
DeleteCustomMetadataResponse -> Rep DeleteCustomMetadataResponse x)
-> (forall x.
Rep DeleteCustomMetadataResponse x -> DeleteCustomMetadataResponse)
-> Generic DeleteCustomMetadataResponse
forall x.
Rep DeleteCustomMetadataResponse x -> DeleteCustomMetadataResponse
forall x.
DeleteCustomMetadataResponse -> Rep DeleteCustomMetadataResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteCustomMetadataResponse x -> DeleteCustomMetadataResponse
$cfrom :: forall x.
DeleteCustomMetadataResponse -> Rep DeleteCustomMetadataResponse x
Prelude.Generic)
newDeleteCustomMetadataResponse ::
Prelude.Int ->
DeleteCustomMetadataResponse
newDeleteCustomMetadataResponse :: Int -> DeleteCustomMetadataResponse
newDeleteCustomMetadataResponse Int
pHttpStatus_ =
DeleteCustomMetadataResponse' :: Int -> DeleteCustomMetadataResponse
DeleteCustomMetadataResponse'
{ $sel:httpStatus:DeleteCustomMetadataResponse' :: Int
httpStatus =
Int
pHttpStatus_
}
deleteCustomMetadataResponse_httpStatus :: Lens.Lens' DeleteCustomMetadataResponse Prelude.Int
deleteCustomMetadataResponse_httpStatus :: (Int -> f Int)
-> DeleteCustomMetadataResponse -> f DeleteCustomMetadataResponse
deleteCustomMetadataResponse_httpStatus = (DeleteCustomMetadataResponse -> Int)
-> (DeleteCustomMetadataResponse
-> Int -> DeleteCustomMetadataResponse)
-> Lens
DeleteCustomMetadataResponse DeleteCustomMetadataResponse Int Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteCustomMetadataResponse' {Int
httpStatus :: Int
$sel:httpStatus:DeleteCustomMetadataResponse' :: DeleteCustomMetadataResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DeleteCustomMetadataResponse
s@DeleteCustomMetadataResponse' {} Int
a -> DeleteCustomMetadataResponse
s {$sel:httpStatus:DeleteCustomMetadataResponse' :: Int
httpStatus = Int
a} :: DeleteCustomMetadataResponse)
instance Prelude.NFData DeleteCustomMetadataResponse