amazonka-cloudhsm 0.2.1 → 0.2.2

raw patch · 19 files changed

+40/−40 lines, 19 filesdep ~amazonka-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core

API changes (from Hackage documentation)

Files

• amazonka-cloudhsm.cabal +2/−2
• gen/Network/AWS/CloudHSM/CreateHapg.hs +2/−2
• gen/Network/AWS/CloudHSM/CreateHsm.hs +2/−2
• gen/Network/AWS/CloudHSM/CreateLunaClient.hs +2/−2
• gen/Network/AWS/CloudHSM/DeleteHapg.hs +2/−2
• gen/Network/AWS/CloudHSM/DeleteHsm.hs +2/−2
• gen/Network/AWS/CloudHSM/DeleteLunaClient.hs +2/−2
• gen/Network/AWS/CloudHSM/DescribeHapg.hs +2/−2
• gen/Network/AWS/CloudHSM/DescribeHsm.hs +2/−2
• gen/Network/AWS/CloudHSM/DescribeLunaClient.hs +2/−2
• gen/Network/AWS/CloudHSM/GetConfig.hs +2/−2
• gen/Network/AWS/CloudHSM/ListAvailableZones.hs +2/−2
• gen/Network/AWS/CloudHSM/ListHapgs.hs +2/−2
• gen/Network/AWS/CloudHSM/ListHsms.hs +2/−2
• gen/Network/AWS/CloudHSM/ListLunaClients.hs +2/−2
• gen/Network/AWS/CloudHSM/ModifyHapg.hs +2/−2
• gen/Network/AWS/CloudHSM/ModifyHsm.hs +2/−2
• gen/Network/AWS/CloudHSM/ModifyLunaClient.hs +2/−2
• gen/Network/AWS/CloudHSM/Types.hs +4/−4

@@ -1,5 +1,5 @@ name:                  amazonka-cloudhsm-version:               0.2.1+version:               0.2.2 synopsis:              Amazon CloudHSM SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -58,5 +58,5 @@     other-modules:      build-depends:-          amazonka-core == 0.2.1.*+          amazonka-core == 0.2.2.*         , base          >= 4.7     && < 5

