amazonka-autoscaling 1.0.0 → 1.0.1

raw patch · 6 files changed

+61/−62 lines, 6 filesdep ~amazonka-autoscalingdep ~amazonka-coredep ~amazonka-testPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: amazonka-autoscaling, amazonka-core, amazonka-test

API changes (from Hackage documentation)

Files

• README.md +1/−1
• amazonka-autoscaling.cabal +5/−5
• gen/Network/AWS/AutoScaling.hs +2/−2
• gen/Network/AWS/AutoScaling/Types.hs +2/−2
• gen/Network/AWS/AutoScaling/Types/Product.hs +25/−26
• gen/Network/AWS/AutoScaling/Types/Sum.hs +26/−26

@@ -8,7 +8,7 @@  ## Version -`1.0.0`+`1.0.1`   ## Description

@@ -1,5 +1,5 @@ name:                  amazonka-autoscaling-version:               1.0.0+version:               1.0.1 synopsis:              Amazon Auto Scaling SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -102,7 +102,7 @@         , Network.AWS.AutoScaling.Types.Sum      build-depends:-          amazonka-core == 1.0.0.*+          amazonka-core == 1.0.1.*         , base          >= 4.7     && < 5  test-suite amazonka-autoscaling-test@@ -121,9 +121,9 @@         , Test.AWS.AutoScaling.Internal      build-depends:-          amazonka-core == 1.0.0-        , amazonka-test == 1.0.0-        , amazonka-autoscaling == 1.0.0+          amazonka-core == 1.0.1+        , amazonka-test == 1.0.1+        , amazonka-autoscaling == 1.0.1         , base         , bytestring         , lens

@@ -237,13 +237,13 @@     , asgVPCZoneIdentifier     , asgEnabledMetrics     , asgInstances+    , asgLaunchConfigurationName     , asgAutoScalingGroupARN     , asgSuspendedProcesses     , asgPlacementGroup     , asgLoadBalancerNames     , asgTags     , asgAutoScalingGroupName-    , asgLaunchConfigurationName     , asgMinSize     , asgMaxSize     , asgDesiredCapacity@@ -294,11 +294,11 @@     -- ** Instance     , Instance     , instance'+    , iLaunchConfigurationName     , iInstanceId     , iAvailabilityZone     , iLifecycleState     , iHealthStatus-    , iLaunchConfigurationName      -- ** InstanceMonitoring     , InstanceMonitoring

@@ -64,13 +64,13 @@     , asgVPCZoneIdentifier     , asgEnabledMetrics     , asgInstances+    , asgLaunchConfigurationName     , asgAutoScalingGroupARN     , asgSuspendedProcesses     , asgPlacementGroup     , asgLoadBalancerNames     , asgTags     , asgAutoScalingGroupName-    , asgLaunchConfigurationName     , asgMinSize     , asgMaxSize     , asgDesiredCapacity@@ -121,11 +121,11 @@     -- * Instance     , Instance     , instance'+    , iLaunchConfigurationName     , iInstanceId     , iAvailabilityZone     , iLifecycleState     , iHealthStatus-    , iLaunchConfigurationName      -- * InstanceMonitoring     , InstanceMonitoring

