summaryrefslogtreecommitdiff
path: root/src/rabbit_ssl.erl
diff options
context:
space:
mode:
authorJohn DeTreville <jdetreville@vmware.com>2010-11-11 11:34:38 +0000
committerJohn DeTreville <jdetreville@vmware.com>2010-11-11 11:34:38 +0000
commit4563c988b0d6c218499435074fd02f1d7e128f11 (patch)
tree378abe0df8485423fff56d2813075ed90e83a5e2 /src/rabbit_ssl.erl
parenta63c7bec40f7dfa0532bd25c092d2052e0352a17 (diff)
downloadrabbitmq-server-4563c988b0d6c218499435074fd02f1d7e128f11.tar.gz
Added some extra polymorphism inside rabbit_ssl.erl.
Diffstat (limited to 'src/rabbit_ssl.erl')
-rw-r--r--src/rabbit_ssl.erl5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/rabbit_ssl.erl b/src/rabbit_ssl.erl
index ce218b7b..ff79d433 100644
--- a/src/rabbit_ssl.erl
+++ b/src/rabbit_ssl.erl
@@ -99,7 +99,7 @@ format_rdn_sequence({rdnSequence, Seq}) ->
%% Format an RDN set.
format_complex_rdn(RDNs) ->
- string:join([format_rdn(RDN) || RDN <- RDNs], "+").
+ string:join([lists:flatten(format_rdn(RDN)) || RDN <- RDNs], "+").
%% Format an RDN. If the type name is unknown, use the dotted decimal
%% representation. See RFC4514, section 2.3.
@@ -126,7 +126,8 @@ format_rdn(#'AttributeTypeAndValue'{type = T, value = V}) ->
io_lib:format(Fmt ++ "=~s", [FV]);
none when is_tuple(T) ->
TypeL = [io_lib:format("~w", [X]) || X <- tuple_to_list(T)],
- io_lib:format("~s:~s", [string:join(TypeL, "."), FV]);
+ io_lib:format("~s:~s",
+ [string:join(lists:flatten(TypeL), "."), FV]);
none ->
io_lib:format("~p:~s", [T, FV])
end.