diff options
Diffstat (limited to 'website/sandbox/learnpianochords/src/server/Spec.hs')
| -rw-r--r-- | website/sandbox/learnpianochords/src/server/Spec.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/website/sandbox/learnpianochords/src/server/Spec.hs b/website/sandbox/learnpianochords/src/server/Spec.hs index 69add5261836..1f9b9bb4bf9c 100644 --- a/website/sandbox/learnpianochords/src/server/Spec.hs +++ b/website/sandbox/learnpianochords/src/server/Spec.hs @@ -18,12 +18,12 @@ main = hspec $ do let mJWT = F.defaultJWTFields { F.overwriteSigner = hmacSecret "wrong" } |> F.googleJWT case mJWT of - Nothing -> True == False - Just jwt -> GoogleSignIn.jwtIsValid jwt == False + Nothing -> True `shouldBe` False + Just jwt -> GoogleSignIn.jwtIsValid jwt `shouldReturn` False it "returns false when the aud field doesn't match my client ID" $ do let mJWT = F.defaultJWTFields { F.overwriteAud = stringOrURI "wrong" } |> F.googleJWT case mJWT of - Nothing -> True == False - Just jwt -> GoogleSignIn.jwtIsValid jwt == False + Nothing -> True `shouldBe` False + Just jwt -> GoogleSignIn.jwtIsValid jwt `shouldReturn` False |