amazonka-autoscaling 0.0.0 → 0.0.1

raw patch · 2 files changed

+21/−17 lines, 2 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-autoscaling.cabal +3/−3
• gen/Network/AWS/AutoScaling/Types.hs +18/−14

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

@@ -1589,9 +1589,9 @@     , _aEndTime              :: Maybe RFC822     , _aProgress             :: Maybe Int     , _aStartTime            :: RFC822-    , _aStatusCode           :: Text+    , _aStatusCode           :: ScalingActivityStatusCode     , _aStatusMessage        :: Maybe Text-    } deriving (Eq, Ord, Show)+    } deriving (Eq, Show)  -- | 'Activity' constructor. --@@ -1613,7 +1613,7 @@ -- -- * 'aStartTime' @::@ 'UTCTime' ----- * 'aStatusCode' @::@ 'Text'+-- * 'aStatusCode' @::@ 'ScalingActivityStatusCode' -- -- * 'aStatusMessage' @::@ 'Maybe' 'Text' --@@ -1621,7 +1621,7 @@          -> Text -- ^ 'aAutoScalingGroupName'          -> Text -- ^ 'aCause'          -> UTCTime -- ^ 'aStartTime'-         -> Text -- ^ 'aStatusCode'+         -> ScalingActivityStatusCode -- ^ 'aStatusCode'          -> Activity activity p1 p2 p3 p4 p5 = Activity     { _aActivityId           = p1@@ -1670,7 +1670,7 @@ aStartTime = lens _aStartTime (\s a -> s { _aStartTime = a }) . _Time  -- | The current status of the activity.-aStatusCode :: Lens' Activity Text+aStatusCode :: Lens' Activity ScalingActivityStatusCode aStatusCode = lens _aStatusCode (\s a -> s { _aStatusCode = a })  -- | A friendly, more verbose description of the activity status.@@ -1921,8 +1921,8 @@     , _iHealthStatus            :: Text     , _iInstanceId              :: Text     , _iLaunchConfigurationName :: Text-    , _iLifecycleState          :: Text-    } deriving (Eq, Ord, Show)+    , _iLifecycleState          :: LifecycleState+    } deriving (Eq, Show)  -- | 'Instance' constructor. --@@ -1936,11 +1936,11 @@ -- -- * 'iLaunchConfigurationName' @::@ 'Text' ----- * 'iLifecycleState' @::@ 'Text'+-- * 'iLifecycleState' @::@ 'LifecycleState' -- instance' :: Text -- ^ 'iInstanceId'           -> Text -- ^ 'iAvailabilityZone'-          -> Text -- ^ 'iLifecycleState'+          -> LifecycleState -- ^ 'iLifecycleState'           -> Text -- ^ 'iHealthStatus'           -> Text -- ^ 'iLaunchConfigurationName'           -> Instance@@ -1973,7 +1973,7 @@  -- | A description of the current lifecycle state. The Quarantined lifecycle -- state is not used.-iLifecycleState :: Lens' Instance Text+iLifecycleState :: Lens' Instance LifecycleState iLifecycleState = lens _iLifecycleState (\s a -> s { _iLifecycleState = a })  instance FromXML Instance where@@ -2042,11 +2042,13 @@         TerminatingProceed -> "Terminating:Proceed"         TerminatingWait    -> "Terminating:Wait" +instance ToByteString LifecycleState+instance ToHeader     LifecycleState+instance ToQuery      LifecycleState+ instance FromXML LifecycleState where     parseXML = parseXMLText "LifecycleState" -instance ToQuery LifecycleState where-    toQuery = toQuery . toText  data AutoScalingInstanceDetails = AutoScalingInstanceDetails     { _asidAutoScalingGroupName    :: Text@@ -2181,8 +2183,10 @@         WaitingForSpotInstanceId        -> "WaitingForSpotInstanceId"         WaitingForSpotInstanceRequestId -> "WaitingForSpotInstanceRequestId" +instance ToByteString ScalingActivityStatusCode+instance ToHeader     ScalingActivityStatusCode+instance ToQuery      ScalingActivityStatusCode+ instance FromXML ScalingActivityStatusCode where     parseXML = parseXMLText "ScalingActivityStatusCode" -instance ToQuery ScalingActivityStatusCode where-    toQuery = toQuery . toText