diff options
| author | Joe Crayne <joe@jerkface.net> | 2019-11-15 16:27:28 -0500 |
|---|---|---|
| committer | Joe Crayne <joe@jerkface.net> | 2019-11-15 16:27:28 -0500 |
| commit | 02680b1ed3b37c0cc16e04e51e613d53ff9dbab8 (patch) | |
| tree | e88364cb3813dc0d93d5ab2311e533e5983dfe62 /Data/OpenPGP/Util/Gen.hs | |
| parent | 387491e6517fe41bd242b294ba1fe52881cac6b2 (diff) | |
cv25519: Fixed missing algorithm preferences.
Diffstat (limited to 'Data/OpenPGP/Util/Gen.hs')
| -rw-r--r-- | Data/OpenPGP/Util/Gen.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Data/OpenPGP/Util/Gen.hs b/Data/OpenPGP/Util/Gen.hs index babd12d..713e909 100644 --- a/Data/OpenPGP/Util/Gen.hs +++ b/Data/OpenPGP/Util/Gen.hs | |||
| @@ -127,7 +127,7 @@ generateKey' (GenEd25519 {}) g = withDRG g $ do | |||
| 127 | return $ importSecretEd25519 k | 127 | return $ importSecretEd25519 k |
| 128 | generateKey' (GenCv25519 {}) g = withDRG g $ do | 128 | generateKey' (GenCv25519 {}) g = withDRG g $ do |
| 129 | k <- Cv25519.generateSecretKey | 129 | k <- Cv25519.generateSecretKey |
| 130 | return $ importSecretCv25519 k | 130 | return $ importSecretCv25519 SHA512 AES128 k |
| 131 | 131 | ||
| 132 | 132 | ||
| 133 | #endif | 133 | #endif |