Increase Yesod.Auth.Email pwstore strength to the recommended minimum of 14.

This commit is contained in:
Felipe Lessa 2014-02-25 19:08:50 -03:00
parent 5f99205f13
commit 71558d3342

View File

@ -432,7 +432,7 @@ saltLength = 5
-- | Salt a password with a randomly generated salt.
saltPass :: Text -> IO Text
saltPass = fmap (decodeUtf8With lenientDecode)
. flip PS.makePassword 12
. flip PS.makePassword 14
. encodeUtf8
saltPass' :: String -> String -> String