25
1
mirror of https://github.com/processone/ejabberd.git synced 2024-11-22 16:20:52 +01:00

now using "%u" pattern as default for ldap_uids (EJAB-1203)

This commit is contained in:
Evgeniy Khramtsov 2010-03-08 14:08:22 +09:00
parent 7d497615a1
commit 9d2fd3e52c

View File

@ -53,15 +53,17 @@ subfilter({UIDAttr}) ->
%% Not tail-recursive, but it is not very terribly. %% Not tail-recursive, but it is not very terribly.
%% It stops finding on the first not empty value. %% It stops finding on the first not empty value.
find_ldap_attrs([{Attr} | Rest], Attributes) ->
find_ldap_attrs([{Attr, "%u"} | Rest], Attributes);
find_ldap_attrs([{Attr, Format} | Rest], Attributes) -> find_ldap_attrs([{Attr, Format} | Rest], Attributes) ->
case get_ldap_attr(Attr, Attributes) of case get_ldap_attr(Attr, Attributes) of
Value when is_list(Value), Value /= "" -> Value when is_list(Value), Value /= "" ->
{Value, Format}; {Value, Format};
_ -> _ ->
find_ldap_attrs(Rest, Attributes) find_ldap_attrs(Rest, Attributes)
end; end;
find_ldap_attrs([], _) -> find_ldap_attrs([], _) ->
"". "".
get_ldap_attr(LDAPAttr, Attributes) -> get_ldap_attr(LDAPAttr, Attributes) ->
Res = lists:filter( Res = lists:filter(