packages feed

users-test 0.5.0.0 → 0.5.0.1

raw patch · 2 files changed

+5/−2 lines, 2 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Web.Users.TestSpec: makeUsersSpec :: forall b. UserStorageBackend b => b -> Spec
+ Web.Users.TestSpec: makeUsersSpec :: UserStorageBackend b => b -> Spec

Files

src/Web/Users/TestSpec.hs view
@@ -59,10 +59,13 @@                         assertLeft (createUser backend (mkUser "asdas" "bar2@baz.com"))                                        "succeeded to create different user with same email" $ \err ->                             err `shouldBe` EmailAlreadyTaken+                        assertLeft (createUser backend (mkUser "asdas" "Bar2@baz.com"))+                           "succeeded to create different user with different email capitalisation" $ \err ->+                            err `shouldBe` EmailAlreadyTaken               it "list and count should be correct" $                  assertRight (createUser backend userA) $ \userId1 ->                  assertRight (createUser backend userB) $ \userId2 ->-                 do allUsers <- listUsers backend Nothing (SortAsc UserFieldId)+                 do allUsers <- listUsers backend (Just (0,10)) (SortAsc UserFieldId)                     unless ((userId1, hidePassword userA) `elem` allUsers && (userId2, hidePassword userB) `elem` allUsers)                            (expectationFailure $ "create users not in user list:" ++ show allUsers)                     countUsers backend `shouldReturn` 2
users-test.cabal view
@@ -1,5 +1,5 @@ name:                users-test-version:             0.5.0.0+version:             0.5.0.1 synopsis:            Library to test backends for the users library description:         Provides HSpec helpers for backends of <http://hackage.haskell.org/package/users users package>.                      .