module Stratosphere.SageMaker.Workteam.NotificationConfigurationProperty (
NotificationConfigurationProperty(..),
mkNotificationConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data NotificationConfigurationProperty
=
NotificationConfigurationProperty {NotificationConfigurationProperty -> ()
haddock_workaround_ :: (),
NotificationConfigurationProperty -> Value Text
notificationTopicArn :: (Value Prelude.Text)}
deriving stock (NotificationConfigurationProperty
-> NotificationConfigurationProperty -> Bool
(NotificationConfigurationProperty
-> NotificationConfigurationProperty -> Bool)
-> (NotificationConfigurationProperty
-> NotificationConfigurationProperty -> Bool)
-> Eq NotificationConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NotificationConfigurationProperty
-> NotificationConfigurationProperty -> Bool
== :: NotificationConfigurationProperty
-> NotificationConfigurationProperty -> Bool
$c/= :: NotificationConfigurationProperty
-> NotificationConfigurationProperty -> Bool
/= :: NotificationConfigurationProperty
-> NotificationConfigurationProperty -> Bool
Prelude.Eq, Int -> NotificationConfigurationProperty -> ShowS
[NotificationConfigurationProperty] -> ShowS
NotificationConfigurationProperty -> String
(Int -> NotificationConfigurationProperty -> ShowS)
-> (NotificationConfigurationProperty -> String)
-> ([NotificationConfigurationProperty] -> ShowS)
-> Show NotificationConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> NotificationConfigurationProperty -> ShowS
showsPrec :: Int -> NotificationConfigurationProperty -> ShowS
$cshow :: NotificationConfigurationProperty -> String
show :: NotificationConfigurationProperty -> String
$cshowList :: [NotificationConfigurationProperty] -> ShowS
showList :: [NotificationConfigurationProperty] -> ShowS
Prelude.Show)
mkNotificationConfigurationProperty ::
Value Prelude.Text -> NotificationConfigurationProperty
mkNotificationConfigurationProperty :: Value Text -> NotificationConfigurationProperty
mkNotificationConfigurationProperty Value Text
notificationTopicArn
= NotificationConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
notificationTopicArn :: Value Text
notificationTopicArn = Value Text
notificationTopicArn}
instance ToResourceProperties NotificationConfigurationProperty where
toResourceProperties :: NotificationConfigurationProperty -> ResourceProperties
toResourceProperties NotificationConfigurationProperty {()
Value Text
haddock_workaround_ :: NotificationConfigurationProperty -> ()
notificationTopicArn :: NotificationConfigurationProperty -> Value Text
haddock_workaround_ :: ()
notificationTopicArn :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::SageMaker::Workteam.NotificationConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"NotificationTopicArn" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
notificationTopicArn]}
instance JSON.ToJSON NotificationConfigurationProperty where
toJSON :: NotificationConfigurationProperty -> Value
toJSON NotificationConfigurationProperty {()
Value Text
haddock_workaround_ :: NotificationConfigurationProperty -> ()
notificationTopicArn :: NotificationConfigurationProperty -> Value Text
haddock_workaround_ :: ()
notificationTopicArn :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object [Key
"NotificationTopicArn" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
notificationTopicArn]
instance Property "NotificationTopicArn" NotificationConfigurationProperty where
type PropertyType "NotificationTopicArn" NotificationConfigurationProperty = Value Prelude.Text
set :: PropertyType
"NotificationTopicArn" NotificationConfigurationProperty
-> NotificationConfigurationProperty
-> NotificationConfigurationProperty
set PropertyType
"NotificationTopicArn" NotificationConfigurationProperty
newValue NotificationConfigurationProperty {()
Value Text
haddock_workaround_ :: NotificationConfigurationProperty -> ()
notificationTopicArn :: NotificationConfigurationProperty -> Value Text
haddock_workaround_ :: ()
notificationTopicArn :: Value Text
..}
= NotificationConfigurationProperty
{notificationTopicArn :: Value Text
notificationTopicArn = PropertyType
"NotificationTopicArn" NotificationConfigurationProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}