summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Network/AWS/Flow.hs2
-rw-r--r--wolf.cabal2
2 files changed, 1 insertions, 3 deletions
diff --git a/src/Network/AWS/Flow.hs b/src/Network/AWS/Flow.hs
index 96eef13..a097261 100644
--- a/src/Network/AWS/Flow.hs
+++ b/src/Network/AWS/Flow.hs
@@ -96,13 +96,11 @@ act queue action = do
maybe_ token' $ \token ->
maybe_ uid' $ \uid -> do
logInfo' $ sformat ("event=act-begin uid=" % stext) uid
- maybe_ input $ logDebug' . sformat ("event=act-input " % stext)
keys <- listObjectsAction uid
unless (null keys) $ logInfo' $ sformat ("event=list-blobs uid=" % stext) uid
blobs <- forM keys $ getObjectAction uid
unless (null blobs) $ logInfo' $ sformat ("event=blobs uid=" % stext) uid
(output, artifacts, e) <- action uid input blobs
- maybe_ output $ logDebug' . sformat ("event=act-output " % stext)
logInfo' $ sformat ("event=act-finish uid=" % stext) uid
forM_ artifacts $ putObjectAction uid
unless (null artifacts) $ logInfo' $ sformat ("event=artifacts uid=" % stext) uid
diff --git a/wolf.cabal b/wolf.cabal
index 48611d9..9a0fbe2 100644
--- a/wolf.cabal
+++ b/wolf.cabal
@@ -1,5 +1,5 @@
name: wolf
-version: 0.2.12
+version: 0.2.13
synopsis: Amazon Simple Workflow Service Wrapper.
homepage: https://github.com/swift-nav/wolf
license: MIT