Fix LDAP substrings filter (EJAB-1715)

2015-04-21 11:49:41 +03:00 · 2015-04-21 11:49:41 +03:00 · ed79a61752
parent fd54181435
commit ed79a61752
1 changed files with 2 additions and 4 deletions
--- a/src/eldap.erl
+++ b/src/eldap.erl
@ -507,16 +507,14 @@ present(Attribute) ->
 -type substr() :: [{initial | any | final, binary()}].
 -type 'SubstringFilter'() ::
        #'SubstringFilter'{type :: binary(),
-                           substrings :: {'SubstringFilter_substrings',
-                                          substr()}}.
+                           substrings :: substr()}.

 -type substrings() :: {substrings, 'SubstringFilter'()}.
 -spec substrings(binary(), substr()) -> substrings().

 substrings(Type, SubStr) ->
-    Ss = {'SubstringFilter_substrings', SubStr},
    {substrings,
-     #'SubstringFilter'{type = Type, substrings = Ss}}.
+     #'SubstringFilter'{type = Type, substrings = SubStr}}.

 -type match_opts() :: [{matchingRule | type, binary()} |
                       {dnAttributes, boolean()}].