module Network.AWS.Config.StartConfigurationRecorder
(
StartConfigurationRecorder
, startConfigurationRecorder
, scr1ConfigurationRecorderName
, StartConfigurationRecorderResponse
, startConfigurationRecorderResponse
) where
import Network.AWS.Prelude
import Network.AWS.Request.JSON
import Network.AWS.Config.Types
import qualified GHC.Exts
newtype StartConfigurationRecorder = StartConfigurationRecorder
{ _scr1ConfigurationRecorderName :: Text
} deriving (Eq, Ord, Show, Monoid, IsString)
startConfigurationRecorder :: Text
-> StartConfigurationRecorder
startConfigurationRecorder p1 = StartConfigurationRecorder
{ _scr1ConfigurationRecorderName = p1
}
scr1ConfigurationRecorderName :: Lens' StartConfigurationRecorder Text
scr1ConfigurationRecorderName =
lens _scr1ConfigurationRecorderName
(\s a -> s { _scr1ConfigurationRecorderName = a })
data StartConfigurationRecorderResponse = StartConfigurationRecorderResponse
deriving (Eq, Ord, Show, Generic)
startConfigurationRecorderResponse :: StartConfigurationRecorderResponse
startConfigurationRecorderResponse = StartConfigurationRecorderResponse
instance ToPath StartConfigurationRecorder where
toPath = const "/"
instance ToQuery StartConfigurationRecorder where
toQuery = const mempty
instance ToHeaders StartConfigurationRecorder
instance ToJSON StartConfigurationRecorder where
toJSON StartConfigurationRecorder{..} = object
[ "ConfigurationRecorderName" .= _scr1ConfigurationRecorderName
]
instance AWSRequest StartConfigurationRecorder where
type Sv StartConfigurationRecorder = Config
type Rs StartConfigurationRecorder = StartConfigurationRecorderResponse
request = post "StartConfigurationRecorder"
response = nullResponse StartConfigurationRecorderResponse