summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBrendanHay <>2015-11-21 10:59:00 (GMT)
committerhdiff <hdiff@hdiff.luite.com>2015-11-21 10:59:00 (GMT)
commitc0966e2736a4479b00af28ed230146a1544d6c11 (patch)
tree4e09a378ba9ca4718a9f8f477d9d7fc550c816eb
parentc8a58ad24ffe5b5ffff30eff425da95cecf11eb7 (diff)
version 1.3.61.3.6
-rw-r--r--README.md2
-rw-r--r--amazonka-kinesis.cabal10
-rw-r--r--gen/Network/AWS/Kinesis.hs3
-rw-r--r--gen/Network/AWS/Kinesis/Waiters.hs12
4 files changed, 21 insertions, 6 deletions
diff --git a/README.md b/README.md
index 5b78b9f..ee84f45 100644
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
## Version
-`1.3.5`
+`1.3.6`
## Description
diff --git a/amazonka-kinesis.cabal b/amazonka-kinesis.cabal
index b741646..469b965 100644
--- a/amazonka-kinesis.cabal
+++ b/amazonka-kinesis.cabal
@@ -1,5 +1,5 @@
name: amazonka-kinesis
-version: 1.3.5
+version: 1.3.6
synopsis: Amazon Kinesis SDK.
homepage: https://github.com/brendanhay/amazonka
bug-reports: https://github.com/brendanhay/amazonka/issues
@@ -67,7 +67,7 @@ library
, Network.AWS.Kinesis.Types.Sum
build-depends:
- amazonka-core == 1.3.5.*
+ amazonka-core == 1.3.6.*
, base >= 4.7 && < 5
test-suite amazonka-kinesis-test
@@ -87,9 +87,9 @@ test-suite amazonka-kinesis-test
, Test.AWS.Kinesis.Internal
build-depends:
- amazonka-core == 1.3.5.*
- , amazonka-test == 1.3.5.*
- , amazonka-kinesis == 1.3.5.*
+ amazonka-core == 1.3.6.*
+ , amazonka-test == 1.3.6.*
+ , amazonka-kinesis == 1.3.6.*
, base
, bytestring
, lens
diff --git a/gen/Network/AWS/Kinesis.hs b/gen/Network/AWS/Kinesis.hs
index f10ff32..3078dc6 100644
--- a/gen/Network/AWS/Kinesis.hs
+++ b/gen/Network/AWS/Kinesis.hs
@@ -49,6 +49,9 @@ module Network.AWS.Kinesis
-- ** StreamExists
, streamExists
+ -- ** StreamNotExists
+ , streamNotExists
+
-- * Operations
-- $operations
diff --git a/gen/Network/AWS/Kinesis/Waiters.hs b/gen/Network/AWS/Kinesis/Waiters.hs
index 8d8fabe..1bde39d 100644
--- a/gen/Network/AWS/Kinesis/Waiters.hs
+++ b/gen/Network/AWS/Kinesis/Waiters.hs
@@ -16,6 +16,7 @@
module Network.AWS.Kinesis.Waiters where
import Network.AWS.Kinesis.DescribeStream
+import Network.AWS.Kinesis.DescribeStream
import Network.AWS.Kinesis.Types
import Network.AWS.Prelude
import Network.AWS.Waiter
@@ -34,3 +35,14 @@ streamExists =
(dsrsStreamDescription .
sdStreamStatus . to toTextCI)]
}
+
+-- | Polls 'Network.AWS.Kinesis.DescribeStream' every 10 seconds until a
+-- successful state is reached. An error is returned after 18 failed checks.
+streamNotExists :: Wait DescribeStream
+streamNotExists =
+ Wait
+ { _waitName = "StreamNotExists"
+ , _waitAttempts = 18
+ , _waitDelay = 10
+ , _waitAcceptors = [matchError "ResourceNotFoundException" AcceptSuccess]
+ }