module Network.AWS.ElasticBeanstalk.AbortEnvironmentUpdate
(
AbortEnvironmentUpdate
, abortEnvironmentUpdate
, aeuEnvironmentId
, aeuEnvironmentName
, AbortEnvironmentUpdateResponse
, abortEnvironmentUpdateResponse
) where
import Network.AWS.Prelude
import Network.AWS.Request.Query
import Network.AWS.ElasticBeanstalk.Types
import qualified GHC.Exts
data AbortEnvironmentUpdate = AbortEnvironmentUpdate
{ _aeuEnvironmentId :: Maybe Text
, _aeuEnvironmentName :: Maybe Text
} deriving (Eq, Ord, Read, Show)
abortEnvironmentUpdate :: AbortEnvironmentUpdate
abortEnvironmentUpdate = AbortEnvironmentUpdate
{ _aeuEnvironmentId = Nothing
, _aeuEnvironmentName = Nothing
}
aeuEnvironmentId :: Lens' AbortEnvironmentUpdate (Maybe Text)
aeuEnvironmentId = lens _aeuEnvironmentId (\s a -> s { _aeuEnvironmentId = a })
aeuEnvironmentName :: Lens' AbortEnvironmentUpdate (Maybe Text)
aeuEnvironmentName =
lens _aeuEnvironmentName (\s a -> s { _aeuEnvironmentName = a })
data AbortEnvironmentUpdateResponse = AbortEnvironmentUpdateResponse
deriving (Eq, Ord, Read, Show, Generic)
abortEnvironmentUpdateResponse :: AbortEnvironmentUpdateResponse
abortEnvironmentUpdateResponse = AbortEnvironmentUpdateResponse
instance ToPath AbortEnvironmentUpdate where
toPath = const "/"
instance ToQuery AbortEnvironmentUpdate where
toQuery AbortEnvironmentUpdate{..} = mconcat
[ "EnvironmentId" =? _aeuEnvironmentId
, "EnvironmentName" =? _aeuEnvironmentName
]
instance ToHeaders AbortEnvironmentUpdate
instance AWSRequest AbortEnvironmentUpdate where
type Sv AbortEnvironmentUpdate = ElasticBeanstalk
type Rs AbortEnvironmentUpdate = AbortEnvironmentUpdateResponse
request = post "AbortEnvironmentUpdate"
response = nullResponse AbortEnvironmentUpdateResponse