stratosphere-cognito-1.0.0: gen/Stratosphere/Cognito/UserPoolUICustomizationAttachment.hs

module Stratosphere.Cognito.UserPoolUICustomizationAttachment (
        UserPoolUICustomizationAttachment(..),
        mkUserPoolUICustomizationAttachment
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data UserPoolUICustomizationAttachment
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cognito-userpooluicustomizationattachment.html>
    UserPoolUICustomizationAttachment {haddock_workaround_ :: (),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cognito-userpooluicustomizationattachment.html#cfn-cognito-userpooluicustomizationattachment-css>
                                       cSS :: (Prelude.Maybe (Value Prelude.Text)),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cognito-userpooluicustomizationattachment.html#cfn-cognito-userpooluicustomizationattachment-clientid>
                                       clientId :: (Value Prelude.Text),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-cognito-userpooluicustomizationattachment.html#cfn-cognito-userpooluicustomizationattachment-userpoolid>
                                       userPoolId :: (Value Prelude.Text)}
  deriving stock (Prelude.Eq, Prelude.Show)
mkUserPoolUICustomizationAttachment ::
  Value Prelude.Text
  -> Value Prelude.Text -> UserPoolUICustomizationAttachment
mkUserPoolUICustomizationAttachment clientId userPoolId
  = UserPoolUICustomizationAttachment
      {haddock_workaround_ = (), clientId = clientId,
       userPoolId = userPoolId, cSS = Prelude.Nothing}
instance ToResourceProperties UserPoolUICustomizationAttachment where
  toResourceProperties UserPoolUICustomizationAttachment {..}
    = ResourceProperties
        {awsType = "AWS::Cognito::UserPoolUICustomizationAttachment",
         supportsTags = Prelude.False,
         properties = Prelude.fromList
                        ((Prelude.<>)
                           ["ClientId" JSON..= clientId, "UserPoolId" JSON..= userPoolId]
                           (Prelude.catMaybes [(JSON..=) "CSS" Prelude.<$> cSS]))}
instance JSON.ToJSON UserPoolUICustomizationAttachment where
  toJSON UserPoolUICustomizationAttachment {..}
    = JSON.object
        (Prelude.fromList
           ((Prelude.<>)
              ["ClientId" JSON..= clientId, "UserPoolId" JSON..= userPoolId]
              (Prelude.catMaybes [(JSON..=) "CSS" Prelude.<$> cSS])))
instance Property "CSS" UserPoolUICustomizationAttachment where
  type PropertyType "CSS" UserPoolUICustomizationAttachment = Value Prelude.Text
  set newValue UserPoolUICustomizationAttachment {..}
    = UserPoolUICustomizationAttachment
        {cSS = Prelude.pure newValue, ..}
instance Property "ClientId" UserPoolUICustomizationAttachment where
  type PropertyType "ClientId" UserPoolUICustomizationAttachment = Value Prelude.Text
  set newValue UserPoolUICustomizationAttachment {..}
    = UserPoolUICustomizationAttachment {clientId = newValue, ..}
instance Property "UserPoolId" UserPoolUICustomizationAttachment where
  type PropertyType "UserPoolId" UserPoolUICustomizationAttachment = Value Prelude.Text
  set newValue UserPoolUICustomizationAttachment {..}
    = UserPoolUICustomizationAttachment {userPoolId = newValue, ..}