encryptPassword :: String -> String
encryptPassword password =
  unpack $ hash $ pack $ password
encryptPassword :: String -> String
encryptPassword password =
  unpack $ hash $ pack $ password
encryptPassword password =
  unpack $ hash $ pack $ password