wolf 0.3.16 → 0.3.17
raw patch · 2 files changed
+4/−4 lines, 2 files
Files
- src/Network/AWS/Wolf/Act.hs +3/−3
- wolf.cabal +1/−1
src/Network/AWS/Wolf/Act.hs view
@@ -80,8 +80,8 @@ maybe_ uid $ \uid' -> withCurrentWorkDirectory uid' $ \wd -> runAmazonStoreCtx uid' $ do- traceInfo "start" [ "input" .= input, "dir" .= wd ]- t2 <- liftIO getCurrentTime+ traceInfo "start" [ "dir" .= wd ]+ t2 <- liftIO getCurrentTime dd <- dataDirectory wd sd <- storeDirectory wd isd <- inputDirectory sd@@ -94,7 +94,7 @@ output <- readText (dd </> "output.json") maybe (completeActivity token' output) (const $ failActivity token') e t3 <- liftIO getCurrentTime- traceInfo "finish" [ "output" .= output ]+ traceInfo "finish" [ "dir" .= wd ] let status = textFromString $ maybe "complete" (const "fail") e statsIncrement "wolf.act.activity.count" [ "queue" =. queue, "status" =. status ] statsHistogram "wolf.act.activity.elapsed" (realToFrac (diffUTCTime t3 t2) :: Double) [ "queue" =. queue ]
wolf.cabal view
@@ -1,5 +1,5 @@ name: wolf-version: 0.3.16+version: 0.3.17 synopsis: Amazon Simple Workflow Service Wrapper. description: Wolf is a wrapper around Amazon Simple Workflow Service. homepage: https://github.com/swift-nav/wolf