@@ -50,7 +50,7 @@  newtype CreateHapg = CreateHapg     { _chLabel :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'CreateHapg' constructor. --@@ -70,7 +70,7 @@  newtype CreateHapgResponse = CreateHapgResponse     { _chrHapgArn :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'CreateHapgResponse' constructor. --

@@ -64,7 +64,7 @@     , _chSubnetId         :: Text     , _chSubscriptionType :: SubscriptionType     , _chSyslogIp         :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'CreateHsm' constructor. --@@ -139,7 +139,7 @@  newtype CreateHsmResponse = CreateHsmResponse     { _chrHsmArn :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'CreateHsmResponse' constructor. --

@@ -51,7 +51,7 @@ data CreateLunaClient = CreateLunaClient     { _clcCertificate :: Text     , _clcLabel       :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'CreateLunaClient' constructor. --@@ -79,7 +79,7 @@  newtype CreateLunaClientResponse = CreateLunaClientResponse     { _clcrClientArn :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'CreateLunaClientResponse' constructor. --

@@ -49,7 +49,7 @@  newtype DeleteHapg = DeleteHapg     { _dhHapgArn :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DeleteHapg' constructor. --@@ -69,7 +69,7 @@  newtype DeleteHapgResponse = DeleteHapgResponse     { _dhrStatus :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DeleteHapgResponse' constructor. --

@@ -50,7 +50,7 @@  newtype DeleteHsm = DeleteHsm     { _dhHsmArn :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DeleteHsm' constructor. --@@ -70,7 +70,7 @@  newtype DeleteHsmResponse = DeleteHsmResponse     { _dhr1Status :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DeleteHsmResponse' constructor. --

@@ -49,7 +49,7 @@  newtype DeleteLunaClient = DeleteLunaClient     { _dlc1ClientArn :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DeleteLunaClient' constructor. --@@ -69,7 +69,7 @@  newtype DeleteLunaClientResponse = DeleteLunaClientResponse     { _dlcrStatus :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DeleteLunaClientResponse' constructor. --

@@ -57,7 +57,7 @@  newtype DescribeHapg = DescribeHapg     { _dh1HapgArn :: Text-    } deriving (Eq, Ord, Show, Monoid, IsString)+    } deriving (Eq, Ord, Read, Show, Monoid, IsString)  -- | 'DescribeHapg' constructor. --@@ -85,7 +85,7 @@     , _dhrLastModifiedTimestamp   :: Maybe Text     , _dhrPartitionSerialList     :: List "PartitionSerialList" Text     , _dhrState                   :: Maybe CloudHsmObjectState-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'DescribeHapgResponse' constructor. --

@@ -72,7 +72,7 @@ data DescribeHsm = DescribeHsm     { _dh1HsmArn          :: Maybe Text     , _dh1HsmSerialNumber :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'DescribeHsm' constructor. --@@ -121,7 +121,7 @@     , _dhr2SubscriptionType      :: Maybe SubscriptionType     , _dhr2VendorName            :: Maybe Text     , _dhr2VpcId                 :: Maybe Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'DescribeHsmResponse' constructor. --

@@ -55,7 +55,7 @@ data DescribeLunaClient = DescribeLunaClient     { _dlcCertificateFingerprint :: Maybe Text     , _dlcClientArn              :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'DescribeLunaClient' constructor. --@@ -87,7 +87,7 @@     , _dlcrClientArn              :: Maybe Text     , _dlcrLabel                  :: Maybe Text     , _dlcrLastModifiedTimestamp  :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'DescribeLunaClientResponse' constructor. --

@@ -56,7 +56,7 @@     { _gcClientArn     :: Text     , _gcClientVersion :: ClientVersion     , _gcHapgList      :: List "HapgList" Text-    } deriving (Eq, Show)+    } deriving (Eq, Read, Show)  -- | 'GetConfig' constructor. --@@ -94,7 +94,7 @@     { _gcrConfigCred :: Maybe Text     , _gcrConfigFile :: Maybe Text     , _gcrConfigType :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'GetConfigResponse' constructor. --

@@ -46,7 +46,7 @@ import qualified GHC.Exts  data ListAvailableZones = ListAvailableZones-    deriving (Eq, Ord, Show, Generic)+    deriving (Eq, Ord, Read, Show, Generic)  -- | 'ListAvailableZones' constructor. listAvailableZones :: ListAvailableZones@@ -54,7 +54,7 @@  newtype ListAvailableZonesResponse = ListAvailableZonesResponse     { _lazrAZList :: List "AZList" Text-    } deriving (Eq, Ord, Show, Monoid, Semigroup)+    } deriving (Eq, Ord, Read, Show, Monoid, Semigroup)  instance GHC.Exts.IsList ListAvailableZonesResponse where     type Item ListAvailableZonesResponse = Text

@@ -55,7 +55,7 @@  newtype ListHapgs = ListHapgs     { _lhNextToken :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'ListHapgs' constructor. --@@ -76,7 +76,7 @@ data ListHapgsResponse = ListHapgsResponse     { _lhr1HapgList  :: List "HapgList" Text     , _lhr1NextToken :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ListHapgsResponse' constructor. --

@@ -56,7 +56,7 @@  newtype ListHsms = ListHsms     { _lh1NextToken :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'ListHsms' constructor. --@@ -77,7 +77,7 @@ data ListHsmsResponse = ListHsmsResponse     { _lhrHsmList   :: List "HsmList" Text     , _lhrNextToken :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ListHsmsResponse' constructor. --

@@ -55,7 +55,7 @@  newtype ListLunaClients = ListLunaClients     { _llcNextToken :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'ListLunaClients' constructor. --@@ -76,7 +76,7 @@ data ListLunaClientsResponse = ListLunaClientsResponse     { _llcrClientList :: List "ClientList" Text     , _llcrNextToken  :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ListLunaClientsResponse' constructor. --

@@ -53,7 +53,7 @@     { _mhHapgArn             :: Text     , _mhLabel               :: Maybe Text     , _mhPartitionSerialList :: List "PartitionSerialList" Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ModifyHapg' constructor. --@@ -90,7 +90,7 @@  newtype ModifyHapgResponse = ModifyHapgResponse     { _mhrHapgArn :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'ModifyHapgResponse' constructor. --

@@ -59,7 +59,7 @@     , _mhIamRoleArn :: Maybe Text     , _mhSubnetId   :: Maybe Text     , _mhSyslogIp   :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ModifyHsm' constructor. --@@ -114,7 +114,7 @@  newtype ModifyHsmResponse = ModifyHsmResponse     { _mhrHsmArn :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'ModifyHsmResponse' constructor. --

@@ -54,7 +54,7 @@ data ModifyLunaClient = ModifyLunaClient     { _mlcCertificate :: Text     , _mlcClientArn   :: Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Ord, Read, Show)  -- | 'ModifyLunaClient' constructor. --@@ -82,7 +82,7 @@  newtype ModifyLunaClientResponse = ModifyLunaClientResponse     { _mlcrClientArn :: Maybe Text-    } deriving (Eq, Ord, Show, Monoid)+    } deriving (Eq, Ord, Read, Show, Monoid)  -- | 'ModifyLunaClientResponse' constructor. --

@@ -92,7 +92,7 @@     = Degraded -- ^ DEGRADED     | Ready    -- ^ READY     | Updating -- ^ UPDATING-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable CloudHsmObjectState @@ -122,7 +122,7 @@  data SubscriptionType     = Production -- ^ PRODUCTION-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable SubscriptionType @@ -153,7 +153,7 @@     | HSTerminated  -- ^ TERMINATED     | HSTerminating -- ^ TERMINATING     | HSUpdating    -- ^ UPDATING-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable HsmStatus @@ -192,7 +192,7 @@ data ClientVersion     = V51 -- ^ 5.1     | V53 -- ^ 5.3-      deriving (Eq, Ord, Show, Generic, Enum)+      deriving (Eq, Ord, Read, Show, Generic, Enum)  instance Hashable ClientVersion