correct spelling mistake

2017-09-01 18:23:53 +01:00 · 2017-09-01 18:23:53 +01:00 · fcab336fb3
commit fcab336fb3
parent 352fca204c
1 changed files with 1 additions and 1 deletions
--- a/test/Test.hs
+++ b/test/Test.hs
@ -846,7 +846,7 @@ main = do
            return (p ^. PersonId :: SqlExpr (Value PersonId))
          -- There are 2^4 = 16 possible orderings.  The chance
          -- of 11 random samplings returning the same ordering
-          -- is 1/2^40, so this test should pass almost everytime.
+          -- is 1/2^40, so this test should pass almost every time.
          liftIO $ S.size rets `shouldSatisfy` (>2)

      it "works on a composite primary key" $