diff options
| author | John DeTreville <jdetreville@vmware.com> | 2010-11-11 11:34:38 +0000 |
|---|---|---|
| committer | John DeTreville <jdetreville@vmware.com> | 2010-11-11 11:34:38 +0000 |
| commit | 4563c988b0d6c218499435074fd02f1d7e128f11 (patch) | |
| tree | 378abe0df8485423fff56d2813075ed90e83a5e2 | |
| parent | a63c7bec40f7dfa0532bd25c092d2052e0352a17 (diff) | |
| download | rabbitmq-server-4563c988b0d6c218499435074fd02f1d7e128f11.tar.gz | |
Added some extra polymorphism inside rabbit_ssl.erl.
| -rw-r--r-- | src/rabbit_ssl.erl | 5 |
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. |