amazonka-ses 0.0.0 → 0.0.1

raw patch · 4 files changed

+34/−28 lines, 4 filesdep ~amazonka-corePVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

• amazonka-ses.cabal +3/−3
• gen/Network/AWS/SES/ListIdentities.hs +4/−4
• gen/Network/AWS/SES/SetIdentityNotificationTopic.hs +5/−5
• gen/Network/AWS/SES/Types.hs +22/−16

@@ -1,5 +1,5 @@ name:                  amazonka-ses-version:               0.0.0+version:               0.0.1 synopsis:              Amazon Simple Email Service SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -63,5 +63,5 @@     other-modules:      build-depends:-          amazonka-core-        , base          >= 4.7 && < 5+          amazonka-core == 0.0.1.*+        , base          >= 4.7     && < 5

@@ -51,16 +51,16 @@ import qualified GHC.Exts  data ListIdentities = ListIdentities-    { _liIdentityType :: Maybe Text+    { _liIdentityType :: Maybe IdentityType     , _liMaxItems     :: Maybe Int     , _liNextToken    :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Show)  -- | 'ListIdentities' constructor. -- -- The fields accessible through corresponding lenses are: ----- * 'liIdentityType' @::@ 'Maybe' 'Text'+-- * 'liIdentityType' @::@ 'Maybe' 'IdentityType' -- -- * 'liMaxItems' @::@ 'Maybe' 'Int' --@@ -76,7 +76,7 @@ -- | The type of the identities to list. Possible values are "EmailAddress" -- and "Domain". If this parameter is omitted, then all identities will be -- listed.-liIdentityType :: Lens' ListIdentities (Maybe Text)+liIdentityType :: Lens' ListIdentities (Maybe IdentityType) liIdentityType = lens _liIdentityType (\s a -> s { _liIdentityType = a })  -- | The maximum number of identities per page. Possible values are 1-100

@@ -52,9 +52,9 @@  data SetIdentityNotificationTopic = SetIdentityNotificationTopic     { _sintIdentity         :: Text-    , _sintNotificationType :: Text+    , _sintNotificationType :: NotificationType     , _sintSnsTopic         :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Show)  -- | 'SetIdentityNotificationTopic' constructor. --@@ -62,12 +62,12 @@ -- -- * 'sintIdentity' @::@ 'Text' ----- * 'sintNotificationType' @::@ 'Text'+-- * 'sintNotificationType' @::@ 'NotificationType' -- -- * 'sintSnsTopic' @::@ 'Maybe' 'Text' -- setIdentityNotificationTopic :: Text -- ^ 'sintIdentity'-                             -> Text -- ^ 'sintNotificationType'+                             -> NotificationType -- ^ 'sintNotificationType'                              -> SetIdentityNotificationTopic setIdentityNotificationTopic p1 p2 = SetIdentityNotificationTopic     { _sintIdentity         = p1@@ -82,7 +82,7 @@  -- | The type of notifications that will be published to the specified Amazon -- SNS topic.-sintNotificationType :: Lens' SetIdentityNotificationTopic Text+sintNotificationType :: Lens' SetIdentityNotificationTopic NotificationType sintNotificationType =     lens _sintNotificationType (\s a -> s { _sintNotificationType = a }) 

@@ -176,8 +176,8 @@ data IdentityDkimAttributes = IdentityDkimAttributes     { _idaDkimEnabled            :: Bool     , _idaDkimTokens             :: List "DkimTokens" Text-    , _idaDkimVerificationStatus :: Text-    } deriving (Eq, Ord, Show)+    , _idaDkimVerificationStatus :: VerificationStatus+    } deriving (Eq, Show)  -- | 'IdentityDkimAttributes' constructor. --@@ -187,10 +187,10 @@ -- -- * 'idaDkimTokens' @::@ ['Text'] ----- * 'idaDkimVerificationStatus' @::@ 'Text'+-- * 'idaDkimVerificationStatus' @::@ 'VerificationStatus' -- identityDkimAttributes :: Bool -- ^ 'idaDkimEnabled'-                       -> Text -- ^ 'idaDkimVerificationStatus'+                       -> VerificationStatus -- ^ 'idaDkimVerificationStatus'                        -> IdentityDkimAttributes identityDkimAttributes p1 p2 = IdentityDkimAttributes     { _idaDkimEnabled            = p1@@ -218,7 +218,7 @@ -- | Describes whether Amazon SES has successfully verified the DKIM DNS -- records (tokens) published in the domain name's DNS. (This only applies -- to domain identities, not email address identities.).-idaDkimVerificationStatus :: Lens' IdentityDkimAttributes Text+idaDkimVerificationStatus :: Lens' IdentityDkimAttributes VerificationStatus idaDkimVerificationStatus =     lens _idaDkimVerificationStatus         (\s a -> s { _idaDkimVerificationStatus = a })@@ -278,19 +278,19 @@         ]  data IdentityVerificationAttributes = IdentityVerificationAttributes-    { _ivaVerificationStatus :: Text+    { _ivaVerificationStatus :: VerificationStatus     , _ivaVerificationToken  :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Show)  -- | 'IdentityVerificationAttributes' constructor. -- -- The fields accessible through corresponding lenses are: ----- * 'ivaVerificationStatus' @::@ 'Text'+-- * 'ivaVerificationStatus' @::@ 'VerificationStatus' -- -- * 'ivaVerificationToken' @::@ 'Maybe' 'Text' ---identityVerificationAttributes :: Text -- ^ 'ivaVerificationStatus'+identityVerificationAttributes :: VerificationStatus -- ^ 'ivaVerificationStatus'                                -> IdentityVerificationAttributes identityVerificationAttributes p1 = IdentityVerificationAttributes     { _ivaVerificationStatus = p1@@ -299,7 +299,7 @@  -- | The verification status of the identity: "Pending", "Success", "Failed", -- or "TemporaryFailure".-ivaVerificationStatus :: Lens' IdentityVerificationAttributes Text+ivaVerificationStatus :: Lens' IdentityVerificationAttributes VerificationStatus ivaVerificationStatus =     lens _ivaVerificationStatus (\s a -> s { _ivaVerificationStatus = a }) @@ -405,11 +405,13 @@         ITDomain       -> "Domain"         ITEmailAddress -> "EmailAddress" +instance ToByteString IdentityType+instance ToHeader     IdentityType+instance ToQuery      IdentityType+ instance FromXML IdentityType where     parseXML = parseXMLText "IdentityType" -instance ToQuery IdentityType where-    toQuery = toQuery . toText  data Content = Content     { _cCharset :: Maybe Text@@ -573,11 +575,13 @@         Complaint -> "Complaint"         Delivery  -> "Delivery" +instance ToByteString NotificationType+instance ToHeader     NotificationType+instance ToQuery      NotificationType+ instance FromXML NotificationType where     parseXML = parseXMLText "NotificationType" -instance ToQuery NotificationType where-    toQuery = toQuery . toText  data VerificationStatus     = Failed           -- ^ Failed@@ -604,11 +608,13 @@         Success          -> "Success"         TemporaryFailure -> "TemporaryFailure" +instance ToByteString VerificationStatus+instance ToHeader     VerificationStatus+instance ToQuery      VerificationStatus+ instance FromXML VerificationStatus where     parseXML = parseXMLText "VerificationStatus" -instance ToQuery VerificationStatus where-    toQuery = toQuery . toText  data Message = Message     { _mBody    :: Body