module Stratosphere.ACMPCA.Certificate.OtherNameProperty ( OtherNameProperty(..), mkOtherNameProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data OtherNameProperty = -- | See: OtherNameProperty {haddock_workaround_ :: (), -- | See: typeId :: (Value Prelude.Text), -- | See: value :: (Value Prelude.Text)} deriving stock (Prelude.Eq, Prelude.Show) mkOtherNameProperty :: Value Prelude.Text -> Value Prelude.Text -> OtherNameProperty mkOtherNameProperty typeId value = OtherNameProperty {haddock_workaround_ = (), typeId = typeId, value = value} instance ToResourceProperties OtherNameProperty where toResourceProperties OtherNameProperty {..} = ResourceProperties {awsType = "AWS::ACMPCA::Certificate.OtherName", supportsTags = Prelude.False, properties = ["TypeId" JSON..= typeId, "Value" JSON..= value]} instance JSON.ToJSON OtherNameProperty where toJSON OtherNameProperty {..} = JSON.object ["TypeId" JSON..= typeId, "Value" JSON..= value] instance Property "TypeId" OtherNameProperty where type PropertyType "TypeId" OtherNameProperty = Value Prelude.Text set newValue OtherNameProperty {..} = OtherNameProperty {typeId = newValue, ..} instance Property "Value" OtherNameProperty where type PropertyType "Value" OtherNameProperty = Value Prelude.Text set newValue OtherNameProperty {..} = OtherNameProperty {value = newValue, ..}