git.iko.soy/typeable/minio-hs
on master help sign in
Fix live server test (#142)

* Update travis ghc to 8.8.2 * Fix live server test

commit97393762275408f67c2efeb5a00ce7874b918fe9 authorAditya Manthramurthy <donatello@users.noreply.github.com> dateWed 29 Jan 2020, 14:53 (7 years ago) parentd2a78df
2 files changed+2−2
.travis.yml+1−1 test/LiveServer.hs+1−1
.travis.yml+1−1
@@ -18,7 +18,7 @@ matrix:
1818 # Cabal
1919 - ghc: 8.4.4
2020 - ghc: 8.6.5
21− - ghc: 8.8.1
21+ - ghc: 8.8.2
2222
2323 # Stack
2424 - ghc: 8.6.5
test/LiveServer.hs+1−1
@@ -615,7 +615,7 @@ bucketPolicyFunTest = funTestWithBucket "Bucket Policy tests" $
615615 step "try a malformed policy, expect error"
616616 resE'' <- try $ setBucketPolicy bucket expectedPolicyJSON
617617 case resE'' of
618− Left exn -> liftIO $ exn @?= ServiceErr "MalformedPolicy" "Policy has invalid resource."
618+ Left exn -> liftIO $ exn @?= ServiceErr "MalformedPolicy" "bucket name does not match"
619619 _ -> return ()
620620
621621 let expectedPolicyJSON' = "{\"Version\":\"2012-10-17\",\"Statement\":[{\"Action\":[\"s3:GetBucketLocation\",\"s3:ListBucket\"],\"Effect\":\"Allow\",\"Principal\":{\"AWS\":[\"*\"]},\"Resource\":[\"arn:aws:s3:::" <> bucket <> "\"]},{\"Action\":[\"s3:GetObject\"],\"Effect\":\"Allow\",\"Principal\":{\"AWS\":[\"*\"]},\"Resource\":[\"arn:aws:s3:::" <> bucket <> "/*\"]}]}"