Support undefinition of ssl:seed in R15B

This commit is contained in:
Badlop 2011-12-23 12:19:18 +01:00
parent 09a5fafc8a
commit 9912e1b548
1 changed files with 1 additions and 1 deletions

View File

@ -438,7 +438,7 @@ init([]) ->
end;
init({Hosts, Port, Rootdn, Passwd, Opts}) ->
catch ssl:start(),
ssl:seed(randoms:get_string()),
catch ssl:seed(randoms:get_string()),
Encrypt = case proplists:get_value(encrypt, Opts) of
tls -> tls;
_ -> none