@@ -214,13 +214,13 @@     , _asgVPCZoneIdentifier       :: !(Maybe Text)     , _asgEnabledMetrics          :: !(Maybe [EnabledMetric])     , _asgInstances               :: !(Maybe [Instance])+    , _asgLaunchConfigurationName :: !(Maybe Text)     , _asgAutoScalingGroupARN     :: !(Maybe Text)     , _asgSuspendedProcesses      :: !(Maybe [SuspendedProcess])     , _asgPlacementGroup          :: !(Maybe Text)     , _asgLoadBalancerNames       :: !(Maybe [Text])     , _asgTags                    :: !(Maybe [TagDescription])     , _asgAutoScalingGroupName    :: !Text-    , _asgLaunchConfigurationName :: !Text     , _asgMinSize                 :: !Int     , _asgMaxSize                 :: !Int     , _asgDesiredCapacity         :: !Int@@ -246,6 +246,8 @@ -- -- * 'asgInstances' --+-- * 'asgLaunchConfigurationName'+-- -- * 'asgAutoScalingGroupARN' -- -- * 'asgSuspendedProcesses'@@ -258,8 +260,6 @@ -- -- * 'asgAutoScalingGroupName' ----- * 'asgLaunchConfigurationName'--- -- * 'asgMinSize' -- -- * 'asgMaxSize'@@ -275,7 +275,6 @@ -- * 'asgCreatedTime' autoScalingGroup     :: Text -- ^ 'asgAutoScalingGroupName'-    -> Text -- ^ 'asgLaunchConfigurationName'     -> Int -- ^ 'asgMinSize'     -> Int -- ^ 'asgMaxSize'     -> Int -- ^ 'asgDesiredCapacity'@@ -284,7 +283,7 @@     -> Text -- ^ 'asgHealthCheckType'     -> UTCTime -- ^ 'asgCreatedTime'     -> AutoScalingGroup-autoScalingGroup pAutoScalingGroupName_ pLaunchConfigurationName_ pMinSize_ pMaxSize_ pDesiredCapacity_ pDefaultCooldown_ pAvailabilityZones_ pHealthCheckType_ pCreatedTime_ =+autoScalingGroup pAutoScalingGroupName_ pMinSize_ pMaxSize_ pDesiredCapacity_ pDefaultCooldown_ pAvailabilityZones_ pHealthCheckType_ pCreatedTime_ =     AutoScalingGroup'     { _asgStatus = Nothing     , _asgTerminationPolicies = Nothing@@ -292,13 +291,13 @@     , _asgVPCZoneIdentifier = Nothing     , _asgEnabledMetrics = Nothing     , _asgInstances = Nothing+    , _asgLaunchConfigurationName = Nothing     , _asgAutoScalingGroupARN = Nothing     , _asgSuspendedProcesses = Nothing     , _asgPlacementGroup = Nothing     , _asgLoadBalancerNames = Nothing     , _asgTags = Nothing     , _asgAutoScalingGroupName = pAutoScalingGroupName_-    , _asgLaunchConfigurationName = pLaunchConfigurationName_     , _asgMinSize = pMinSize_     , _asgMaxSize = pMaxSize_     , _asgDesiredCapacity = pDesiredCapacity_@@ -339,6 +338,10 @@ asgInstances :: Lens' AutoScalingGroup [Instance] asgInstances = lens _asgInstances (\ s a -> s{_asgInstances = a}) . _Default . _Coerce; +-- | The name of the associated launch configuration.+asgLaunchConfigurationName :: Lens' AutoScalingGroup (Maybe Text)+asgLaunchConfigurationName = lens _asgLaunchConfigurationName (\ s a -> s{_asgLaunchConfigurationName = a});+ -- | The Amazon Resource Name (ARN) of the group. asgAutoScalingGroupARN :: Lens' AutoScalingGroup (Maybe Text) asgAutoScalingGroupARN = lens _asgAutoScalingGroupARN (\ s a -> s{_asgAutoScalingGroupARN = a});@@ -365,10 +368,6 @@ asgAutoScalingGroupName :: Lens' AutoScalingGroup Text asgAutoScalingGroupName = lens _asgAutoScalingGroupName (\ s a -> s{_asgAutoScalingGroupName = a}); --- | The name of the associated launch configuration.-asgLaunchConfigurationName :: Lens' AutoScalingGroup Text-asgLaunchConfigurationName = lens _asgLaunchConfigurationName (\ s a -> s{_asgLaunchConfigurationName = a});- -- | The minimum size of the group. asgMinSize :: Lens' AutoScalingGroup Int asgMinSize = lens _asgMinSize (\ s a -> s{_asgMinSize = a});@@ -413,6 +412,7 @@                 <*>                 (x .@? "Instances" .!@ mempty >>=                    may (parseXMLList "member"))+                <*> (x .@? "LaunchConfigurationName")                 <*> (x .@? "AutoScalingGroupARN")                 <*>                 (x .@? "SuspendedProcesses" .!@ mempty >>=@@ -425,7 +425,6 @@                 (x .@? "Tags" .!@ mempty >>=                    may (parseXMLList "member"))                 <*> (x .@ "AutoScalingGroupName")-                <*> (x .@ "LaunchConfigurationName")                 <*> (x .@ "MinSize")                 <*> (x .@ "MaxSize")                 <*> (x .@ "DesiredCapacity")@@ -774,17 +773,19 @@ -- -- /See:/ 'instance'' smart constructor. data Instance = Instance'-    { _iInstanceId              :: !Text+    { _iLaunchConfigurationName :: !(Maybe Text)+    , _iInstanceId              :: !Text     , _iAvailabilityZone        :: !Text     , _iLifecycleState          :: !LifecycleState     , _iHealthStatus            :: !Text-    , _iLaunchConfigurationName :: !Text     } deriving (Eq,Read,Show,Data,Typeable,Generic)  -- | Creates a value of 'Instance' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: --+-- * 'iLaunchConfigurationName'+-- -- * 'iInstanceId' -- -- * 'iAvailabilityZone'@@ -792,24 +793,25 @@ -- * 'iLifecycleState' -- -- * 'iHealthStatus'------ * 'iLaunchConfigurationName' instance'     :: Text -- ^ 'iInstanceId'     -> Text -- ^ 'iAvailabilityZone'     -> LifecycleState -- ^ 'iLifecycleState'     -> Text -- ^ 'iHealthStatus'-    -> Text -- ^ 'iLaunchConfigurationName'     -> Instance-instance' pInstanceId_ pAvailabilityZone_ pLifecycleState_ pHealthStatus_ pLaunchConfigurationName_ =+instance' pInstanceId_ pAvailabilityZone_ pLifecycleState_ pHealthStatus_ =     Instance'-    { _iInstanceId = pInstanceId_+    { _iLaunchConfigurationName = Nothing+    , _iInstanceId = pInstanceId_     , _iAvailabilityZone = pAvailabilityZone_     , _iLifecycleState = pLifecycleState_     , _iHealthStatus = pHealthStatus_-    , _iLaunchConfigurationName = pLaunchConfigurationName_     } +-- | The launch configuration associated with the instance.+iLaunchConfigurationName :: Lens' Instance (Maybe Text)+iLaunchConfigurationName = lens _iLaunchConfigurationName (\ s a -> s{_iLaunchConfigurationName = a});+ -- | The ID of the instance. iInstanceId :: Lens' Instance Text iInstanceId = lens _iInstanceId (\ s a -> s{_iInstanceId = a});@@ -827,17 +829,14 @@ iHealthStatus :: Lens' Instance Text iHealthStatus = lens _iHealthStatus (\ s a -> s{_iHealthStatus = a}); --- | The launch configuration associated with the instance.-iLaunchConfigurationName :: Lens' Instance Text-iLaunchConfigurationName = lens _iLaunchConfigurationName (\ s a -> s{_iLaunchConfigurationName = a});- instance FromXML Instance where         parseXML x           = Instance' <$>-              (x .@ "InstanceId") <*> (x .@ "AvailabilityZone") <*>-                (x .@ "LifecycleState")+              (x .@? "LaunchConfigurationName") <*>+                (x .@ "InstanceId")+                <*> (x .@ "AvailabilityZone")+                <*> (x .@ "LifecycleState")                 <*> (x .@ "HealthStatus")-                <*> (x .@ "LaunchConfigurationName")  -- | Describes whether instance monitoring is enabled. --

