diff options
-rw-r--r-- | src/rabbit_networking.erl | 19 |
1 files changed, 12 insertions, 7 deletions
diff --git a/src/rabbit_networking.erl b/src/rabbit_networking.erl index 4b20d053..da4eb66a 100644 --- a/src/rabbit_networking.erl +++ b/src/rabbit_networking.erl @@ -119,20 +119,25 @@ boot_ssl() -> | SslOptsConfig] end, % In R13B04 and R14A (at least), rc4 is incorrectly implemented. - CipherSuites = proplists:get_value(ciphers, SslOpts, ssl:cipher_suites()), + CipherSuites = proplists:get_value(ciphers, + SslOpts, + ssl:cipher_suites()), FilteredCipherSuites = [C || C <- CipherSuites, begin - SuiteCode = if is_tuple(C) -> ssl_cipher:suite(C); - is_list(C) -> ssl_cipher:openssl_suite(C) - end, - SP = ssl_cipher:security_parameters(SuiteCode, - #security_parameters{}), + SuiteCode = + if is_tuple(C) -> ssl_cipher:suite(C); + is_list(C) -> ssl_cipher:openssl_suite(C) + end, + SP = ssl_cipher:security_parameters( + SuiteCode, + #security_parameters{}), SP#security_parameters.bulk_cipher_algorithm =/= ?RC4 end], SslOpts1 = [{ciphers, FilteredCipherSuites} | [{K, V} || {K, V} <- SslOpts, K =/= ciphers]], - [start_ssl_listener(Host, Port, SslOpts1) || {Host, Port} <- SslListeners], + [start_ssl_listener(Host, Port, SslOpts1) + || {Host, Port} <- SslListeners], ok end. |