diff options
| author | Ingela Anderton Andin <[email protected]> | 2013-05-14 18:55:39 +0200 |
|---|---|---|
| committer | Ingela Anderton Andin <[email protected]> | 2013-05-20 08:41:52 +0200 |
| commit | 2f46744041f9d86a3e9205ce3d0b64cedcb64f71 (patch) | |
| tree | da0e4d355b326099eeea57932c4b7a4e6a4f6f4d /lib/ssl/src/ssl_connection.erl | |
| parent | 94df68b49da66fff2f49735484c36ae6af90b886 (diff) | |
| download | otp-2f46744041f9d86a3e9205ce3d0b64cedcb64f71.tar.gz otp-2f46744041f9d86a3e9205ce3d0b64cedcb64f71.tar.bz2 otp-2f46744041f9d86a3e9205ce3d0b64cedcb64f71.zip | |
ssl: Remove use of deprecated crypto functions
Diffstat (limited to 'lib/ssl/src/ssl_connection.erl')
| -rw-r--r-- | lib/ssl/src/ssl_connection.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ssl/src/ssl_connection.erl b/lib/ssl/src/ssl_connection.erl index 54eed03d3c..ce1b372409 100644 --- a/lib/ssl/src/ssl_connection.erl +++ b/lib/ssl/src/ssl_connection.erl @@ -2216,7 +2216,7 @@ client_srp_master_secret(Generator, Prime, Salt, ServerPub, ClientKeys, case ssl_srp_primes:check_srp_params(Generator, Prime) of ok -> {Username, Password} = SslOpts#ssl_options.srp_identity, - DerivedKey = crypto:sha([Salt, crypto:sha([Username, <<$:>>, Password])]), + DerivedKey = crypto:hash(sha, [Salt, crypto:hash(sha, [Username, <<$:>>, Password])]), case crypto:compute_key(srp, ServerPub, ClientKeys, {user, [DerivedKey, Prime, Generator, '6a']}) of error -> ?ALERT_REC(?FATAL, ?ILLEGAL_PARAMETER); |