module Stratosphere.ConnectCampaignsV2.Campaign.AnswerMachineDetectionConfigProperty ( AnswerMachineDetectionConfigProperty(..), mkAnswerMachineDetectionConfigProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data AnswerMachineDetectionConfigProperty = -- | See: AnswerMachineDetectionConfigProperty {haddock_workaround_ :: (), -- | See: awaitAnswerMachinePrompt :: (Prelude.Maybe (Value Prelude.Bool)), -- | See: enableAnswerMachineDetection :: (Value Prelude.Bool)} deriving stock (Prelude.Eq, Prelude.Show) mkAnswerMachineDetectionConfigProperty :: Value Prelude.Bool -> AnswerMachineDetectionConfigProperty mkAnswerMachineDetectionConfigProperty enableAnswerMachineDetection = AnswerMachineDetectionConfigProperty {haddock_workaround_ = (), enableAnswerMachineDetection = enableAnswerMachineDetection, awaitAnswerMachinePrompt = Prelude.Nothing} instance ToResourceProperties AnswerMachineDetectionConfigProperty where toResourceProperties AnswerMachineDetectionConfigProperty {..} = ResourceProperties {awsType = "AWS::ConnectCampaignsV2::Campaign.AnswerMachineDetectionConfig", supportsTags = Prelude.False, properties = Prelude.fromList ((Prelude.<>) ["EnableAnswerMachineDetection" JSON..= enableAnswerMachineDetection] (Prelude.catMaybes [(JSON..=) "AwaitAnswerMachinePrompt" Prelude.<$> awaitAnswerMachinePrompt]))} instance JSON.ToJSON AnswerMachineDetectionConfigProperty where toJSON AnswerMachineDetectionConfigProperty {..} = JSON.object (Prelude.fromList ((Prelude.<>) ["EnableAnswerMachineDetection" JSON..= enableAnswerMachineDetection] (Prelude.catMaybes [(JSON..=) "AwaitAnswerMachinePrompt" Prelude.<$> awaitAnswerMachinePrompt]))) instance Property "AwaitAnswerMachinePrompt" AnswerMachineDetectionConfigProperty where type PropertyType "AwaitAnswerMachinePrompt" AnswerMachineDetectionConfigProperty = Value Prelude.Bool set newValue AnswerMachineDetectionConfigProperty {..} = AnswerMachineDetectionConfigProperty {awaitAnswerMachinePrompt = Prelude.pure newValue, ..} instance Property "EnableAnswerMachineDetection" AnswerMachineDetectionConfigProperty where type PropertyType "EnableAnswerMachineDetection" AnswerMachineDetectionConfigProperty = Value Prelude.Bool set newValue AnswerMachineDetectionConfigProperty {..} = AnswerMachineDetectionConfigProperty {enableAnswerMachineDetection = newValue, ..}