amazonka-cloudwatch-logs 1.0.1 → 1.1.0

raw patch · 9 files changed

+62/−12 lines, 9 filesdep ~amazonka-cloudwatch-logsdep ~amazonka-coredep ~amazonka-testsetup-changedPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-cloudwatch-logs, amazonka-core, amazonka-test

API changes (from Hackage documentation)

Files

• README.md +1/−1
• Setup.hs +1/−1
• amazonka-cloudwatch-logs.cabal +5/−5
• gen/Network/AWS/CloudWatchLogs.hs +5/−5
• gen/Network/AWS/CloudWatchLogs/DescribeLogGroups.hs +10/−0
• gen/Network/AWS/CloudWatchLogs/DescribeLogStreams.hs +10/−0
• gen/Network/AWS/CloudWatchLogs/DescribeMetricFilters.hs +10/−0
• gen/Network/AWS/CloudWatchLogs/DescribeSubscriptionFilters.hs +10/−0
• gen/Network/AWS/CloudWatchLogs/FilterLogEvents.hs +10/−0

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

@@ -1,2 +1,2 @@-import Distribution.Simple+import           Distribution.Simple main = defaultMain

@@ -1,5 +1,5 @@ name:                  amazonka-cloudwatch-logs-version:               1.0.1+version:               1.1.0 synopsis:              Amazon CloudWatch Logs SDK. homepage:              https://github.com/brendanhay/amazonka license:               OtherLicense@@ -111,7 +111,7 @@         , Network.AWS.CloudWatchLogs.Types.Sum      build-depends:-          amazonka-core == 1.0.1.*+          amazonka-core == 1.1.0.*         , base          >= 4.7     && < 5  test-suite amazonka-cloudwatch-logs-test@@ -130,9 +130,9 @@         , Test.AWS.CloudWatchLogs.Internal      build-depends:-          amazonka-core == 1.0.1-        , amazonka-test == 1.0.1-        , amazonka-cloudwatch-logs == 1.0.1+          amazonka-core == 1.1.0+        , amazonka-test == 1.1.0+        , amazonka-cloudwatch-logs == 1.1.0         , base         , bytestring         , lens

@@ -101,16 +101,16 @@     -- ** PutDestination     , module Network.AWS.CloudWatchLogs.PutDestination -    -- ** DescribeSubscriptionFilters+    -- ** DescribeSubscriptionFilters (Paginated)     , module Network.AWS.CloudWatchLogs.DescribeSubscriptionFilters      -- ** GetLogEvents     , module Network.AWS.CloudWatchLogs.GetLogEvents -    -- ** DescribeLogGroups+    -- ** DescribeLogGroups (Paginated)     , module Network.AWS.CloudWatchLogs.DescribeLogGroups -    -- ** FilterLogEvents+    -- ** FilterLogEvents (Paginated)     , module Network.AWS.CloudWatchLogs.FilterLogEvents      -- ** DeleteLogStream@@ -137,7 +137,7 @@     -- ** TestMetricFilter     , module Network.AWS.CloudWatchLogs.TestMetricFilter -    -- ** DescribeMetricFilters+    -- ** DescribeMetricFilters (Paginated)     , module Network.AWS.CloudWatchLogs.DescribeMetricFilters      -- ** DeleteMetricFilter@@ -155,7 +155,7 @@     -- ** PutDestinationPolicy     , module Network.AWS.CloudWatchLogs.PutDestinationPolicy -    -- ** DescribeLogStreams+    -- ** DescribeLogStreams (Paginated)     , module Network.AWS.CloudWatchLogs.DescribeLogStreams      -- * Types

@@ -29,6 +29,8 @@ -- request. -- -- /See:/ <http://docs.aws.amazon.com/AmazonCloudWatchLogs/latest/APIReference/API_DescribeLogGroups.html AWS API Reference> for DescribeLogGroups.+--+-- This operation returns paginated results. module Network.AWS.CloudWatchLogs.DescribeLogGroups     (     -- * Creating a Request@@ -50,6 +52,7 @@  import           Network.AWS.CloudWatchLogs.Types import           Network.AWS.CloudWatchLogs.Types.Product+import           Network.AWS.Pager import           Network.AWS.Prelude import           Network.AWS.Request import           Network.AWS.Response@@ -94,6 +97,13 @@ -- specify a value, the request would return up to 50 items. dlgLimit :: Lens' DescribeLogGroups (Maybe Natural) dlgLimit = lens _dlgLimit (\ s a -> s{_dlgLimit = a}) . mapping _Nat;++instance AWSPager DescribeLogGroups where+        page rq rs+          | stop (rs ^. dlgrsNextToken) = Nothing+          | stop (rs ^. dlgrsLogGroups) = Nothing+          | otherwise =+            Just $ rq & dlgNextToken .~ rs ^. dlgrsNextToken  instance AWSRequest DescribeLogGroups where         type Sv DescribeLogGroups = CloudWatchLogs

