changed PWSalt default size to 32 bytes (256 bits)

2018-12-21 16:49:32 -05:00
parent 570cfe4af2
commit 2cb10b263e
2 changed files with 2 additions and 2 deletions
--- a/src/Password.hs
+++ b/src/Password.hs
@@ -115,7 +115,7 @@ newPWSalt
  -> (PWSalt, g)
  -- ^ the result and new random generator
 newPWSalt g = (result, g2) where
-  result = B.pack $ take 256 $ randoms g1
+  result = B.pack $ take 32 $ randoms g1
  (g1, g2) = split g

 -- | validates a password database