antiope-s3 7.4.3 → 7.4.4
raw patch · 3 files changed
+6/−5 lines, 3 filesdep ~hspecPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: hspec
API changes (from Hackage documentation)
Files
- antiope-s3.cabal +3/−2
- src/Antiope/S3.hs +1/−1
- test/Antiope/S3/MessagesSpec.hs +2/−2
antiope-s3.cabal view
@@ -1,7 +1,7 @@ cabal-version: 2.4 name: antiope-s3-version: 7.4.3+version: 7.4.4 synopsis: Please see the README on Github at <https://github.com/arbor/antiope#readme> description: Please see the README on Github at <https://github.com/arbor/antiope#readme>. category: Services@@ -12,6 +12,7 @@ copyright: Arbor Networks license: MIT license-file: LICENSE+tested-with: GHC == 8.8.1, GHC == 8.6.5, GHC == 8.4.4 build-type: Simple extra-source-files: README.md ChangeLog.md@@ -87,7 +88,7 @@ , exceptions , generic-lens , hedgehog >= 0.5 && < 1.1- , hspec >= 2.4 && < 2.7+ , hspec >= 2.4 && < 2.8 , http-types , hw-hspec-hedgehog >= 0.1 && < 0.3 , lens
src/Antiope/S3.hs view
@@ -163,7 +163,7 @@ let dObjs = delete' & dObjects .~ (objectIdentifier <$> ks) resp <- AWS.send (deleteObjects b dObjs) unless (List.null $ resp ^. drsErrors) $- fail (resp ^. drsErrors & show)+ error (resp ^. drsErrors & show) let deleted = resp ^.. drsDeleted . each . dKey & catMaybes <&> S3Uri b pure deleted
test/Antiope/S3/MessagesSpec.hs view
@@ -24,8 +24,8 @@ d <- Gen.int (Range.constant 1 28) let day = fromGregorian y m d secs <- toInteger <$> Gen.int (Range.constant 0 86401)- let diff = secondsToDiffTime secs- pure $ UTCTime day diff+ let diffTime = secondsToDiffTime secs+ pure $ UTCTime day diffTime datedPath :: MonadGen m => m Text datedPath = do