module Stratosphere.DevOpsGuru.NotificationChannel.NotificationFilterConfigProperty ( NotificationFilterConfigProperty(..), mkNotificationFilterConfigProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data NotificationFilterConfigProperty = -- | See: NotificationFilterConfigProperty {haddock_workaround_ :: (), -- | See: messageTypes :: (Prelude.Maybe (ValueList Prelude.Text)), -- | See: severities :: (Prelude.Maybe (ValueList Prelude.Text))} deriving stock (Prelude.Eq, Prelude.Show) mkNotificationFilterConfigProperty :: NotificationFilterConfigProperty mkNotificationFilterConfigProperty = NotificationFilterConfigProperty {haddock_workaround_ = (), messageTypes = Prelude.Nothing, severities = Prelude.Nothing} instance ToResourceProperties NotificationFilterConfigProperty where toResourceProperties NotificationFilterConfigProperty {..} = ResourceProperties {awsType = "AWS::DevOpsGuru::NotificationChannel.NotificationFilterConfig", supportsTags = Prelude.False, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "MessageTypes" Prelude.<$> messageTypes, (JSON..=) "Severities" Prelude.<$> severities])} instance JSON.ToJSON NotificationFilterConfigProperty where toJSON NotificationFilterConfigProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "MessageTypes" Prelude.<$> messageTypes, (JSON..=) "Severities" Prelude.<$> severities])) instance Property "MessageTypes" NotificationFilterConfigProperty where type PropertyType "MessageTypes" NotificationFilterConfigProperty = ValueList Prelude.Text set newValue NotificationFilterConfigProperty {..} = NotificationFilterConfigProperty {messageTypes = Prelude.pure newValue, ..} instance Property "Severities" NotificationFilterConfigProperty where type PropertyType "Severities" NotificationFilterConfigProperty = ValueList Prelude.Text set newValue NotificationFilterConfigProperty {..} = NotificationFilterConfigProperty {severities = Prelude.pure newValue, ..}