From 7658c4c7afa2a1c048b712fe5f227c18acc509a3 Mon Sep 17 00:00:00 2001 From: nsensfel Date: Tue, 26 Feb 2019 17:41:07 +0100 Subject: ... --- src/shared/reply/shr_set_map.erl | 32 +++++++++++++------------------- 1 file changed, 13 insertions(+), 19 deletions(-) diff --git a/src/shared/reply/shr_set_map.erl b/src/shared/reply/shr_set_map.erl index 2e10c2e..f0af1cf 100644 --- a/src/shared/reply/shr_set_map.erl +++ b/src/shared/reply/shr_set_map.erl @@ -39,25 +39,19 @@ generate (User, TriggerVisibilityFun, Map) -> }, { <<"m">>, - lists:filtermap - ( - fun ({Key, Value}) -> - case shr_map_marker:can_access(User, Value) of - true -> - { - true, - { - [ - { Key, shr_map_marker:encode(Value) } - ] - } - }; - - false -> false - end - end, - shr_map:get_markers(Map) - ) + { + lists:foldl + ( + fun ({Key, Value}, Acc) -> + case shr_map_marker:can_access(User, Value) of + true -> [{ Key, shr_map_marker:encode(Value) }|Acc]; + false -> Acc + end + end, + [], + shr_map:get_markers(Map) + ) + } } ] }. -- cgit v1.2.3-70-g09d2