@@ -30,6 +30,8 @@ -- after which transactions are throttled. -- -- /See:/ <http://docs.aws.amazon.com/AmazonCloudWatchLogs/latest/APIReference/API_DescribeLogStreams.html AWS API Reference> for DescribeLogStreams.+--+-- This operation returns paginated results. module Network.AWS.CloudWatchLogs.DescribeLogStreams     (     -- * Creating a Request@@ -54,6 +56,7 @@  import           Network.AWS.CloudWatchLogs.Types import           Network.AWS.CloudWatchLogs.Types.Product+import           Network.AWS.Pager import           Network.AWS.Prelude import           Network.AWS.Request import           Network.AWS.Response@@ -129,6 +132,13 @@ -- | The log group name for which log streams are to be listed. dlssLogGroupName :: Lens' DescribeLogStreams Text dlssLogGroupName = lens _dlssLogGroupName (\ s a -> s{_dlssLogGroupName = a});++instance AWSPager DescribeLogStreams where+        page rq rs+          | stop (rs ^. dlsrsNextToken) = Nothing+          | stop (rs ^. dlsrsLogStreams) = Nothing+          | otherwise =+            Just $ rq & dlssNextToken .~ rs ^. dlsrsNextToken  instance AWSRequest DescribeLogStreams where         type Sv DescribeLogStreams = CloudWatchLogs

@@ -28,6 +28,8 @@ -- the request. -- -- /See:/ <http://docs.aws.amazon.com/AmazonCloudWatchLogs/latest/APIReference/API_DescribeMetricFilters.html AWS API Reference> for DescribeMetricFilters.+--+-- This operation returns paginated results. module Network.AWS.CloudWatchLogs.DescribeMetricFilters     (     -- * Creating a Request@@ -50,6 +52,7 @@  import           Network.AWS.CloudWatchLogs.Types import           Network.AWS.CloudWatchLogs.Types.Product+import           Network.AWS.Pager import           Network.AWS.Prelude import           Network.AWS.Request import           Network.AWS.Response@@ -104,6 +107,13 @@ -- | The log group name for which metric filters are to be listed. dmfLogGroupName :: Lens' DescribeMetricFilters Text dmfLogGroupName = lens _dmfLogGroupName (\ s a -> s{_dmfLogGroupName = a});++instance AWSPager DescribeMetricFilters where+        page rq rs+          | stop (rs ^. dmfrsNextToken) = Nothing+          | stop (rs ^. dmfrsMetricFilters) = Nothing+          | otherwise =+            Just $ rq & dmfNextToken .~ rs ^. dmfrsNextToken  instance AWSRequest DescribeMetricFilters where         type Sv DescribeMetricFilters = CloudWatchLogs

@@ -28,6 +28,8 @@ -- 'limit' parameter in the request. -- -- /See:/ <http://docs.aws.amazon.com/AmazonCloudWatchLogs/latest/APIReference/API_DescribeSubscriptionFilters.html AWS API Reference> for DescribeSubscriptionFilters.+--+-- This operation returns paginated results. module Network.AWS.CloudWatchLogs.DescribeSubscriptionFilters     (     -- * Creating a Request@@ -50,6 +52,7 @@  import           Network.AWS.CloudWatchLogs.Types import           Network.AWS.CloudWatchLogs.Types.Product+import           Network.AWS.Pager import           Network.AWS.Prelude import           Network.AWS.Request import           Network.AWS.Response@@ -101,6 +104,13 @@ -- | The log group name for which subscription filters are to be listed. dsfLogGroupName :: Lens' DescribeSubscriptionFilters Text dsfLogGroupName = lens _dsfLogGroupName (\ s a -> s{_dsfLogGroupName = a});++instance AWSPager DescribeSubscriptionFilters where+        page rq rs+          | stop (rs ^. dsfrsNextToken) = Nothing+          | stop (rs ^. dsfrsSubscriptionFilters) = Nothing+          | otherwise =+            Just $ rq & dsfNextToken .~ rs ^. dsfrsNextToken  instance AWSRequest DescribeSubscriptionFilters where         type Sv DescribeSubscriptionFilters = CloudWatchLogs

@@ -35,6 +35,8 @@ -- return in a page. -- -- /See:/ <http://docs.aws.amazon.com/AmazonCloudWatchLogs/latest/APIReference/API_FilterLogEvents.html AWS API Reference> for FilterLogEvents.+--+-- This operation returns paginated results. module Network.AWS.CloudWatchLogs.FilterLogEvents     (     -- * Creating a Request@@ -62,6 +64,7 @@  import           Network.AWS.CloudWatchLogs.Types import           Network.AWS.CloudWatchLogs.Types.Product+import           Network.AWS.Pager import           Network.AWS.Prelude import           Network.AWS.Request import           Network.AWS.Response@@ -155,6 +158,13 @@ -- | The name of the log group to query. fleLogGroupName :: Lens' FilterLogEvents Text fleLogGroupName = lens _fleLogGroupName (\ s a -> s{_fleLogGroupName = a});++instance AWSPager FilterLogEvents where+        page rq rs+          | stop (rs ^. flersNextToken) = Nothing+          | stop (rs ^. flersEvents) = Nothing+          | otherwise =+            Just $ rq & fleNextToken .~ rs ^. flersNextToken  instance AWSRequest FilterLogEvents where         type Sv FilterLogEvents = CloudWatchLogs