module Stratosphere.PinpointEmail.ConfigurationSet.TrackingOptionsProperty ( TrackingOptionsProperty(..), mkTrackingOptionsProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data TrackingOptionsProperty = -- | See: TrackingOptionsProperty {haddock_workaround_ :: (), -- | See: customRedirectDomain :: (Prelude.Maybe (Value Prelude.Text))} deriving stock (Prelude.Eq, Prelude.Show) mkTrackingOptionsProperty :: TrackingOptionsProperty mkTrackingOptionsProperty = TrackingOptionsProperty {haddock_workaround_ = (), customRedirectDomain = Prelude.Nothing} instance ToResourceProperties TrackingOptionsProperty where toResourceProperties TrackingOptionsProperty {..} = ResourceProperties {awsType = "AWS::PinpointEmail::ConfigurationSet.TrackingOptions", supportsTags = Prelude.False, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "CustomRedirectDomain" Prelude.<$> customRedirectDomain])} instance JSON.ToJSON TrackingOptionsProperty where toJSON TrackingOptionsProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "CustomRedirectDomain" Prelude.<$> customRedirectDomain])) instance Property "CustomRedirectDomain" TrackingOptionsProperty where type PropertyType "CustomRedirectDomain" TrackingOptionsProperty = Value Prelude.Text set newValue TrackingOptionsProperty {..} = TrackingOptionsProperty {customRedirectDomain = Prelude.pure newValue, ..}