diff options
| author | Evgeny Khramtsov <ekhramtsov@process-one.net> | 2018-11-29 13:01:00 +0300 |
|---|---|---|
| committer | Evgeny Khramtsov <ekhramtsov@process-one.net> | 2018-11-29 13:01:00 +0300 |
| commit | b07b10bdaa2cb2c585b0de8a1c666e37c95c32dd (patch) | |
| tree | ba42b2d7182b8204e0010ec479b87a97288a0768 /src | |
| parent | Implement XEP-0410: MUC Self-Ping optimization (diff) | |
Drop some macros related to OTP<19
Diffstat (limited to 'src')
| -rw-r--r-- | src/mod_block_strangers.erl | 22 |
1 files changed, 1 insertions, 21 deletions
diff --git a/src/mod_block_strangers.erl b/src/mod_block_strangers.erl index 6e9d1097a..0496245b0 100644 --- a/src/mod_block_strangers.erl +++ b/src/mod_block_strangers.erl @@ -222,31 +222,11 @@ check_subscription(From, To) -> end. sets_bare_member({U, S, <<"">>} = LBJID, Set) -> - case ?SETS:next(sets_iterator_from(LBJID, Set)) of + case ?SETS:next(?SETS:iterator_from(LBJID, Set)) of {{U, S, _}, _} -> true; _ -> false end. --ifdef(GB_SETS_ITERATOR_FROM). -sets_iterator_from(Element, Set) -> - ?SETS:iterator_from(Element, Set). --else. -%% Copied from gb_sets.erl -%% TODO: Remove after dropping R17 support -sets_iterator_from(S, {_, T}) -> - iterator_from(S, T, []). - -iterator_from(S, {K, _, T}, As) when K < S -> - iterator_from(S, T, As); -iterator_from(_, {_, nil, _} = T, As) -> - [T | As]; -iterator_from(S, {_, L, _} = T, As) -> - iterator_from(S, L, [T | As]); -iterator_from(_, nil, As) -> - As. --endif. - - depends(_Host, _Opts) -> []. |