@@ -51,23 +51,23 @@         "terminating:proceed" -> pure TerminatingProceed         "terminating:wait" -> pure TerminatingWait         e -> fromTextError $ "Failure parsing LifecycleState from value: '" <> e-           <> "'. Accepted values: detached, detaching, enteringstandby, inservice, pending, pending:proceed, pending:wait, quarantined, standby, terminated, terminating, terminating:proceed, terminating:wait"+           <> "'. Accepted values: Detached, Detaching, EnteringStandby, InService, Pending, Pending:Proceed, Pending:Wait, Quarantined, Standby, Terminated, Terminating, Terminating:Proceed, Terminating:Wait"  instance ToText LifecycleState where     toText = \case-        Detached -> "detached"-        Detaching -> "detaching"-        EnteringStandby -> "enteringstandby"-        InService -> "inservice"-        Pending -> "pending"-        PendingProceed -> "pending:proceed"-        PendingWait -> "pending:wait"-        Quarantined -> "quarantined"-        Standby -> "standby"-        Terminated -> "terminated"-        Terminating -> "terminating"-        TerminatingProceed -> "terminating:proceed"-        TerminatingWait -> "terminating:wait"+        Detached -> "Detached"+        Detaching -> "Detaching"+        EnteringStandby -> "EnteringStandby"+        InService -> "InService"+        Pending -> "Pending"+        PendingProceed -> "Pending:Proceed"+        PendingWait -> "Pending:Wait"+        Quarantined -> "Quarantined"+        Standby -> "Standby"+        Terminated -> "Terminated"+        Terminating -> "Terminating"+        TerminatingProceed -> "Terminating:Proceed"+        TerminatingWait -> "Terminating:Wait"  instance Hashable     LifecycleState instance ToByteString LifecycleState@@ -105,21 +105,21 @@         "waitingforspotinstanceid" -> pure WaitingForSpotInstanceId         "waitingforspotinstancerequestid" -> pure WaitingForSpotInstanceRequestId         e -> fromTextError $ "Failure parsing ScalingActivityStatusCode from value: '" <> e-           <> "'. Accepted values: cancelled, failed, inprogress, midlifecycleaction, preinservice, successful, waitingforelbconnectiondraining, waitingforinstanceid, waitingforinstancewarmup, waitingforspotinstanceid, waitingforspotinstancerequestid"+           <> "'. Accepted values: Cancelled, Failed, InProgress, MidLifecycleAction, PreInService, Successful, WaitingForELBConnectionDraining, WaitingForInstanceId, WaitingForInstanceWarmup, WaitingForSpotInstanceId, WaitingForSpotInstanceRequestId"  instance ToText ScalingActivityStatusCode where     toText = \case-        Cancelled -> "cancelled"-        Failed -> "failed"-        InProgress -> "inprogress"-        MidLifecycleAction -> "midlifecycleaction"-        PreInService -> "preinservice"-        Successful -> "successful"-        WaitingForELBConnectionDraining -> "waitingforelbconnectiondraining"-        WaitingForInstanceId -> "waitingforinstanceid"-        WaitingForInstanceWarmup -> "waitingforinstancewarmup"-        WaitingForSpotInstanceId -> "waitingforspotinstanceid"-        WaitingForSpotInstanceRequestId -> "waitingforspotinstancerequestid"+        Cancelled -> "Cancelled"+        Failed -> "Failed"+        InProgress -> "InProgress"+        MidLifecycleAction -> "MidLifecycleAction"+        PreInService -> "PreInService"+        Successful -> "Successful"+        WaitingForELBConnectionDraining -> "WaitingForELBConnectionDraining"+        WaitingForInstanceId -> "WaitingForInstanceId"+        WaitingForInstanceWarmup -> "WaitingForInstanceWarmup"+        WaitingForSpotInstanceId -> "WaitingForSpotInstanceId"+        WaitingForSpotInstanceRequestId -> "WaitingForSpotInstanceRequestId"  instance Hashable     ScalingActivityStatusCode instance ToByteString ScalingActivityStatusCode