module Stratosphere.ResourceProperties.KinesisFirehoseElasticsearchRetryOptions where
import Control.Lens
import Data.Aeson
import Data.Aeson.Types
import Data.Text
import GHC.Generics
import Stratosphere.Values
data KinesisFirehoseElasticsearchRetryOptions =
KinesisFirehoseElasticsearchRetryOptions
{ _kinesisFirehoseElasticsearchRetryOptionsDurationInSeconds :: Val Integer'
} deriving (Show, Generic)
instance ToJSON KinesisFirehoseElasticsearchRetryOptions where
toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
instance FromJSON KinesisFirehoseElasticsearchRetryOptions where
parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
kinesisFirehoseElasticsearchRetryOptions
:: Val Integer'
-> KinesisFirehoseElasticsearchRetryOptions
kinesisFirehoseElasticsearchRetryOptions durationInSecondsarg =
KinesisFirehoseElasticsearchRetryOptions
{ _kinesisFirehoseElasticsearchRetryOptionsDurationInSeconds = durationInSecondsarg
}
kferoDurationInSeconds :: Lens' KinesisFirehoseElasticsearchRetryOptions (Val Integer')
kferoDurationInSeconds = lens _kinesisFirehoseElasticsearchRetryOptionsDurationInSeconds (\s a -> s { _kinesisFirehoseElasticsearchRetryOptionsDurationInSeconds = a })